Browse Source

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

git-svn-id: trunk@42636 -
nickysn 6 years ago
parent
commit
4cd8193c79
1 changed files with 2 additions and 0 deletions
  1. 2 0
      compiler/systems/t_win16.pas

+ 2 - 0
compiler/systems/t_win16.pas

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