From a2a4e86bacf2de9ce1c11c6f9f6efa508a396414 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Sat, 11 Feb 2017 00:32:54 -0800 Subject: [PATCH] Change implementation of #\ to show all "graphic" characters. This isn't quite right -- it doesn't support Unicode very well -- but will do for now. --- src/runtime/char.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/runtime/char.scm b/src/runtime/char.scm index 62902286b..c8c137529 100644 --- a/src/runtime/char.scm +++ b/src/runtime/char.scm @@ -243,7 +243,7 @@ USA. (cond ((code->name code)) ((not (fix:< code #x80)) (string-append "x" (number->string code 16))) - ((scalar-value-in-char-set? code char-set:symbol-constituent) + ((scalar-value-in-char-set? code char-set:graphic) (string (integer->char code))) ((and (if (default-object? slashify?) #f slashify?) (not (fix:= 0 bits))) -- 2.25.1