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

+ enable the ISSHAREDLIBRARY option for the win16 internal linker when creating a dll

git-svn-id: trunk@42636 -
nickysn 6 лет назад
Родитель
Сommit
4cd8193c79
1 измененных файлов с 2 добавлено и 0 удалено
  1. 2 0
      compiler/systems/t_win16.pas

+ 2 - 0
compiler/systems/t_win16.pas

@@ -361,6 +361,8 @@ procedure TInternalLinkerWin16.DefaultLinkScript;
 var
   s: TCmdStr;
 begin
+  if IsSharedLibrary then
+    LinkScript.Concat('ISSHAREDLIBRARY');
   { add objectfiles, start with prt0 always }
   case current_settings.x86memorymodel of
     mm_small:   LinkScript.Concat('READOBJECT ' + maybequoted(FindObjectFile('prt0s','',false)));