Browse Source

* fix m68k IE after e9acd759, patch by Yuriy Sydorov

Karoly Balogh 3 years ago
parent
commit
06da0b3db6
1 changed files with 1 additions and 0 deletions
  1. 1 0
      compiler/m68k/rgcpu.pas

+ 1 - 0
compiler/m68k/rgcpu.pas

@@ -146,6 +146,7 @@ unit rgcpu;
                 begin
                   { source can be replaced if dest is register... }
                   if ((instr.oper[1]^.typ=top_reg) and
+                      (getregtype(instr.oper[1]^.reg)=regtype) and
                       (get_alias(getsupreg(instr.oper[1]^.reg))<>orgreg) and
                      ((instr.opcode=A_MOVE) or (instr.opcode=A_ADD) or (instr.opcode=A_SUB) or
                       (instr.opcode=A_AND) or (instr.opcode=A_OR) or (instr.opcode=A_CMP))) or