paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-12 18:31:53 +02:00
Code Issues Packages Projects Releases Wiki Activity

* WebAssembly threads: fixed bug in LockMutexTimeoutNoWait, caused by the use of

Browse Source 
Result instead of Res. This stupid bug broke WebAssembly critical sections,
  causing random spurious hangs and it took me quite a lot of time to find it!
This commit is contained in:
Nikolay Nikolov 2024-08-04 00:35:17 +03:00
parent c2fcb1a833
commit 694341aa78
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/wasi/wasmmutex.inc
View File

@ -84,7 +84,7 @@ begin
{$IFDEF DEBUGWASMTHREADS}DebugWriteln('LockMutexTimeoutNoWait: entering loop');{$ENDIF}
Repeat
if TryLockMutex(M) then
Result:=lmrOK
Res:=lmrOK
else if (GetThreadState(MyThread)<>tsRunning) then
Res:=lmrError
else if (aTimeOutNS>=0) and (GetClockTime>EndTime) then