Pārlūkot izejas kodu

* set the MZ exe section limit to 640k

git-svn-id: trunk@31348 -
nickysn 10 gadi atpakaļ
vecāks
revīzija
0fb92b803b
1 mainītis faili ar 2 papildinājumiem un 0 dzēšanām
  1. 2 0
      compiler/ogomf.pas

+ 2 - 0
compiler/ogomf.pas

@@ -1677,6 +1677,8 @@ implementation
         inherited create;
         CExeSection:=TMZExeSection;
         CObjData:=TOmfObjData;
+        { "640K ought to be enough for anybody" :) }
+        MaxMemPos:=$9FFFF;
       end;
 
 {****************************************************************************