Parcourir la source

* fixed insertpcrelativedata when case jump table is used.

git-svn-id: trunk@5468 -
yury il y a 19 ans
Parent
commit
a4407d5ad2
1 fichiers modifiés avec 4 ajouts et 1 suppressions
  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