9 lines
201 B
Text
9 lines
201 B
Text
define(`for',
|
|
`ifelse($#,0,``$0'',
|
|
`ifelse(eval($2<=$3),1,
|
|
`pushdef(`$1',$2)$5`'popdef(`$1')$0(`$1',eval($2+$4),$3,$4,`$5')')')')dnl
|
|
|
|
for(`x',`1',`5',`1',
|
|
`for(`y',`1',x,`1',
|
|
`*')
|
|
')
|