diff options
Diffstat (limited to 'checks/078.shift')
| -rw-r--r-- | checks/078.shift | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/checks/078.shift b/checks/078.shift new file mode 100644 index 0000000..e9dfa90 --- /dev/null +++ b/checks/078.shift @@ -0,0 +1,18 @@ +dnl @ ../doc/m4.texinfo:3177: 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(`argn', `ifelse(`$1', 1, ``$2'', + `argn(decr(`$1'), shift(shift($@)))')') +dnl @result{} +argn(`1', `a') +dnl @result{}a +define(`foo', `argn(`11', $@)') +dnl @result{} +foo(`a', `b', `c', `d', `e', `f', `g', `h', `i', `j', `k', `l') +dnl @result{}k |