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

* Send correct message in case of unhandled message

Browse Source
This commit is contained in:
Michael Van Canneyt 2024-11-27 11:49:56 +01:00
parent 7cd8b6e74d
commit 3055de55dd
1 changed files with 1 additions and 1 deletions

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

@ -570,7 +570,7 @@ begin
P:=TWorkerExceptionCommand.New;
P.ExceptionClass:='ENotSupportedException';
P.ExceptionMessage:='Unsupported command : '+TJSJSON.Stringify(aCommand);
SendCommand(aCommand);
SendCommand(P);
end;
procedure TWasmThreadSupport.SendCommand(aCommand: TWorkerCommand);