nybble
/
jumpforth
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

disallow interpreting string literals in bootstrap mode

This commit is contained in:
Jesse D. McDonald 2020-10-24 14:08:09 -05:00
parent 36e704b6cb
commit f89a98e0b0
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
jumpforth.S
View File

@ -1366,7 +1366,8 @@ defword INTERPRET
.int LIT,LITSTRING,COMMA,HERE,LIT,0,COMMABYTE .int LIT,LITSTRING,COMMA,HERE,LIT,0,COMMABYTE
.int READSTRING,ROT,STOREBYTE,DROP,ALIGN,EXIT .int READSTRING,ROT,STOREBYTE,DROP,ALIGN,EXIT
/* ELSE */ /* ELSE */
0: .int READSTRING,EXIT litstring "Tried to interpret a string literal\n"
.int TYPE,BAILOUT
/* ELSE */ /* ELSE */
1: .int WORD,TWODUP,PARSENUMBER,ZBRANCH,(3f - .) 1: .int WORD,TWODUP,PARSENUMBER,ZBRANCH,(3f - .)
.int NROT,TWODROP .int NROT,TWODROP