diff options
Diffstat (limited to 'src/boot/strap/scanner.clisp')
-rw-r--r-- | src/boot/strap/scanner.clisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/boot/strap/scanner.clisp b/src/boot/strap/scanner.clisp index 9fcb1bef..42cb92e3 100644 --- a/src/boot/strap/scanner.clisp +++ b/src/boot/strap/scanner.clisp @@ -526,7 +526,7 @@ (SETQ |$n| (+ |$n| 1)) (|SoftShoeError| (CONS |$linepos| |n|) (CONCAT "The character whose number is " - (STRINGIMAGE (QENUM |$ln| |n|)) + (WRITE-TO-STRING (QENUM |$ln| |n|)) " is not a Boot character")) (|shoeLeafError| (ELT |$ln| |n|)))))) |