Apple-2-SW/prog8
1
0
Fork 0
mirror of https://github.com/irmen/prog8.git synced 2024-12-24 16:29:21 +00:00
Code Issues Projects Releases Wiki Activity

fix possible register corruption when calling asmsubs that require Carry flag as a parameter

Browse Source
This commit is contained in:
Irmen de Jong 2023-09-24 14:03:31 +02:00
parent 1da0c59182
commit 8d177beb78
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
codeGenCpu6502/src/prog8/codegen/cpu6502/FunctionCallAsmGen.kt
View File

@ -141,13 +141,14 @@ internal class FunctionCallAsmGen(private val program: PtProgram, private val as
} }
is PtIdentifier -> { is PtIdentifier -> {
val sourceName = asmgen.asmVariableName(value) val sourceName = asmgen.asmVariableName(value)
// note: cannot use X register here to store A because it might be used for other arguments
asmgen.out(""" asmgen.out("""
tax pha
clc clc
lda $sourceName lda $sourceName
beq + beq +
sec sec
+ txa""") + pla""")
} }
else -> { else -> {
asmgen.assignExpressionToRegister(value, RegisterOrPair.A) asmgen.assignExpressionToRegister(value, RegisterOrPair.A)