From be969205ad77a1ecaa8dfd98bcfe6257d3a07b0c Mon Sep 17 00:00:00 2001
From: Pierre Muller <pierre@freepascal.org>
Date: Tue, 17 May 2022 22:47:13 +0200
Subject: [PATCH]  Do not alloc/dealloc NR_DEFAULTFLAGS for wasm32, as it is
 NR_NO

---
 compiler/wasm32/hlcgcpu.pas | 2 --
 1 file changed, 2 deletions(-)

diff --git a/compiler/wasm32/hlcgcpu.pas b/compiler/wasm32/hlcgcpu.pas
index 38a345448a..48faa6f7b6 100644
--- a/compiler/wasm32/hlcgcpu.pas
+++ b/compiler/wasm32/hlcgcpu.pas
@@ -2139,12 +2139,10 @@ implementation
       else
         a_load_const_stack(list,maxdef,tcgint(int64(hto-lto)),R_INTREGISTER);
 
-      a_reg_alloc(list, NR_DEFAULTFLAGS);
       a_cmp_stack_stack(list,maxdef,OC_A);
 
       current_asmdata.CurrAsmList.concat(taicpu.op_none(a_if));
       thlcgwasm(hlcg).decstack(current_asmdata.CurrAsmList,1);
-      a_reg_dealloc(list, NR_DEFAULTFLAGS);
 
       g_call_system_proc(list,'fpc_rangeerror',[],nil).resetiftemp;