summaryrefslogtreecommitdiff
path: root/doc/examples/foreachq3.m4
diff options
context:
space:
mode:
Diffstat (limited to 'doc/examples/foreachq3.m4')
-rw-r--r--doc/examples/foreachq3.m49
1 files changed, 9 insertions, 0 deletions
diff --git a/doc/examples/foreachq3.m4 b/doc/examples/foreachq3.m4
new file mode 100644
index 00000000..5e656727
--- /dev/null
+++ b/doc/examples/foreachq3.m4
@@ -0,0 +1,9 @@
+divert(`-1')
+# foreachq(x, `item_1, item_2, ..., item_n', stmt)
+# quoted list, alternate improved version
+define(`foreachq', `ifelse(`$2', `', `',
+ `pushdef(`$1')_$0(`$1', `$3', `', $2)popdef(`$1')')')
+define(`_foreachq', `ifelse(`$#', `3', `',
+ `define(`$1', `$4')$2`'$0(`$1', `$2',
+ shift(shift(shift($@))))')')
+divert`'dnl