Quellcode durchsuchen

* skip comments properly when searching for places for constant pool distances

git-svn-id: trunk@21307 -
florian vor 13 Jahren
Ursprung
Commit
2560266e5d
1 geänderte Dateien mit 2 neuen und 2 gelöschten Zeilen
  1. 2 2
      compiler/arm/aasmcpu.pas

+ 2 - 2
compiler/arm/aasmcpu.pas

@@ -945,8 +945,8 @@ implementation
               begin
                 penalty:=1;
                 hp:=tai(hp.next);
-                { skip register allocations inserted by the optimizer }
-                while assigned(hp) and (hp.typ=ait_regalloc) do
+                { skip register allocations and comments inserted by the optimizer }
+                while assigned(hp) and (hp.typ in [ait_comment,ait_regalloc]) do
                   hp:=tai(hp.next);
                 while assigned(hp) and (hp.typ=ait_const) do
                   begin