Ver Fonte

* fixed WasiRTLEventWaitFor_WaitAllowed: second parameter is expected value to wait on (0), not wait to wait for (1)

Nikolay Nikolov há 1 ano atrás
pai
commit
038ecaef92
1 ficheiros alterados com 1 adições e 1 exclusões
  1. 1 1
      rtl/wasi/systhrd.inc

+ 1 - 1
rtl/wasi/systhrd.inc

@@ -215,7 +215,7 @@ Var
 
 begin
   {$IFDEF DEBUGWASMTHREADS}DebugWriteln('WasiRTLEventWaitFor_WaitAllowed : waiting');{$ENDIF}
-  a:=fpc_wasm32_memory_atomic_wait32(@(aEvent^.Signal),1,aTimeoutNs);
+  a:=fpc_wasm32_memory_atomic_wait32(@(aEvent^.Signal),0,aTimeoutNs);
   {$IFDEF DEBUGWASMTHREADS}DebugWriteln('WasiRTLEventWaitFor_WaitAllowed : done');{$ENDIF}
 end;