mirror of
https://github.com/irmen/prog8.git
synced 2024-10-07 15:57:03 +00:00
fix cx16 word sign extend in bitshift
This commit is contained in:
parent
fe4e0e9835
commit
a6f3c84e28
@ -1 +1 @@
|
|||||||
4.1
|
4.2-SNAPSHOT
|
||||||
|
@ -103,14 +103,9 @@ internal class ExpressionsAsmGen(private val program: Program, private val asmge
|
|||||||
asmgen.out("""
|
asmgen.out("""
|
||||||
lda P8ESTACK_LO+1,x
|
lda P8ESTACK_LO+1,x
|
||||||
ora #$7f
|
ora #$7f
|
||||||
bmi +""")
|
bmi +
|
||||||
if(CompilationTarget.machine.cpu==CpuType.CPU65c02)
|
lda #0
|
||||||
asmgen.out("""
|
+ sta P8ESTACK_HI+1,x""")
|
||||||
+ stz P8ESTACK_HI+1,x""")
|
|
||||||
else
|
|
||||||
asmgen.out("""
|
|
||||||
lda #0
|
|
||||||
+ sta P8ESTACK_HI+1,x""")
|
|
||||||
}
|
}
|
||||||
DataType.FLOAT -> asmgen.out(" jsr c64flt.stack_b2float")
|
DataType.FLOAT -> asmgen.out(" jsr c64flt.stack_b2float")
|
||||||
in PassByReferenceDatatypes -> throw AssemblyError("cannot cast to a pass-by-reference datatype")
|
in PassByReferenceDatatypes -> throw AssemblyError("cannot cast to a pass-by-reference datatype")
|
||||||
|
Loading…
Reference in New Issue
Block a user