From: fennecdjay <astor.jeremie@wanadoo.fr>
Date: Sun, 29 Sep 2019 15:02:21 +0000 (+0200)
Subject: :art: array_sbuscript constants
X-Git-Tag: nightly~2198^2~217
X-Git-Url: http://10.10.0.4:5575/?a=commitdiff_plain;h=9f14228c906ae43e3c3e58fce62c7dfbf575f8e7;p=gwion.git

:art: array_sbuscript constants
---

diff --git a/src/parse/check.c b/src/parse/check.c
index 90a6ba58..e7737ade 100644
--- a/src/parse/check.c
+++ b/src/parse/check.c
@@ -38,9 +38,9 @@ ANN static m_bool check_implicit(const Env env, const m_str str,
   return GW_OK;
 }
 
-ANN m_bool check_exp_array_subscripts(Env env, Exp e) {
-  CHECK_OB(check_exp(env, e))
-assert(env->gwion->type[et_int]);
+ANN m_bool check_exp_array_subscripts(const Env env, const Exp exp) {
+  CHECK_OB(check_exp(env, exp))
+  Exp e = exp;
   do CHECK_BB(check_implicit(env, "@access", e, env->gwion->type[et_int]))
   while((e = e->next));
   return GW_OK;