XPost: comp.lang.scheme

Gareth McCaughan wrote:

(loop for word = (read input nil) while word collect word)

which even the strictest LOOP-hater would have to agree
is clearer.

It's shorter in Gauche Scheme:

(use gauche.generator)

(generator->list (cut read input))


Another way:

(use srfi-42) ; list-ec

(list-ec (:port word input) word)


Another way.

(lope doport word read port collecting word)

--- SoupGate-Win32 v1.05
* Origin: fsxNet Usenet Gateway (21:1/5)