1 dnl @ ../doc/m4.texi:3271: Origin of test
2 dnl @ expected status: 0
4 dnl @ Copyright (C) 2006, 2007, 2008, 2009 Free Software
6 dnl @ This file is free software; the Free Software Foundation
7 dnl @ gives unlimited permission to copy and/or distribute it
8 dnl @ with or without modifications, as long as this notice
10 undivert(`forloop.m4')dnl
11 dnl @result{}divert(`-1')
12 dnl @result{}# forloop(var, from, to, stmt) - simple version
13 dnl @result{}define(`forloop', `pushdef(`$1', `$2')_forloop($@)popdef(`$1')')
14 dnl @result{}define(`_forloop',
15 dnl @result{} `$4`'ifelse($1, `$3', `', `define(`$1', incr($1))$0($@)')')
16 dnl @result{}divert`'dnl