Browse Source

* Add operator size to "ret immidiate" instruction

git-svn-id: trunk@607 -
daniel 20 years ago
parent
commit
9989bb0d3c
1 changed files with 2 additions and 2 deletions
  1. 2 2
      compiler/i386/cgcpu.pas

+ 2 - 2
compiler/i386/cgcpu.pas

@@ -285,7 +285,7 @@ unit cgcpu;
            { complex return values are removed from stack in C code PM }
            { complex return values are removed from stack in C code PM }
            if paramanager.ret_in_param(current_procinfo.procdef.rettype.def,
            if paramanager.ret_in_param(current_procinfo.procdef.rettype.def,
                                        current_procinfo.procdef.proccalloption) then
                                        current_procinfo.procdef.proccalloption) then
-             list.concat(Taicpu.Op_const(A_RET,S_NO,sizeof(aint)))
+             list.concat(Taicpu.Op_const(A_RET,S_W,sizeof(aint)))
            else
            else
              list.concat(Taicpu.Op_none(A_RET,S_NO));
              list.concat(Taicpu.Op_none(A_RET,S_NO));
          end
          end
@@ -297,7 +297,7 @@ unit cgcpu;
            { parameters are limited to 65535 bytes because ret allows only imm16 }
            { parameters are limited to 65535 bytes because ret allows only imm16 }
            if (parasize>65535) then
            if (parasize>65535) then
              CGMessage(cg_e_parasize_too_big);
              CGMessage(cg_e_parasize_too_big);
-           list.concat(Taicpu.Op_const(A_RET,S_NO,parasize));
+           list.concat(Taicpu.Op_const(A_RET,S_W,parasize));
          end;
          end;
       end;
       end;