diff --git a/packages/rtl/webassembly.pas b/packages/rtl/webassembly.pas index 311c6ab..0266aa1 100644 --- a/packages/rtl/webassembly.pas +++ b/packages/rtl/webassembly.pas @@ -29,7 +29,7 @@ Type { TJSModulesArray } - TJSModulesExports = Class external name 'anon' (TJSObject) + TJSModulesExports = Class external name 'Object' (TJSObject) private FMemory : TJSWebAssemblyMemory; external name 'memory'; function GetFun(aName : String): TJSFunction; external name '[]'; diff --git a/packages/wasi/wasienv.pas b/packages/wasi/wasienv.pas index 9d8e2e1..643a3fd 100644 --- a/packages/wasi/wasienv.pas +++ b/packages/wasi/wasienv.pas @@ -299,7 +299,8 @@ type TWASIWriteEvent = Reference to Procedure(Sender : TObject; Const aOutput : String); - TWASIExports = Class External name 'Object' (TJSObject) + // Standard FPC exports. + TWASIExports = Class External name 'Object' (TJSModulesExports) Public Procedure start; external name '_start'; end;