Browse Source

* another use_fixed_stack fix

git-svn-id: trunk@2865 -
Jonas Maebe 19 years ago
parent
commit
8ef01e93c1
1 changed files with 2 additions and 1 deletions
  1. 2 1
      compiler/ncgutil.pas

+ 2 - 1
compiler/ncgutil.pas

@@ -1845,7 +1845,8 @@ implementation
         if current_procinfo.procdef.proccalloption in clearstack_pocalls then
           begin
             parasize:=0;
-            if paramanager.ret_in_param(current_procinfo.procdef.rettype.def,current_procinfo.procdef.proccalloption) then
+            if not(use_fixed_stack) and
+               paramanager.ret_in_param(current_procinfo.procdef.rettype.def,current_procinfo.procdef.proccalloption) then
               inc(parasize,sizeof(aint));
           end
         else