From 635d2f57a0ae6d30f12e4a6895dd7c14a239d372 Mon Sep 17 00:00:00 2001
From: Michalis Kamburelis <michalis.kambi@gmail.com>
Date: Tue, 3 Dec 2024 13:05:50 +0100
Subject: [PATCH] Fix wasienv examples to use InstanceExports, not WasiExports

As indicated by @mvancanneyt in https://gitlab.com/freepascal.org/fpc/pas2js/-/issues/39289#note_2237702957 , the InstanceExports is correct.
---
 demo/wasienv/button/BrowserButton1.lpr | 2 +-
 demo/wasienv/fetch/BrowserFetch1.lpr   | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/demo/wasienv/button/BrowserButton1.lpr b/demo/wasienv/button/BrowserButton1.lpr
index 6a55c8f..8689597 100644
--- a/demo/wasienv/button/BrowserButton1.lpr
+++ b/demo/wasienv/button/BrowserButton1.lpr
@@ -22,7 +22,7 @@ Type
 function TMyApplication.OnBeforeStart(Sender: TObject;
   aDescriptor: TWebAssemblyStartDescriptor): Boolean;
 begin
-  FWADomBridge.WasiExports:=aDescriptor.Exported;
+  FWADomBridge.InstanceExports:=aDescriptor.Exported;
   Result:=true;
 end;
 
diff --git a/demo/wasienv/fetch/BrowserFetch1.lpr b/demo/wasienv/fetch/BrowserFetch1.lpr
index c34a43e..fd54ed6 100644
--- a/demo/wasienv/fetch/BrowserFetch1.lpr
+++ b/demo/wasienv/fetch/BrowserFetch1.lpr
@@ -22,7 +22,7 @@ Type
 function TMyApplication.OnBeforeStart(Sender: TObject;
   aDescriptor: TWebAssemblyStartDescriptor): Boolean;
 begin
-  FWADomBridge.WasiExports:=aDescriptor.Exported;
+  FWADomBridge.InstanceExports:=aDescriptor.Exported;
   Result:=true;
 end;