Return Styles: Pseud0ch, Terminal, Valhalla, NES, Geocities, Blue Moon. Entire thread

Help [scheme]

Name: Anonymous 2008-01-27 7:29



(define (read-file port)

  (lambda (line)

    (if line

        (begin

        (display line)

        (read-file port))))

  (read-line port))



(call-with-input-file 'file read-file) ; doesnt work

y doesnt work ;_;

Name: Anonymous 2008-01-27 8:14

>>3
Either the lambda or the syntatic sugar that anti-cudder Abelson likes.

Do the pure (define read-file (labda (port) ...)

Newer Posts