Explorar o código

* 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 %!s(int64=10) %!d(string=hai) anos
pai
achega
0eb1cd157a
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  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