mirror of
https://github.com/nineties/planckforth
synced 2024-12-24 21:58:37 +01:00
Add escaped single and double quotes
This commit is contained in:
parent
d0bc652c5d
commit
4227ac0ce0
2 changed files with 5 additions and 0 deletions
|
@ -1177,6 +1177,8 @@ decimal \ set default to decimal
|
|||
'v' of 11 endof
|
||||
'f' of 12 endof
|
||||
'r' of 13 endof
|
||||
[char] ' of [char] ' endof
|
||||
[char] " of [char] " endof
|
||||
'\\' of '\\' endof
|
||||
drop -1
|
||||
endcase
|
||||
|
|
|
@ -614,6 +614,9 @@ T{ char HELLO -> 48 }T
|
|||
T{ '\n' -> 0xa }T
|
||||
T{ '\0' -> 0 }T
|
||||
T{ 'a' -> 61 }T
|
||||
T{ '"' -> 22 }T
|
||||
T{ '\"' -> 22 }T
|
||||
T{ '\'' -> 27 }T
|
||||
T{ : gc1 [char] X ; -> }T
|
||||
T{ : gc2 [char] HELLO ; -> }T
|
||||
T{ gc1 -> 58 }T
|
||||
|
|
Loading…
Reference in a new issue