Kaynağa Gözat

* aitws_try_catch renamed aitws_legacy_try_catch

Nikolay Nikolov 1 gün önce
ebeveyn
işleme
a6ef71473a
2 değiştirilmiş dosya ile 4 ekleme ve 4 silme
  1. 2 2
      compiler/wasm32/aasmcpu.pas
  2. 2 2
      compiler/wasm32/cpupi.pas

+ 2 - 2
compiler/wasm32/aasmcpu.pas

@@ -192,7 +192,7 @@ uses
         aitws_block,
         aitws_loop,
         aitws_legacy_try_delegate,
-        aitws_try_catch
+        aitws_legacy_try_catch
       );
 
       { taicpu_wasm_structured_instruction }
@@ -1664,7 +1664,7 @@ uses
       var
         Done: Boolean;
       begin
-        wstyp:=aitws_try_catch;
+        wstyp:=aitws_legacy_try_catch;
         inherited internal_create(a_try_asmlist);
         if assigned(first_ins.Previous) or assigned(first_ins.Next) then
           internalerror(2023100310);

+ 2 - 2
compiler/wasm32/cpupi.pas

@@ -949,10 +949,10 @@ implementation
             begin
               if hp.typ=ait_wasm_structured_instruction then
                 begin
-                  if not (taicpu_wasm_structured_instruction(hp).wstyp in [aitws_try_catch,aitws_legacy_try_delegate]) then
+                  if not (taicpu_wasm_structured_instruction(hp).wstyp in [aitws_legacy_try_catch,aitws_legacy_try_delegate]) then
                     internalerror(2023102201);
                   resolve_labels_of_asmlist_with_try_blocks_recursive(tai_wasmstruc_try(hp).try_asmlist);
-                  if taicpu_wasm_structured_instruction(hp).wstyp=aitws_try_catch then
+                  if taicpu_wasm_structured_instruction(hp).wstyp=aitws_legacy_try_catch then
                     with tai_wasmstruc_try_catch(hp) do
                       begin
                         for i:=low(catch_list) to high(catch_list) do