summaryrefslogtreecommitdiff
path: root/checks/132.m4wrap
diff options
context:
space:
mode:
Diffstat (limited to 'checks/132.m4wrap')
-rw-r--r--checks/132.m4wrap26
1 files changed, 26 insertions, 0 deletions
diff --git a/checks/132.m4wrap b/checks/132.m4wrap
new file mode 100644
index 0000000..69e5a99
--- /dev/null
+++ b/checks/132.m4wrap
@@ -0,0 +1,26 @@
+dnl @ ../doc/m4.texinfo:4873: 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.
+undivert(`wrapfifo.m4')dnl
+dnl @result{}dnl Redefine m4wrap to have FIFO semantics.
+dnl @result{}define(`_m4wrap_level', `0')dnl
+dnl @result{}define(`m4wrap',
+dnl @result{}`ifdef(`m4wrap'_m4wrap_level,
+dnl @result{} `define(`m4wrap'_m4wrap_level,
+dnl @result{} defn(`m4wrap'_m4wrap_level)`$1')',
+dnl @result{} `builtin(`m4wrap', `define(`_m4wrap_level',
+dnl @result{} incr(_m4wrap_level))dnl
+dnl @result{}m4wrap'_m4wrap_level)dnl
+dnl @result{}define(`m4wrap'_m4wrap_level, `$1')')')dnl
+include(`wrapfifo.m4')
+dnl @result{}
+m4wrap(`a`'m4wrap(`c
+', `d')')m4wrap(`b')
+dnl @result{}
+dnl @result{}abc