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/trace.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/trace.m4')
-rw-r--r-- | doc/examples/trace.m4 | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/doc/examples/trace.m4 b/doc/examples/trace.m4 new file mode 100644 index 00000000..92ce9816 --- /dev/null +++ b/doc/examples/trace.m4 @@ -0,0 +1,30 @@ +divert(-1) + +# move(from, to) +define(`move', `Move one disk from `$1' to `$2'. +') + +# _hanoi (cnt, from, to, aux) +define(`_hanoi', `ifelse(eval(`$1'<=1), 1, `move($2, $3)', +`$0(decr($1), $2, $4, $3)move($2, $3)$0(decr($1), $4, $3, $2)')') + +# hanoi (cnt) +define(`hanoi', `_$0(`$1', source, destination, auxilliary)') +divert`'dnl + +# Debugmode t +debugmode(`t') +hanoi(2) + +# Debugmode taeq +debugmode(`taeq') +hanoi(2) + +# Debugmode OFF +debugmode +hanoi(2) + +# Debugmode ae +debugmode(`ae') +traceon(`move', `_hanoi') +hanoi(2) |