2
0
Эх сурвалжийг харах

* missing instruction type check

git-svn-id: trunk@33945 -
Jonas Maebe 9 жил өмнө
parent
commit
cf6c7a0a1d

+ 1 - 0
compiler/x86/aoptx86.pas

@@ -910,6 +910,7 @@ unit aoptx86;
           GetNextIntruction_p and
           (hp1.typ = ait_instruction) and
           GetNextInstruction(hp1, hp2) and
+          (hp2.typ = ait_instruction) and
           MatchInstruction(taicpu(hp2),A_MOV,[]) and
           OpsEqual(taicpu(hp2).oper[1]^, taicpu(p).oper[0]^) and
           (IsFoldableArithOp(taicpu(hp1), taicpu(p).oper[1]^.reg) or