Bläddra i källkod

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

Nikolay Nikolov 3 år sedan
förälder
incheckning
db843287a2
1 ändrade filer med 5 tillägg och 2 borttagningar
  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);