XPost: comp.lang.lisp
On 2024-09-11, B. Pym <
[email protected]> wrote:
Gauche Scheme
(use gauche.generator)
(define (foo f)
(generator-fold
+ 0
(gmap string-length (file->generator f read-line))))
(foo "output.dat")
119
Yagoddabekidding!
(lflow "/etc/hosts"
file-get-lines
(sum len))
213
--
TXR Programming Language:
http://nongnu.org/txr
Cygnal: Cygwin Native Application Library:
http://kylheku.com/cygnal
Mastodon: @
[email protected]
--- SoupGate-Win32 v1.05
* Origin: fsxNet Usenet Gateway (21:1/5)