/usr/share/doc/m4/examples
Edit: /usr/share/doc/m4/examples/loop.m4 (930B)
dnl Stress test for recursion algorithms. Usage:
dnl m4 -Ipath/to/examples [-Doptions] loop.m4
dnl Options include:
dnl -Dalt[=
] - test with foreachq instead of foreachq2, default 3
dnl -Dlimit= - set upper limit of sequence to , default 1000
dnl -Dverbose - print the sequence to the screen, rather than discarding
dnl -Ddebug[=] - execute after forloop but before foreach
dnl -Dsleep= - sleep for seconds before exit, to allow time
dnl to examine peak process memory usage
include(`forloop2.m4')dnl
include(`quote.m4')dnl
ifelse(alt, `alt', `define(`alt', `2')', alt, `', `define(`alt', `3')')dnl
include(`foreachq'alt`.m4')dnl
ifdef(`limit', `', `define(`limit', `1000')')dnl
ifdef(`verbose', `', `divert(`-1')')dnl
ifdef(`debug', `', `define(`debug')')dnl
foreachq(`i', dquote(1forloop(`i', `2', limit, `,i'))debug, ` i')
ifdef(`sleep',`syscmd(`echo done>/dev/tty;sleep 'sleep)')dnl