mirror of
https://github.com/dschmenk/PLASMA.git
synced 2025-02-01 10:31:17 +00:00
Cleanup
This commit is contained in:
parent
7f46144911
commit
23aaef442d
BIN
PLASMA-BLD2.PO
BIN
PLASMA-BLD2.PO
Binary file not shown.
BIN
PLASMA-DEM2.PO
BIN
PLASMA-DEM2.PO
Binary file not shown.
BIN
PLASMA-SYS2.PO
BIN
PLASMA-SYS2.PO
Binary file not shown.
@ -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
|
||||
|
Loading…
x
Reference in New Issue
Block a user