Explorar o código

Also check that HP1 is a jump instruction with more than one operand to exit early

git-svn-id: trunk@45786 -
pierre %!s(int64=5) %!d(string=hai) anos
pai
achega
0e9fc31dd7
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      compiler/aoptobj.pas

+ 1 - 1
compiler/aoptobj.pas

@@ -1947,7 +1947,7 @@ Unit AoptObj;
         { Do not try to optimize if the test generating the condition
           is the same instruction, like 'bne	$v0,$zero,.Lj3' for MIPS }
         if (taicpu(p).ops>1) or ((hp1.typ=ait_instruction) and
-            (taicpu(hp1).ops>1)) then
+            IsJumpToLabel(taicpu(hp1)) and (taicpu(hp1).ops>1)) then
            exit;
         while (hp1 <> BlockEnd) do
           begin