浏览代码

* fixed win64 coff writing

git-svn-id: trunk@3493 -
florian 19 年之前
父节点
当前提交
688547953d
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/ogcoff.pas

+ 1 - 1
compiler/ogcoff.pas

@@ -809,7 +809,6 @@ const win32stub : array[0..131] of byte=(
                   inc(address,relocval);
                   inc(address,relocval);
                 end;
                 end;
 {$ifdef x86_64}
 {$ifdef x86_64}
-              RELOC_ABSOLUTE32,
               { 64 bit coff only }
               { 64 bit coff only }
               RELOC_RELATIVE_1:
               RELOC_RELATIVE_1:
                 begin
                 begin
@@ -836,6 +835,7 @@ const win32stub : array[0..131] of byte=(
                   address:=address-mempos+relocval;
                   address:=address-mempos+relocval;
                   dec(address,objreloc.dataoffset+5);
                   dec(address,objreloc.dataoffset+5);
                 end;
                 end;
+              RELOC_ABSOLUTE32,
 {$endif x86_64}
 {$endif x86_64}
               RELOC_ABSOLUTE :
               RELOC_ABSOLUTE :
                 begin
                 begin