| dnl @ ../doc/m4.texi:7389: Origin of test |
| dnl @ expected status: 0 |
| dnl @ extra options: |
| dnl @ Copyright (C) 2006, 2007, 2008, 2009 Free Software |
| dnl @ Foundation, Inc. |
| dnl @ This file is free software; the Free Software Foundation |
| dnl @ gives unlimited permission to copy and/or distribute it |
| dnl @ with or without modifications, as long as this notice |
| dnl @ is preserved. |
| define(`a1', `A1') |
| dnl @result{} |
| dnl First argument, concatenated with 1 |
| define(`_1', `$1')define(`first1', `_1($@)1') |
| dnl @result{} |
| dnl Eleventh argument, portable |
| define(`_9', `$9')define(`eleventh', `_9(shift(shift($@)))') |
| dnl @result{} |
| dnl Eleventh argument, GNU style |
| define(`Eleventh', `$11') |
| dnl @result{} |
| first1(`a', `b', `c', `d', `e', `f', `g', `h', `i', `j', `k') |
| dnl @result{}A1 |
| eleventh(`a', `b', `c', `d', `e', `f', `g', `h', `i', `j', `k') |
| dnl @result{}k |
| Eleventh(`a', `b', `c', `d', `e', `f', `g', `h', `i', `j', `k') |
| dnl @result{}k |