It worked thanks. Here is what i've done.
(define (list-lines-from-file file)
(let ((next-line (read-line file)))
(if (eof-object? next-line)
'()
(cons next-line (list-lines-from-file file)))))
Try the read-line procedure.
>
> _______________________________________________
> MIT-Scheme-users mailing list
> [email protected]
> https://lists.gnu.org/mailman/listinfo/mit-scheme-users
>
>
[email protected]
--
View this message in context:
http://old.nabble.com/Reading-files-in-mit-scheme-tp33171524p33177546.html
Sent from the Gnu - MIT Scheme - Users mailing list archive at Nabble.com.
_______________________________________________
MIT-Scheme-users mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/mit-scheme-users
