Apple-2-SW/prog8
1
0
Fork 0
mirror of https://github.com/irmen/prog8.git synced 2025-02-16 22:30:46 +00:00
Code Issues Projects Releases Wiki Activity

fix invalid assembly for @(address)++/--

Browse Source
This commit is contained in:
Irmen de Jong 2020-03-26 01:13:20 +01:00
parent fab224f509
commit b734dc44fd
1 changed files with 14 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
compiler/src/prog8/compiler/target/c64/codegen/PostIncrDecrAsmGen.kt
View File

@ -66,7 +66,20 @@ internal class PostIncrDecrAsmGen(private val program: Program, private val asmg
}
is IdentifierReference -> {
val what = asmgen.asmIdentifierName(addressExpr)
asmgen.out(if(incr) " inc $what" else " dec $what")
asmgen.out("""
ldy $what
sty ${C64Zeropage.SCRATCH_W1}
ldy $what+1
sty ${C64Zeropage.SCRATCH_W1 + 1}
ldy #0
lda (${C64Zeropage.SCRATCH_W1}),y
""")
if(incr)
asmgen.out(" clc | adc #1")
else
asmgen.out(" sec | sbc #1")
asmgen.out(" sta (${C64Zeropage.SCRATCH_W1}),y")
}
else -> throw AssemblyError("weird target type $targetMemory")
}