paweld/pas2js
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/pas2js.git synced 2025-08-17 08:09:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Alloc/Free exports

Browse Source
This commit is contained in:
Michaël Van Canneyt 2022-05-18 21:36:17 +02:00
parent e4bf5e3da0
commit a3a1ba5d28
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/wasi/wasienv.pas
View File

@ -303,6 +303,8 @@ type
TWASIExports = Class External name 'Object' (TJSModulesExports) TWASIExports = Class External name 'Object' (TJSModulesExports)
Public Public
Procedure start; external name '_start'; Procedure start; external name '_start';
function AllocMem(aSize : Integer) : Integer; external name 'wasiAlloc';
function freeMem(aLocation : Integer) : Integer; external name 'wasiFree';
end; end;
TGetConsoleInputBufferEvent = Reference to Procedure(Sender : TObject; Var AInput : TJSUint8Array); TGetConsoleInputBufferEvent = Reference to Procedure(Sender : TObject; Var AInput : TJSUint8Array);