6502/PLASMA
1
0
Fork 0
mirror of https://github.com/dschmenk/PLASMA.git synced 2025-03-24 13:35:24 +00:00
Code Issues Projects Releases Wiki Activity

Fix ISLE

Browse Source
This commit is contained in:
David Schmenk 2018-03-23 17:13:42 -07:00
parent 8b1ca4bf1e
commit efd1ff58e3
2 changed files with 3 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/libsrc/apple/jit.pla
View File

@ -710,9 +710,9 @@ def compiler(defptr)#0
break
is $4A
//puts("ISLE")
if A_IS_TOSL & TOSL_DIRTY
^codeptr = $95; codeptr++ // STA zp,X
^codeptr = $D0+VX; codeptr++ // ESTKL
if not A_IS_TOSL
^codeptr = $B5; codeptr++ // LDA zp,X
^codeptr = $D0+VX; codeptr++ // ESTKL
fin
^codeptr = $D5; codeptr++ // CMP zp,X
^codeptr = $D0+1+VX; codeptr++ // ESTKL+1

3
src/toolsrc/codegen.pla
View File

@ -435,9 +435,6 @@ def idmatch(nameptr, len, idptr, idcnt)
//for i = 1 to len
// if nameptr->[i - 1] <> idptr->idname.[i]; break; fin
//next
puts(@idptr->idname);putln
puti(i); putln
puti(len); putln
if i > len; return idptr; fin
fin
idptr = idptr + idptr->idname + t_id