Przeglądaj źródła

* don't subtract two from the end of the stack segment when calculating the
initial SP value - seems to be wlink compatible

git-svn-id: trunk@31399 -

nickysn 10 lat temu
rodzic
commit
0eb1cd157a
1 zmienionych plików z 1 dodań i 1 usunięć
  1. 1 1
      compiler/ogomf.pas

+ 1 - 1
compiler/ogomf.pas

@@ -2227,7 +2227,7 @@ implementation
         if assigned(stackseg) then
           begin
             Header.InitialSS:=stackseg.MemBasePos shr 4;
-            Header.InitialSP:=stackseg.MemPos+stackseg.Size-stackseg.MemBasePos-2;
+            Header.InitialSP:=stackseg.MemPos+stackseg.Size-stackseg.MemBasePos;
           end
         else
           begin