Răsfoiți Sursa

* fixed compilation for non-ARM

git-svn-id: trunk@5380 -
Jonas Maebe 18 ani în urmă
părinte
comite
7528e074a5
1 a modificat fișierele cu 2 adăugiri și 2 ștergeri
  1. 2 2
      compiler/aoptobj.pas

+ 2 - 2
compiler/aoptobj.pas

@@ -1058,9 +1058,9 @@ Unit AoptObj;
                                   GetNextInstruction(hp1, hp2) and
                                   FindLabel(tasmlabel(taicpu(p).oper[0]^.ref^.symbol), hp2) then
                                 begin
-                                  if (taicpu(p).opcode=aopt_condjmp) and
+                                  if (taicpu(p).opcode=aopt_condjmp)
 {$ifdef arm}
-                                    (taicpu(p).condition<>C_None)
+                                    and (taicpu(p).condition<>C_None)
 {$endif arm}
                                   then
                                     begin