Explorar o código

+ added a dummy test rtl function that takes parameters and returns a result

git-svn-id: branches/wasm@46712 -
nickysn %!s(int64=5) %!d(string=hai) anos
pai
achega
893e08489d
Modificáronse 1 ficheiros con 7 adicións e 0 borrados
  1. 7 0
      rtl/wasi/system.pp

+ 7 - 0
rtl/wasi/system.pp

@@ -12,10 +12,17 @@ type
 
 procedure fpc_lib_exit; compilerproc;
 
+function test_rtl_function(a, b: integer): integer;
+
 implementation
 
 procedure fpc_lib_exit; compilerproc;
 begin
 end;
 
+function test_rtl_function(a, b: integer): integer;
+begin
+  test_rtl_function := 0;
+end;
+
 end.