Ver Fonte

Handle po_nostackframe for arm cpu

git-svn-id: trunk@22720 -
pierre há 12 anos atrás
pai
commit
a8591af2a9
1 ficheiros alterados com 7 adições e 0 exclusões
  1. 7 0
      compiler/arm/cpupi.pas

+ 7 - 0
compiler/arm/cpupi.pas

@@ -63,6 +63,13 @@ unit cpupi;
           is especially a problem when taking the address of a local. For now,
           this extra memory should hurt less than generating all local contants with offsets
           >256 as non shifter constants }
+        if (po_nostackframe in procdef.procoptions) then
+          begin
+             { maxpushedparasize sghould be zero,
+               if not we will get an error later. }
+             tg.setfirsttemp(maxpushedparasize);
+             exit;
+          end;
         if tg.direction = -1 then
           begin
             if (target_info.system<>system_arm_darwin) then