| Current Path : /compat/linux/proc/self/root/usr/local/share/examples/gm4/ |
FreeBSD hs32.drive.ne.jp 9.1-RELEASE FreeBSD 9.1-RELEASE #1: Wed Jan 14 12:18:08 JST 2015 root@hs32.drive.ne.jp:/sys/amd64/compile/hs32 amd64 |
| Current File : //compat/linux/proc/self/root/usr/local/share/examples/gm4/foreachq3.m4 |
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