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

* Remove thread range

Browse Source
This commit is contained in:
Michael Van Canneyt 2025-02-12 09:18:52 +01:00
parent b2adae02ca
commit 1affbdc510
1 changed files with 2 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
packages/wasi/src/rtl.webthreads.pas
View File

@ -193,14 +193,13 @@ Type
public
Memory : TJSWebAssemblyMemory;
Module : TJSWebAssemblyModule;
ThreadRangeStart : NativeInt;
end;
{ TWorkerLoadCommandHelper }
TWorkerLoadCommandHelper = class helper for TWorkerLoadCommand
Class function CommandName : string; static;
Class function Create(aStartThreadIdRange : integer; aModule : TJSWebAssemblyModule; aMemory : TJSWebAssemblyMemory): TWorkerLoadCommand; static;reintroduce;
Class function Create(aModule : TJSWebAssemblyModule; aMemory : TJSWebAssemblyMemory): TWorkerLoadCommand; static;reintroduce;
end;
@ -379,12 +378,10 @@ begin
Result:=cmdLoad;
end;
class function TWorkerLoadCommandHelper.Create(aStartThreadIdRange: integer;
aModule: TJSWebAssemblyModule; aMemory: TJSWebAssemblyMemory
class function TWorkerLoadCommandHelper.Create(aModule: TJSWebAssemblyModule; aMemory: TJSWebAssemblyMemory
): TWorkerLoadCommand;
begin
Result:=TWorkerLoadCommand(TWorkerCommand.NewWorker(CommandName));
Result.ThreadRangeStart:=aStartThreadIdRange;
Result.Memory:=aMemory;
Result.Module:=aModule;
end;