Source code in the aime programming language

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;
}