1
0
mirror of https://github.com/dschmenk/PLASMA.git synced 2025-02-01 10:31:17 +00:00
This commit is contained in:
David Schmenk 2018-04-11 22:16:30 -07:00
parent 7f46144911
commit 23aaef442d
4 changed files with 22 additions and 22 deletions

Binary file not shown.

Binary file not shown.

Binary file not shown.

View File

@ -366,14 +366,6 @@ def compiler(defptr)#0
codeptr = codeptr + 4
A_IS_TOS = TRUE // PHA
break
is $8C // INCR
//puts("INCR")
if not A_IS_TOS
^codeptr = $68; codeptr++ // PLA
fin
^codeptr = $1A; codeptr++ // INC A
A_IS_TOS = TRUE // PHA
break
is $3A // SUBI
i++
//puts("SUBI $"); putb(^(bytecode+i))
@ -385,14 +377,6 @@ def compiler(defptr)#0
codeptr = codeptr + 4
A_IS_TOS = TRUE // PHA
break
is $8E // DECR
//puts("DECR")
if not A_IS_TOS
^codeptr = $68; codeptr++ // PLA
fin
^codeptr = $3A; codeptr++ // DEC A
A_IS_TOS = TRUE // PHA
break
is $3C // ANDI
i++
//puts("ANDI $"); putb(^(bytecode+i))
@ -895,6 +879,22 @@ def compiler(defptr)#0
X_IS_IFP = FALSE
A_IS_TOS = FALSE
break
is $8C // INCR
//puts("INCR")
if not A_IS_TOS
^codeptr = $68; codeptr++ // PLA
fin
^codeptr = $1A; codeptr++ // INC A
A_IS_TOS = TRUE // PHA
break
is $8E // DECR
//puts("DECR")
if not A_IS_TOS
^codeptr = $68; codeptr++ // PLA
fin
^codeptr = $3A; codeptr++ // DEC A
A_IS_TOS = TRUE // PHA
break
is $90 // NEG
//puts("NEG")
if not A_IS_TOS