summaryrefslogtreecommitdiff
path: root/module/language/elisp/lexer.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/language/elisp/lexer.scm')
-rw-r--r--module/language/elisp/lexer.scm5
1 files changed, 4 insertions, 1 deletions
diff --git a/module/language/elisp/lexer.scm b/module/language/elisp/lexer.scm
index 5a0e6b3ff..8152a1182 100644
--- a/module/language/elisp/lexer.scm
+++ b/module/language/elisp/lexer.scm
@@ -20,6 +20,7 @@
(define-module (language elisp lexer)
#:use-module (ice-9 regex)
+ #:use-module (language elisp runtime)
#:export (get-lexer get-lexer/1))
;;; This is the lexical analyzer for the elisp reader. It is
@@ -316,7 +317,9 @@
(let ((cur (read-char port)))
(case cur
((#\")
- (return 'string (list->string (reverse result-chars))))
+ (return 'string
+ (make-lisp-string
+ (list->string (reverse result-chars)))))
((#\\)
(let ((escaped (read-char port)))
(case escaped