wingo pushed a commit to branch master
in repository guile.
commit 079800d68291b27a7c9b66d183bf79eb22808fc5
Author: Andy Wingo <wi...@pobox.com>
AuthorDate: Wed Mar 3 16:20:53 2021 +0100
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.
---
module/ice-9/read.scm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/module/ice-9/read.scm b/module/ice-9/read.scm
index 8a6c56c..7ce4b41 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 #\#)
