mirror of
https://github.com/justinethier/cyclone.git
synced 2025-07-15 16:57:35 +02:00
Allow escaped newline in a string
This commit is contained in:
parent
d058f33933
commit
86b6c0964e
1 changed files with 2 additions and 0 deletions
|
@ -320,6 +320,8 @@
|
||||||
((or (equal? #\" c)
|
((or (equal? #\" c)
|
||||||
(equal? #\\ c))
|
(equal? #\\ c))
|
||||||
(cons c buf))
|
(cons c buf))
|
||||||
|
((equal? #\n c)
|
||||||
|
(cons #\newline buf))
|
||||||
(else
|
(else
|
||||||
(parse-error "invalid escape character in string"
|
(parse-error "invalid escape character in string"
|
||||||
(in-port:get-lnum ptbl)
|
(in-port:get-lnum ptbl)
|
||||||
|
|
Loading…
Add table
Reference in a new issue