CVSROOT:        /sources/m4
Module name:    m4
Branch:         branch-1_4
Changes by:     Eric Blake <ericb>      06/10/19 16:12:46

Index: examples/forloop.m4
===================================================================
RCS file: /sources/m4/m4/examples/forloop.m4,v
retrieving revision 1.1.1.1.2.1
retrieving revision 1.1.1.1.2.2
diff -u -b -r1.1.1.1.2.1 -r1.1.1.1.2.2
--- examples/forloop.m4 3 Jul 2006 13:16:19 -0000       1.1.1.1.2.1
+++ examples/forloop.m4 19 Oct 2006 16:12:46 -0000      1.1.1.1.2.2
@@ -1,8 +1,6 @@
 divert(`-1')
-# forloop(var, from, to, stmt)
-define(`forloop',
-  `pushdef(`$1', `$2')_forloop(`$1', `$2', `$3', `$4')popdef(`$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')')')
+       `$4`'ifelse($1, `$3', `', `define(`$1', incr($1))$0($@)')')
 divert`'dnl


Reply via email to