Browse Source

+ WebAssembly threads: set IsMultiThread to true in WasiBeginThread

Nikolay Nikolov 11 months ago
parent
commit
200fbf64a1
1 changed files with 1 additions and 0 deletions
  1. 1 0
      rtl/wasi/systhrd.inc

+ 1 - 0
rtl/wasi/systhrd.inc

@@ -411,6 +411,7 @@ Var
 
 begin
   {$IFDEF DEBUGWASMTHREADS}DebugWriteln('WasiBeginThread(sa: '+IntToStr(PtrUint(Sa))+',ss: '+IntToStr(PtrUint(StackSize))+',TF: '+IntToStr(PtrUint(ThreadFunction))+',Arg: '+IntToStr(PtrUint(P))+',fl: '+IntToStr(PtrUint(CreationFlags))+',ID: '+IntToStr(PtrUint(ThreadID))+')');{$ENDIF}
+  IsMultiThread:=true;
   New(T);
   T^.StackBlock:=nil;
   T^.TLSBlock:=nil;