Răsfoiți Sursa

--- Merging r43185 into '.':
U compiler/ncgcal.pas

git-svn-id: branches/fixes_3_2@43437 -

Jonas Maebe 5 ani în urmă
părinte
comite
9a58d7bb65
1 a modificat fișierele cu 3 adăugiri și 1 ștergeri
  1. 3 1
      compiler/ncgcal.pas

+ 3 - 1
compiler/ncgcal.pas

@@ -1196,7 +1196,9 @@ implementation
            pop_parasize which uses pushedparasize to determine this
            pop_parasize which uses pushedparasize to determine this
 
 
            This does not apply to interrupt procedures, their ret statment never clears any stack parameters }
            This does not apply to interrupt procedures, their ret statment never clears any stack parameters }
-         else if paramanager.use_fixed_stack and not(po_interrupt in procdefinition.procoptions) then
+         else if paramanager.use_fixed_stack and
+                 not(po_interrupt in procdefinition.procoptions) and
+                 (target_info.abi=abi_linux386_sysv) then
            begin
            begin
              { however, a delphi style frame pointer for a nested subroutine
              { however, a delphi style frame pointer for a nested subroutine
                is not cleared by the callee, so we have to compensate for this
                is not cleared by the callee, so we have to compensate for this