소스 검색

* 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);