paweld/pas2js
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/pas2js.git synced 2025-04-05 17:07:45 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Make preparewebassemblythread a public method

Browse Source
This commit is contained in:
Michael Van Canneyt 2025-03-10 10:40:41 +01:00
parent a8f6799748
commit b795f4ed7a
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
packages/wasi/src/wasiworkerthreadhost.pas
View File

@ -31,13 +31,14 @@ Type
FSendOutputToBrowserWindow: Boolean; FSendOutputToBrowserWindow: Boolean;
FThreadEntryPoint: String; FThreadEntryPoint: String;
FThreadSupport: TWorkerThreadSupport; FThreadSupport: TWorkerThreadSupport;
procedure PrepareWebAssemblyThread(aDescr: TWebAssemblyStartDescriptor);
procedure SetThreadSupport(AValue: TWorkerThreadSupport); procedure SetThreadSupport(AValue: TWorkerThreadSupport);
Protected Protected
Procedure RunWebAssemblyThread(aProc : TRunWebassemblyProc); virtual; Procedure RunWebAssemblyThread(aProc : TRunWebassemblyProc); virtual;
procedure DoStdWrite(Sender: TObject; const aOutput: String); override; procedure DoStdWrite(Sender: TObject; const aOutput: String); override;
Public Public
constructor Create(aOwner: TComponent); override; constructor Create(aOwner: TComponent); override;
// Prepare webassembly thread
procedure PrepareWebAssemblyThread(aDescr: TWebAssemblyStartDescriptor);
// Thread entry point name for the WASI Host. // Thread entry point name for the WASI Host.
Property ThreadEntryPoint : String Read FThreadEntryPoint Write FThreadEntryPoint; Property ThreadEntryPoint : String Read FThreadEntryPoint Write FThreadEntryPoint;
// Send output to main window // Send output to main window