|
makelist:=proc()
|
|
local makeitem,i;
|
|
i:=1;
|
|
makeitem:=proc(i)
|
|
if i=1 then
|
|
printf("%a\n", "1. first");
|
|
elif i=2 then
|
|
printf("%a\n","2. second");
|
|
elif i=3 then
|
|
printf("%a\n", "3. third");
|
|
else
|
|
return NULL;
|
|
end if;
|
|
end proc;
|
|
while i<4 do
|
|
makeitem(i);
|
|
i:=i+1;
|
|
end do;
|
|
end proc;
|