Mercurial > MadButterfly
view tools/foreach.m4 @ 418:af6adacbed07
Make sh_stext object managed by rdman.
It should call rdman_shape_man() to make rdman managing the shape object.
author | Thinker K.F. Li <thinker@branda.to> |
---|---|
date | Sun, 26 Jul 2009 22:13:20 +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