From fefd1e602e47823da4b5f0b3e7368dd72cdfec64 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Micha=C3=ABl=20Van=20Canneyt?= Date: Tue, 6 Aug 2024 09:09:15 +0200 Subject: [PATCH] * Corrections so it compiles with latest JOB & WASI classes --- demo/wasienv/job/hostsimpletest.lpr | 11 +---------- 1 file changed, 1 insertion(+), 10 deletions(-) diff --git a/demo/wasienv/job/hostsimpletest.lpr b/demo/wasienv/job/hostsimpletest.lpr index 0b9aa99..5048eff 100644 --- a/demo/wasienv/job/hostsimpletest.lpr +++ b/demo/wasienv/job/hostsimpletest.lpr @@ -24,8 +24,6 @@ Type FWADomBridge : TJSObjectBridge; function CreateMyObject(const aName: String; aArgs: TJSValueDynArray): TObject; function CreateBrowserObject(const aName: String; aArgs: TJSValueDynArray): TJSObject; - function OnBeforeStart(Sender: TObject; - aDescriptor: TWebAssemblyStartDescriptor): Boolean; Public constructor Create(aOwner : TComponent); override; procedure DoRun; override; @@ -40,13 +38,6 @@ end; { TMyApplication } -function TMyApplication.OnBeforeStart(Sender: TObject; - aDescriptor: TWebAssemblyStartDescriptor): Boolean; -begin - FWADomBridge.WasiExports:=aDescriptor.Exported; - Result:=true; -end; - function TMyApplication.CreateMyObject(const aName: String; aArgs: TJSValueDynArray): TObject; begin Writeln('Host: Creating TMyObject with argument "',aArgs[0],'"'); @@ -73,7 +64,7 @@ procedure TMyApplication.DoRun; begin // Your code here Terminate; - StartWebAssembly('wasmsimpletest.wasm',true,@OnBeforeStart); + StartWebAssembly('wasmsimpletest.wasm'); end; var