Browse Source

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

git-svn-id: branches/wasm@46712 -
nickysn 5 years ago
parent
commit
893e08489d
1 changed files with 7 additions and 0 deletions
  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.