From 553cee72eb0349e50f1430f28900fa47c036759a Mon Sep 17 00:00:00 2001 From: Nikolay Nikolov Date: Sat, 17 Jun 2023 12:28:12 +0300 Subject: [PATCH] * tsk_wasm_suspending renamed tsk_wasm_suspending_first --- compiler/pdecsub.pas | 2 +- compiler/symconst.pas | 2 +- compiler/symcreat.pas | 4 ++-- 3 files changed, 4 insertions(+), 4 deletions(-) diff --git a/compiler/pdecsub.pas b/compiler/pdecsub.pas index ccf20659c6..8e5db4fbe9 100644 --- a/compiler/pdecsub.pas +++ b/compiler/pdecsub.pas @@ -2405,7 +2405,7 @@ begin begin consume(_SUSPENDING); include(procoptions,po_wasm_suspending); - synthetickind:=tsk_wasm_suspending; + synthetickind:=tsk_wasm_suspending_first; if idtoken=_FIRST then consume(_FIRST) else if idtoken=_LAST then diff --git a/compiler/symconst.pas b/compiler/symconst.pas index 5417564805..8acbdb415a 100644 --- a/compiler/symconst.pas +++ b/compiler/symconst.pas @@ -506,7 +506,7 @@ type tsk_block_invoke_procvar, // Call a procvar to invoke inside a block tsk_interface_wrapper, // Call through to a method from an interface wrapper tsk_call_no_parameters, // Call skpara procedure without passing any parameters nor returning a result - tsk_wasm_suspending, // WebAssembly suspending external wrapper, suspender object is first argument + tsk_wasm_suspending_first, // WebAssembly suspending external wrapper, suspender object is first argument tsk_wasm_suspending_last, // WebAssembly suspending external wrapper, suspender object is last argument tsk_wasm_promising // WebAssembly promising export wrapper ); diff --git a/compiler/symcreat.pas b/compiler/symcreat.pas index 7b6338c8c0..550edb3826 100644 --- a/compiler/symcreat.pas +++ b/compiler/symcreat.pas @@ -1264,14 +1264,14 @@ implementation internalerror(2011032801); {$endif jvm} {$ifdef wasm} - tsk_wasm_suspending: + tsk_wasm_suspending_first: implement_wasm_suspending(tcpuprocdef(pd),false); tsk_wasm_suspending_last: implement_wasm_suspending(tcpuprocdef(pd),true); tsk_wasm_promising: implement_wasm_promising(tcpuprocdef(pd)); {$else wasm} - tsk_wasm_suspending, + tsk_wasm_suspending_first, tsk_wasm_suspending_last, tsk_wasm_promising: internalerror(2023061107);