* use the TMZExeOutput.MZFlatContentSection property in TInternalLinkerMsDos.GetTotalSizeForSegmentClass

  instead of finding the exe section by name

git-svn-id: trunk@31387 -

compiler/ogomf.pas

@@ -280,7 +280,6 @@ interface
         function writeCom:boolean;
         property ExeUnifiedLogicalSegments: TFPHashObjectList read FExeUnifiedLogicalSegments;
         property ExeUnifiedLogicalGroups: TFPHashObjectList read FExeUnifiedLogicalGroups;
-        property MZFlatContentSection: TMZExeSection read GetMZFlatContentSection;
         property Header: TMZExeHeader read FHeader;
       protected
         procedure Load_Symbol(const aname:string);override;
@@ -291,6 +290,7 @@ interface
       public
         constructor create;override;
         destructor destroy;override;
+        property MZFlatContentSection: TMZExeSection read GetMZFlatContentSection;
       end;
 
       TOmfAssembler = class(tinternalassembler)

compiler/systems/t_msdos.pas

@@ -407,7 +407,7 @@ var
   i: Integer;
 begin
   Result:=0;
-  objseclist:=aExeOutput.FindExeSection('.MZ_flat_content').ObjSectionList;
+  objseclist:=TMZExeOutput(aExeOutput).MZFlatContentSection.ObjSectionList;
   for i:=0 to objseclist.Count-1 do
     begin
       objsec:=TOmfObjSection(objseclist[i]);