Browse Source

- removed bogus comment from TMZExeUnifiedLogicalSegment.CalcMemPos

git-svn-id: trunk@31423 -
nickysn 10 years ago
parent
commit
f41692710f
1 changed files with 1 additions and 2 deletions
  1. 1 2
      compiler/ogomf.pas

+ 1 - 2
compiler/ogomf.pas

@@ -1940,8 +1940,7 @@ implementation
             if (objsec.MemPos+objsec.Size)>MaxMemPos then
             if (objsec.MemPos+objsec.Size)>MaxMemPos then
               MaxMemPos:=objsec.MemPos+objsec.Size;
               MaxMemPos:=objsec.MemPos+objsec.Size;
           end;
           end;
-        { align *down* on a paragraph boundary }
-        MemPos:={(MinMemPos shr 4) shl 4}MinMemPos;
+        MemPos:=MinMemPos;
         Size:=MaxMemPos-MemPos;
         Size:=MaxMemPos-MemPos;
       end;
       end;