[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Changes to m4/examples/forloop.m4,v
From: |
Eric Blake |
Subject: |
Changes to m4/examples/forloop.m4,v |
Date: |
Thu, 19 Oct 2006 16:19:21 +0000 |
CVSROOT: /sources/m4
Module name: m4
Changes by: Eric Blake <ericb> 06/10/19 16:19:20
Index: examples/forloop.m4
===================================================================
RCS file: /sources/m4/m4/examples/forloop.m4,v
retrieving revision 1.1.1.2
retrieving revision 1.2
diff -u -b -r1.1.1.2 -r1.2
--- examples/forloop.m4 17 Feb 2000 03:09:47 -0000 1.1.1.2
+++ examples/forloop.m4 19 Oct 2006 16:19:20 -0000 1.2
@@ -1,10 +1,6 @@
-divert(-1)
-# forloop(i, from, to, stmt)
-
-define(`forloop', `pushdef(`$1', `$2')_forloop(`$1', `$2', `$3',
`$4')popdef(`$1')')
+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))_forloop(`$1', `$2', `$3',
`$4')')')
-divert
-forloop(`x', 1, 10, `2**x = eval(2**x)
-')
+ `$4`'ifelse($1, `$3', `', `define(`$1', incr($1))$0($@)')')
+divert`'dnl
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- Changes to m4/examples/forloop.m4,v,
Eric Blake <=