Browse Source

* Make preparewebassemblythread a public method

Michael Van Canneyt 5 months ago
parent
commit
b795f4ed7a
1 changed files with 2 additions and 1 deletions
  1. 2 1
      packages/wasi/src/wasiworkerthreadhost.pas

+ 2 - 1
packages/wasi/src/wasiworkerthreadhost.pas

@@ -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