Browse Source

* fixed creating suspended wrappers for functions without parameters

Nikolay Nikolov 2 years ago
parent
commit
80c8575636
1 changed files with 2 additions and 0 deletions
  1. 2 0
      compiler/symcreat.pas

+ 2 - 0
compiler/symcreat.pas

@@ -922,6 +922,8 @@ implementation
         str:='function ';
         str:='function ';
       str:=str+wrapper_name+'(__fpc_wasm_susp: WasmExternRef;';
       str:=str+wrapper_name+'(__fpc_wasm_susp: WasmExternRef;';
       addvisibleparameterdeclarations(str,pd);
       addvisibleparameterdeclarations(str,pd);
+      if str[Length(str)]=';' then
+        delete(str,Length(str),1);
       str:=str+'): double; external '''+pd.import_dll^+ ''' name '''+pd.import_name^+''';';
       str:=str+'): double; external '''+pd.import_dll^+ ''' name '''+pd.import_name^+''';';
       str_parse_method_impl(str,nil,false);
       str_parse_method_impl(str,nil,false);