Просмотр исходного кода

* 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 лет назад
Родитель
Сommit
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$*))');