20 lines
172 B
Text
20 lines
172 B
Text
|
void
|
||
|
|
map(list l, void (*fp)(object))
|
||
|
|
{
|
||
|
|
l.ucall(fp, 0);
|
||
|
|
}
|
||
|
|
|
||
|
|
void
|
||
|
|
out(object o)
|
||
|
|
{
|
||
|
|
o_(o, "\n");
|
||
|
|
}
|
||
|
|
|
||
|
|
integer
|
||
|
|
main(void)
|
||
|
|
{
|
||
|
|
list(0, 1, 2, 3).map(out);
|
||
|
|
|
||
|
|
return 0;
|
||
|
|
}
|