summaryrefslogtreecommitdiff
path: root/checks/078.shift
diff options
context:
space:
mode:
Diffstat (limited to 'checks/078.shift')
-rw-r--r--checks/078.shift18
1 files changed, 18 insertions, 0 deletions
diff --git a/checks/078.shift b/checks/078.shift
new file mode 100644
index 0000000..10aa85f
--- /dev/null
+++ b/checks/078.shift
@@ -0,0 +1,18 @@
+dnl @ ../doc/m4.texi:3206: 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