From: firstname.lastname@example.org.EDU (back0003)
Any clues are welcome.
(let ((temp-line (read-line my-file)))
(if (= temp-line end-of-file) ;; How to test for EOF?
(if (string-match my-regular-expression temp-line)
From: email@example.com.EDU (Brian D. Carlstrom)
I couldn't find this in the manual myself. I had to look in scsh.scm.
Use EOF-OBJECT?. You guys! This is R4RS.
Jan's procedure would be written with the R4RS EOF-OBJECT? as
(let ((line (read-line my-file)))
(cond ((not (eof-object? line))
(cond ((string-match my-regular-expression line)