diff options
Diffstat (limited to 'pnm/read.scm')
| -rw-r--r-- | pnm/read.scm | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/pnm/read.scm b/pnm/read.scm index ae7676f..5cfec94 100644 --- a/pnm/read.scm +++ b/pnm/read.scm @@ -82,7 +82,14 @@ (define (whitespace? u8) (case (integer->char u8) - ((#\newline #\return #\tab #\space) #t) + ((#\newline + #\return + #\tab + #\space + #\x000B ;; Vertical Tab + #\x000c ;; Form Feed + ) + #t) (else #f))) (define (comment? u8) @@ -90,7 +97,7 @@ (define (newline? u8) (case (integer->char u8) - ((#\newline #\return) #t) + ((#\newline) #t) (else #f))) (define (read-comment in) |