Mercurial > MadButterfly

view tools/foreach.m4 @ 891:96bc29e948cc abs_n_rel_center

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Do not fill and stroke when the color is none or unseted
author Thinker K.F. Li <thinker@codemud.net>
date Sun, 26 Sep 2010 14:25:55 +0800
parents f4b792afa74e
children
line wrap: on
line source

divert([-1])

define([_arg1], [$1])

define([_foreach], [ifelse([$2], [()], [],
[define([$1], _arg1$2)$3[]_foreach([$1], (shift$2), [$3])])])

define([foreach], [pushdef([$1])_foreach($@)popdef([$1])])

divert[]dnl