From a174d13c22f432233f49669f39e297373fd1506d Mon Sep 17 00:00:00 2001
From: Egor Sheremetov <egor.sheremetov@yandex.ru>
Date: Wed, 13 Mar 2024 13:37:21 +0300
Subject: [PATCH] Fixed runtime/GC-related issues

---
 runtime/runtime.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/runtime/runtime.c b/runtime/runtime.c
index c992e75c0..45dde17e4 100644
--- a/runtime/runtime.c
+++ b/runtime/runtime.c
@@ -858,7 +858,7 @@ extern void *Bsexp (aint* args, aint bn) {
     ((auint *)r->contents)[i] = args[i];
   }
 
-  r->tag = args[fields_cnt];
+  r->tag = UNBOX(args[fields_cnt]);
 
   for (aint i = fields_cnt - 1; i >= 0; --i) {
     pop_extra_root((void**)&args[i]);