mirror of
https://https.git.savannah.gnu.org/git/m4.git
synced 2026-01-29 10:54:39 +00:00
37c536d08c
* examples/forloop2.m4: New file. * examples/quote.m4: New file. * doc/m4.texinfo (Loops): Rename to... (Shift): ...this node. (Forloop, Foreach, Improved forloop, Improved foreach): New nodes.
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
|