From 86ac1eaf301c089f0ed0bea2c0ec513ae8661f8b Mon Sep 17 00:00:00 2001
From: Michael Van Canneyt <michael@freepascal.org>
Date: Wed, 19 Jun 2024 15:44:20 +0200
Subject: [PATCH] * Do not free temp objects in callback: webassembly code may
 save them

---
 packages/job/src/job_browser.pp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/packages/job/src/job_browser.pp b/packages/job/src/job_browser.pp
index cb4ce03..8d1e68c 100644
--- a/packages/job/src/job_browser.pp
+++ b/packages/job/src/job_browser.pp
@@ -951,7 +951,8 @@ begin
         View.setUint8(p,JOBArgObject);
         inc(p);
         NewId:=RegisterLocalObject(TJSObject(Arg));
-        TJSArray(TempObjIds).push(NewId);
+        // Do not free these objects after the call, as they may be saved by the webassembly
+        // TJSArray(TempObjIds).push(NewId);
         {$IFDEF VERBOSEJOB}
         writeln('TJSObjectBridge.CreateCallbackArgs Object ID=',NewID);
         {$ENDIF}