소스 검색

Remove another wrong typecast when testing that a tai is an instruction

git-svn-id: trunk@40131 -
pierre 6 년 전
부모
커밋
96460b70b2
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  1. 1 1
      compiler/m68k/aoptcpu.pas

+ 1 - 1
compiler/m68k/aoptcpu.pas

@@ -139,7 +139,7 @@ unit aoptcpu;
       result:=false;
 
       if GetNextInstruction(p,next) and 
-         (taicpu(next).typ = ait_instruction) and
+         (next.typ = ait_instruction) and
          (taicpu(next).opcode = taicpu(p).opcode) and
          (taicpu(p).opsize = taicpu(next).opsize) and
          (taicpu(p).oper[1]^.typ = top_reg) and