:bug: Fix push_global

diff --git a/src/gwion.c b/src/gwion.c
index b8a73e6c693bb795be349247cb1f422cb8657aac..97d42f06a323d792393a444f87025007b1057759 100644 (file)
--- a/src/gwion.c
+++ b/src/gwion.c
@@ -178,7 +178,7 @@ ANN struct SpecialId_* specialid_get(const Gwion gwion, const Symbol sym) {
 ANN void push_global(struct Gwion_ *gwion, const m_str name) {
   const Nspc nspc = new_nspc(gwion->mp, name);
   nspc->parent = gwion->env->global_nspc;
-  gwion->env->global_nspc = nspc;
+  gwion->env->curr = gwion->env->global_nspc = nspc;
 }
 
 ANN Nspc pop_global(struct Gwion_ *gwion) {

diff --git a/src/import/checker.c b/src/import/checker.c
index 1da445e368cff043edc0a17ea0461a0ead0f2a09..03a6c524ea656be37870ff2e021ffd85a9413091 100644 (file)
--- a/src/import/checker.c
+++ b/src/import/checker.c
@@ -35,6 +35,7 @@ ANN static m_bool ac_run(const Gwi gwi, struct AC *ac);
 ANN static Array_Sub mk_array(MemPool mp, struct AC *ac) {
   const Array_Sub array = new_array_sub(mp, ac->base);
   array->depth = ac->depth;
+  array->exp = ac->base;
   return array;
 }