浏览代码

* modified patch of Sergey Shishmintzev: add a __text_start symbol if an external linker is used, resolves #26190

git-svn-id: trunk@38235 -
florian 7 年之前
父节点
当前提交
0baf3f69d8
共有 1 个文件被更改,包括 1 次插入0 次删除
  1. 1 0
      compiler/systems/t_win.pas

+ 1 - 0
compiler/systems/t_win.pas

@@ -1251,6 +1251,7 @@ implementation
             Add('  . = ALIGN(__section_alignment__);');
             Add('  .text  __image_base__ + ( __section_alignment__ < 0x1000 ? . : __section_alignment__ ) :');
             Add('  {');
+            Add('    __text_start__ = . ;');
             Add('    *(.init)');
             add('    *(.text .stub .text.* .gnu.linkonce.t.*)');
             Add('    *(SORT(.text$*))');