* show section addresses relative to the segment's MemBasePos in the i8086-msdos

  internal linker map file

git-svn-id: trunk@31380 -

compiler/ogomf.pas

@@ -494,7 +494,8 @@ implementation
 
     function TOmfObjSection.MemPosStr(AImageBase: qword): string;
       begin
-        Result:=HexStr(MemPos shr 4,4)+':'+HexStr(MemPos and $000f,4);
+        Result:=HexStr(MZExeUnifiedLogicalSegment.MemBasePos shr 4,4)+':'+
+          HexStr(MemPos-MZExeUnifiedLogicalSegment.MemBasePos,4);
       end;
 
 {****************************************************************************