Browse Source

* Relocating common symbols needs adjusting by symbol size only on DJCOFF targets, not on PECOFF ones.

git-svn-id: trunk@22068 -
sergei 13 năm trước cách đây
mục cha
commit
45d27ef82e
1 tập tin đã thay đổi với 4 bổ sung1 xóa
  1. 4 1
      compiler/ogcoff.pas

+ 4 - 1
compiler/ogcoff.pas

@@ -934,7 +934,10 @@ const pemagic : array[0..3] of byte = (
                 RELOC_ABSOLUTE :
                   begin
                     if oso_common in relocsec.secoptions then
-                      dec(address,objreloc.orgsize)
+                      begin
+                        if (not win32) then
+                          dec(address,objreloc.orgsize);
+                      end
                     else
                       begin
                         { fixup address when the symbol was known in defined object }