Explorar o código

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

git-svn-id: trunk@42636 -
nickysn %!s(int64=6) %!d(string=hai) anos
pai
achega
4cd8193c79
Modificáronse 1 ficheiros con 2 adicións e 0 borrados
  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)));