Browse Source

[PATCH 81/83] fix the use of sharedlibname to exe name

From b9a718eb8a2aecb209dea027690f6f8b99bf0b88 Mon Sep 17 00:00:00 2001
From: Dmitry Boyarintsev <[email protected]>
Date: Tue, 26 Nov 2019 10:09:12 -0500

git-svn-id: branches/wasm@45958 -
nickysn 5 years ago
parent
commit
b81bc87120
1 changed files with 2 additions and 2 deletions
  1. 2 2
      compiler/systems/t_wasm.pas

+ 2 - 2
compiler/systems/t_wasm.pas

@@ -107,7 +107,7 @@ begin
 
   cmdstr := cmdstr + ' --no-entry --allow-undefined';
 
-  if success and (cs_link_strip in current_settings.globalswitches) then
+  if (cs_link_strip in current_settings.globalswitches) then
    begin
      { only remove non global symbols and debugging info for a library }
      cmdstr := cmdstr + ' --strip-all';
@@ -126,7 +126,7 @@ begin
 
   SplitBinCmd(Info.DllCmd[2],binstr,cmdstr);
   Replace(cmdstr,'$INPUT',current_module.objfilename );
-  Replace(cmdstr,'$EXE',maybequoted(current_module.sharedlibfilename));
+  Replace(cmdstr,'$EXE',maybequoted(current_module.exefilename));
   DoExec(FindUtil(utilsprefix+binstr),cmdstr,false,false);
 
   MakeSharedLibrary:=success;