Преглед на файлове

* fixed insertpcrelativedata when case jump table is used.

git-svn-id: trunk@5468 -
yury преди 18 години
родител
ревизия
a4407d5ad2
променени са 1 файла, в които са добавени 4 реда и са изтрити 1 реда
  1. 4 1
      compiler/arm/aasmcpu.pas

+ 4 - 1
compiler/arm/aasmcpu.pas

@@ -695,7 +695,10 @@ implementation
                       end;
                   end;
                 inc(curpos);
-              end;
+              end
+            else
+              if curtai.typ=ait_const then
+                inc(curpos);
 
             { split only at real instructions else the test below fails }
             if ((curpos-lastpos)>1016) and (curtai.typ=ait_instruction) and