* name the 'FAR_DATA' class segments as module_name+'_DATA'

git-svn-id: trunk@31499 -

compiler/ogomf.pas

@@ -523,6 +523,8 @@ implementation
           Result:=aname
         else if omf_secnames[atype]=omf_secnames[sec_code] then
           Result:=CodeSectionName(aname)
+        else if omf_segclass(atype)='FAR_DATA' then
+          Result:=current_module.modulename^ + '_DATA'
         else
           Result:=omf_secnames[atype];
       end;

compiler/x86/agx86nsm.pas

@@ -548,6 +548,8 @@ interface
           begin
             if secnames[atype]='.text' then
               secname:=CodeSectionName(aname)
+            else if omf_segclass(atype)='FAR_DATA' then
+              secname:=current_module.modulename^ + '_DATA'
             else
               secname:=omf_secnames[atype];
             AsmWrite(secname);