소스 검색

[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 년 전
부모
커밋
b81bc87120
1개의 변경된 파일2개의 추가작업 그리고 2개의 파일을 삭제
  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;