Parcourir la source

Disable overflow/range check in some part of the arm code

git-svn-id: trunk@49274 -
(cherry picked from commit d03c3c0669d0c135c8f1a832d73042823a267ddc)
pierre il y a 4 ans
Parent
commit
78dbdcb095
2 fichiers modifiés avec 7 ajouts et 0 suppressions
  1. 4 0
      compiler/arm/aasmcpu.pas
  2. 3 0
      compiler/arm/cpubase.pas

+ 4 - 0
compiler/arm/aasmcpu.pas

@@ -1590,6 +1590,9 @@ implementation
           end;
       end;
 
+{$push}
+{ Disable range and overflow checking here }
+{$R-}{$Q-}        
     procedure fix_invalid_imms(list: TAsmList);
       var
         curtai: tai;
@@ -1632,6 +1635,7 @@ implementation
           end;
       end;
 
+{$pop}
 
     procedure gather_it_info(list: TAsmList);
       var

+ 3 - 0
compiler/arm/cpubase.pas

@@ -576,6 +576,9 @@ unit cpubase;
       end;
 
 
+{$push}
+{ Disable range and overflow checking here }
+{$R-}{$Q-}        
     function is_thumb32_imm(d: aint): boolean;
       var
         t : aint;