Browse Source

* fixed function result handling for procedure which are inlinable

git-svn-id: trunk@2461 -
florian 19 years ago
parent
commit
68016e4db2
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/sparc/cpupara.pas

+ 1 - 1
compiler/sparc/cpupara.pas

@@ -190,7 +190,7 @@ implementation
              begin
              begin
                p.funcretloc[side].loc:=LOC_REGISTER;
                p.funcretloc[side].loc:=LOC_REGISTER;
                p.funcretloc[side].size:=retcgsize;
                p.funcretloc[side].size:=retcgsize;
-               if (side=callerside)  or (po_inline in p.procoptions)then
+               if (side=callerside) then
                  p.funcretloc[side].register:=newreg(R_INTREGISTER,RS_FUNCTION_RESULT_REG,cgsize2subreg(retcgsize))
                  p.funcretloc[side].register:=newreg(R_INTREGISTER,RS_FUNCTION_RESULT_REG,cgsize2subreg(retcgsize))
                else
                else
                  p.funcretloc[side].register:=newreg(R_INTREGISTER,RS_FUNCTION_RETURN_REG,cgsize2subreg(retcgsize));
                  p.funcretloc[side].register:=newreg(R_INTREGISTER,RS_FUNCTION_RETURN_REG,cgsize2subreg(retcgsize));