19 lines
172 B
Text
19 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;
|
|
}
|