Bläddra i källkod

* fixed insertpcrelativedata when case jump table is used.

git-svn-id: trunk@5468 -
yury 18 år sedan
förälder
incheckning
a4407d5ad2
1 ändrade filer med 4 tillägg och 1 borttagningar
  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