瀏覽代碼

+ print 'linking' message for the WASI target

git-svn-id: branches/wasm@48247 -
nickysn 4 年之前
父節點
當前提交
c89a049102
共有 1 個文件被更改,包括 6 次插入0 次删除
  1. 6 0
      compiler/systems/t_wasi.pas

+ 6 - 0
compiler/systems/t_wasi.pas

@@ -73,6 +73,9 @@ type
 
 implementation
 
+uses
+  verbose;
+
 { timportlibwasi }
 
   procedure timportlibwasi.generatelib;
@@ -105,6 +108,9 @@ var
   tmp : TCmdStrListItem;
   tempFileName : ansistring;
 begin
+  if not(cs_link_nolink in current_settings.globalswitches) then
+    Message1(exec_i_linking,current_module.exefilename);
+
   if (cs_link_smart in current_settings.globalswitches) and
      create_smartlink_sections then
    GCSectionsStr:='--gc-sections'