diff options
| author | Gary V. Vaughan <gary@gnu.org> | 2013-09-22 09:49:06 +0700 |
|---|---|---|
| committer | Gary V. Vaughan <gary@gnu.org> | 2013-09-22 09:49:06 +0700 |
| commit | 578bd023ea85d57d8488b8cb88265fbe3a3071e4 (patch) | |
| tree | cc5a6088277c1a747041f5969cf21d7fca2ca4f1 /doc/examples/forloop3.m4 | |
| parent | 1eacf10370529972a7407bdbb368f5f69f87a1b8 (diff) | |
| download | m4-578bd023ea85d57d8488b8cb88265fbe3a3071e4.tar.gz | |
configury: move usage examples into doc subdirectory.
* examples: Move from here...
* doc/examples: ...to here.
* Makefile.am (EXTRA_DIST, dist_pkgdata_DATA): Adjust.
* README, doc/m4.texi, tests/builtins.at, tests/generate.awk,
tests/others.at: Likewise.
Signed-off-by: Gary V. Vaughan <gary@gnu.org>
Diffstat (limited to 'doc/examples/forloop3.m4')
| -rw-r--r-- | doc/examples/forloop3.m4 | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/doc/examples/forloop3.m4 b/doc/examples/forloop3.m4 new file mode 100644 index 00000000..98db20f3 --- /dev/null +++ b/doc/examples/forloop3.m4 @@ -0,0 +1,13 @@ +divert(`-1') +# forloop_arg(from, to, macro) - invoke MACRO(value) for +# each value between FROM and TO, without define overhead +define(`forloop_arg', `ifelse(eval(`($1) <= ($2)'), `1', + `_forloop(`$1', eval(`$2'), `$3(', `)')')') +# forloop(var, from, to, stmt) - refactored to share code +define(`forloop', `ifelse(eval(`($2) <= ($3)'), `1', + `pushdef(`$1')_forloop(eval(`$2'), eval(`$3'), + `define(`$1',', `)$4')popdef(`$1')')') +define(`_forloop', + `$3`$1'$4`'ifelse(`$1', `$2', `', + `$0(incr(`$1'), `$2', `$3', `$4')')') +divert`'dnl |