adamc@131: val rec endlessList1 = fn () =>
adamc@131: Buy eggs.
adamc@131: {endlessList2 ()}
adamc@131:
adamc@131:
adamc@131: and endlessList2 = fn () =>
adamc@131: Buy milk.
adamc@131: {endlessList1 ()}
adamc@131:
adamc@131:
adamc@131: val main = fn () =>
adamc@131: {endlessList1 ()}
adamc@131: