Преглед на файлове

* fixed creating suspended wrappers for functions without parameters

Nikolay Nikolov преди 2 години
родител
ревизия
80c8575636
променени са 1 файла, в които са добавени 2 реда и са изтрити 0 реда
  1. 2 0
      compiler/symcreat.pas

+ 2 - 0
compiler/symcreat.pas

@@ -922,6 +922,8 @@ implementation
         str:='function ';
       str:=str+wrapper_name+'(__fpc_wasm_susp: WasmExternRef;';
       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_parse_method_impl(str,nil,false);