Apple-2-SW/prog8
1
0
Fork 0
mirror of https://github.com/irmen/prog8.git synced 2025-04-04 11:32:21 +00:00
Code Issues Projects Releases Wiki Activity

another compiler crash fixed when dealing with functioncall returning a str

Browse Source
This commit is contained in:
Irmen de Jong 2020-10-04 21:11:42 +02:00
parent 90b303fc03
commit d778cdcd61
1 changed files with 12 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
compiler/src/prog8/compiler/target/c64/codegen/assignment/AssignmentAsmGen.kt
View File

@ -222,6 +222,18 @@ internal class AssignmentAsmGen(private val program: Program, private val asmgen
jsr floats.pop_float
""")
}
DataType.STR -> {
asmgen.out("""
lda #<${target.asmVarname}
sta P8ZP_SCRATCH_W1
lda #>${target.asmVarname}
sta P8ZP_SCRATCH_W1+1
inx
lda P8ESTACK_HI,x
tay
lda P8ESTACK_LO,x
jsr prog8_lib.strcpy""")
}
else -> throw AssemblyError("weird target variable type ${target.datatype}")
}
}
@ -373,7 +385,6 @@ internal class AssignmentAsmGen(private val program: Program, private val asmgen
}
DataType.STR, DataType.ARRAY_UB, DataType.ARRAY_B -> {
asmgen.out("""
; copy a string (must be 0-terminated) from A/Y to (P8ZP_SCRATCH_W1)
lda #<${target.asmVarname}
sta P8ZP_SCRATCH_W1
lda #>${target.asmVarname}