瀏覽代碼

+ generate funcdef for external procs, that don't have an import dll

Nikolay Nikolov 3 年之前
父節點
當前提交
db843287a2
共有 1 個文件被更改,包括 5 次插入2 次删除
  1. 5 2
      compiler/wasm32/nwasmutil.pas

+ 5 - 2
compiler/wasm32/nwasmutil.pas

@@ -75,8 +75,11 @@ implementation
           if assigned(def) and (def.typ=procdef) then
             begin
               proc := tprocdef(def);
-              if (po_external in proc.procoptions) and (po_has_importdll in proc.procoptions) then
-                WriteImportDll(list,proc);
+              if po_external in proc.procoptions then
+                if po_has_importdll in proc.procoptions then
+                  WriteImportDll(list,proc)
+                else
+                  thlcgwasm(hlcg).g_procdef(list,proc);
             end;
          end;
       cur_unit:=tused_unit(usedunits.First);