aboutsummaryrefslogtreecommitdiff
path: root/frontend/scanner.icl
diff options
context:
space:
mode:
Diffstat (limited to 'frontend/scanner.icl')
-rw-r--r--frontend/scanner.icl1
1 files changed, 1 insertions, 0 deletions
diff --git a/frontend/scanner.icl b/frontend/scanner.icl
index c2a0282..5ea3e50 100644
--- a/frontend/scanner.icl
+++ b/frontend/scanner.icl
@@ -971,6 +971,7 @@ ScanChar :: !Input ![Char] -> (!Token, !Input)
ScanChar input chars
# (eof, c, input) = ReadNormalChar input
| eof = (ErrorToken "End of file inside Char denotation", input)
+ | '\'' == c = (CharListToken "", input)
| '\\' <> c = ScanEndOfChar 1 [c: chars] input
= ScanBSChar 0 chars input ScanEndOfChar