瀏覽代碼

Remove unneeded typecasts in TryTOptimizeMove

git-svn-id: trunk@40123 -
pierre 6 年之前
父節點
當前提交
a015c779ff
共有 1 個文件被更改,包括 2 次插入2 次删除
  1. 2 2
      compiler/m68k/aoptcpu.pas

+ 2 - 2
compiler/m68k/aoptcpu.pas

@@ -199,9 +199,9 @@ unit aoptcpu;
         end;
 
       if GetNextInstruction(p,next) and
-         (taicpu(next).typ = ait_instruction) and
+         (next.typ = ait_instruction) and
          GetNextInstruction(next,next2) and
-         (taicpu(next2).typ = ait_instruction) and
+         (next2.typ = ait_instruction) and
          (taicpu(next).opcode <> taicpu(p).opcode) and
          (taicpu(next2).opcode = taicpu(p).opcode) and
          (taicpu(p).oper[0]^.typ = top_reg) and