6502/millfork
1
0
Fork 0
mirror of https://github.com/KarolS/millfork.git synced 2024-07-17 11:28:55 +00:00
Code Issues Projects Releases Wiki Activity

An instruction used for its opcode should not be elidable

Browse Source
This commit is contained in:
Karol Stasiak 2018-01-04 01:08:47 +01:00
parent 504cb56ee7
commit 1f020e2ced
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/main/scala/millfork/compiler/DecimalBuiltIns.scala
View File

@ -52,15 +52,16 @@ object DecimalBuiltIns {
val constantLabel = MlCompiler.nextLabel("c8")
val skipHiDigit = MlCompiler.nextLabel("ds")
val skipLoDigit = MlCompiler.nextLabel("ds")
val bit = if (ctx.options.flags(CompilationFlag.EmitCmosOpcodes)) {
val cmos = ctx.options.flags(CompilationFlag.EmitCmosOpcodes)
val bit = if (cmos) {
AssemblyLine.immediate(BIT, 8)
} else {
AssemblyLine.absolute(BIT, Label(constantLabel))
}
List(
if (rotate) AssemblyLine.implied(ROR) else AssemblyLine.implied(LSR),
AssemblyLine.label(constantLabel),
AssemblyLine.implied(PHP),
AssemblyLine(LABEL, DoesNotExist, Label(constantLabel).toAddress, elidable = cmos),
AssemblyLine(PHP, Implied, Constant.Zero, elidable = cmos),
AssemblyLine.relative(BPL, skipHiDigit),
AssemblyLine.implied(SEC),
AssemblyLine.immediate(SBC, 0x30),