XPost: comp.lang.lisp
On 2024-09-11, B. Pym <
Nobody447095@here-nor-there.org> 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: @
Kazinator@mstdn.ca
--- SoupGate-Win32 v1.05
* Origin: fsxNet Usenet Gateway (21:1/5)