6502/PLASMA
1
0
Fork 0
mirror of https://github.com/dschmenk/PLASMA.git synced 2025-02-11 17:30:29 +00:00
Code Issues Projects Releases Wiki Activity

Remove checks from '[' and ']'. Apparently unneeded and unwanted

Browse Source
This commit is contained in:
David Schmenk 2024-01-22 10:17:58 -08:00
parent 4364319176
commit 2578b1a3fb
1 changed files with 2 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
src/toolsrc/plforth.pla
View File

@ -51,7 +51,6 @@ const comp_flag = comp_itc_flag | comp_pbc_flag
//
byte comp_mode = comp_itc_flag
byte state = 0
byte savestate = 0
word brkentry = 0
word brkcfa = 0
byte brk = 0
@ -1336,16 +1335,10 @@ def _forcecomp_#0
fin
end
def _compoff_#0
savestate = state & comp_flag
state = state & ~comp_flag
state = state & ~comp_flag
end
def _compon_#0
state = state | savestate
savestate = 0
if not (state & comp_flag)
puts("] Not compiling\n")
_quit_
fin
state = state | comp_mode
end
def _componly_#0
^_ffa_(vlist) = ^_ffa_(vlist) | componly_flag