2014-11-01: also check for the eof-object

also check for the eof-object

diff --git a/wisp-scheme.w b/wisp-scheme.w
--- a/wisp-scheme.w
+++ b/wisp-scheme.w
@@ -106,7 +106,7 @@ define : wisp-read port
            : peeked '()
              repr-symbol #f
            cond
-             : or (equal? #\space (peek-char port)) (equal? #\newline (peek-char port)) (equal? #\( (peek-char port))
+             : or (eof-object? (peek-char port)) (equal? #\space (peek-char port)) (equal? #\newline (peek-char port)) (equal? #\( (peek-char port))
                if repr-symbol ; found a special symbol, return it.
                   . repr-symbol
                   let unpeek