cs: fix error with a single symbol argument

Closes #2379
2018-11-17 15:06:55 -07:00 · 2018-11-17 15:06:55 -07:00 · f6eb956199
commit f6eb956199
parent c1c110f662
1 changed files with 1 additions and 1 deletions
--- a/racket/src/io/error/main.rkt
+++ b/racket/src/io/error/main.rkt
@ -19,7 +19,7 @@
         (null? args))
    (raise
     (exn:fail
-      (format "error: ~a" init)
+      (string-append "error: " (symbol->string init))
      (current-continuation-marks)))]
   [(symbol? init)
    (unless (string? (car args))