From 80f9f00aa30e7fcb9214631096c57c1031eeb622 Mon Sep 17 00:00:00 2001
From: Michael Van Canneyt <michael@freepascal.org>
Date: Mon, 2 Dec 2024 21:25:20 +0100
Subject: [PATCH] * JOBCallback exists in job.js.pas

---
 demo/wasienv/button/WasiButton1.lpr | 9 ---------
 demo/wasienv/dom/WasiDomTest1.lpr   | 9 ---------
 2 files changed, 18 deletions(-)

diff --git a/demo/wasienv/button/WasiButton1.lpr b/demo/wasienv/button/WasiButton1.lpr
index 5e7b0bb..8f9f2e0 100644
--- a/demo/wasienv/button/WasiButton1.lpr
+++ b/demo/wasienv/button/WasiButton1.lpr
@@ -55,15 +55,6 @@ begin
   writeln('TWasmApp.Run END');
 end;
 
-// workaround: fpc wasm does not yet support exporting functions from units
-function JOBCallback(const Func: TJOBCallback; Data, Code: Pointer; Args: PByte): PByte;
-begin
-  Result:=JOB.JS.JOBCallback(Func,Data,Code,Args);
-end;
-
-exports
-  JOBCallback;
-
 var
   Application: TWasmApp;
 begin
diff --git a/demo/wasienv/dom/WasiDomTest1.lpr b/demo/wasienv/dom/WasiDomTest1.lpr
index da87261..8115e2e 100644
--- a/demo/wasienv/dom/WasiDomTest1.lpr
+++ b/demo/wasienv/dom/WasiDomTest1.lpr
@@ -1231,15 +1231,6 @@ begin
   WriteJSPropertyLongInt('Size',AValue);
 end;
 
-// workaround: fpc wasm does not yet support exporting functions from units
-function JOBCallback(const Func: TJOBCallback; Data, Code: Pointer; Args: PByte): PByte;
-begin
-  Result:=JOB.JS.JOBCallback(Func,Data,Code,Args);
-end;
-
-exports
-  JOBCallback;
-
 var
   Application: TWasmApp;
 begin