5 lines
105 B
Text
5 lines
105 B
Text
|
vardef enum(expr first)(text t) =
|
||
|
|
save ?; ? := first;
|
||
|
|
forsuffixes e := t: e := ?; ?:=?+1; endfor
|
||
|
|
enddef;
|