diff options
| author | Andy Wingo <wingo@pobox.com> | 2021-03-03 16:20:53 +0100 |
|---|---|---|
| committer | Andy Wingo <wingo@pobox.com> | 2021-03-03 16:22:56 +0100 |
| commit | 079800d68291b27a7c9b66d183bf79eb22808fc5 (patch) | |
| tree | 237d4759f14efbf1b5f0ad9da370d7572c8a3f00 /module/ice-9 | |
| parent | dba766907715ccab11936edf2b1dc10905c15c63 (diff) | |
| download | guile-079800d68291b27a7c9b66d183bf79eb22808fc5.tar.gz | |
Fix unterminated #!...!# error message in Scheme reader
* module/ice-9/read.scm (%read): Tweak "unterminated block constant"
error to be more compatible with C reader.
Diffstat (limited to 'module/ice-9')
| -rw-r--r-- | module/ice-9/read.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/module/ice-9/read.scm b/module/ice-9/read.scm index 8a6c56c8b..7ce4b416a 100644 --- a/module/ice-9/read.scm +++ b/module/ice-9/read.scm @@ -755,7 +755,7 @@ (let lp ((ch (next))) (cond ((eof-object? ch) - (error "unexpected end of input while looking for !#")) + (error "unterminated `#! ... !#' comment")) ((eqv? ch #\!) (let ((ch (next))) (if (eqv? ch #\#) |