mirror of
https://github.com/KarolS/millfork.git
synced 2024-10-31 14:04:58 +00:00
Z80: fix an optimization
This commit is contained in:
parent
f4d2fdd370
commit
75cc34663c
@ -174,6 +174,11 @@ class ChangeRegisterPair(preferBC2DE: Boolean) extends AssemblyOptimization[ZLin
|
||||
case (x@ZLine0(_, TwoRegisters(r, BC), _)) :: xs =>
|
||||
x.copy(registers = TwoRegisters(r, DE)) :: switchBC2DE(xs)
|
||||
|
||||
case (x@ZLine0(_, TwoRegisters(MEM_BC, r), _)) :: xs =>
|
||||
x.copy(registers = TwoRegisters(MEM_DE, r)) :: switchBC2DE(xs)
|
||||
case (x@ZLine0(_, TwoRegisters(r, MEM_BC), _)) :: xs =>
|
||||
x.copy(registers = TwoRegisters(r, MEM_DE)) :: switchBC2DE(xs)
|
||||
|
||||
case (x@ZLine0(_, TwoRegisters(B, r), _)) :: xs =>
|
||||
x.copy(registers = TwoRegisters(D, r)) :: switchBC2DE(xs)
|
||||
case (x@ZLine0(_, TwoRegisters(r, B), _)) :: xs =>
|
||||
@ -222,6 +227,11 @@ class ChangeRegisterPair(preferBC2DE: Boolean) extends AssemblyOptimization[ZLin
|
||||
case (x@ZLine0(_, TwoRegisters(r, DE), _)) :: xs =>
|
||||
x.copy(registers = TwoRegisters(r, BC)) :: switchDE2BC(xs)
|
||||
|
||||
case (x@ZLine0(_, TwoRegisters(MEM_DE, r), _)) :: xs =>
|
||||
x.copy(registers = TwoRegisters(MEM_BC, r)) :: switchDE2BC(xs)
|
||||
case (x@ZLine0(_, TwoRegisters(r, MEM_DE), _)) :: xs =>
|
||||
x.copy(registers = TwoRegisters(r, MEM_BC)) :: switchDE2BC(xs)
|
||||
|
||||
case (x@ZLine0(_, TwoRegisters(D, r), _)) :: xs =>
|
||||
x.copy(registers = TwoRegisters(B, r)) :: switchDE2BC(xs)
|
||||
case (x@ZLine0(_, TwoRegisters(r, D), _)) :: xs =>
|
||||
|
Loading…
Reference in New Issue
Block a user