7 lines
224 B
Plaintext
7 lines
224 B
Plaintext
divert(`-1')
|
|
# forloop(var, from, to, stmt) - simple version
|
|
define(`forloop', `pushdef(`$1', `$2')_forloop($@)popdef(`$1')')
|
|
define(`_forloop',
|
|
`$4`'ifelse($1, `$3', `', `define(`$1', incr($1))$0($@)')')
|
|
divert`'dnl
|