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
> MIT-Scheme-users@gnu.org
> https://lists.gnu.org/mailman/listinfo/mit-scheme-users
> 
> 
calderon.christian...@yahoo.com
-- 
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
MIT-Scheme-users@gnu.org
https://lists.gnu.org/mailman/listinfo/mit-scheme-users

Reply via email to