:art: make loop idx value constant

diff --git a/src/parse/check.c b/src/parse/check.c
index b572a14e34ed5adf1c4d36c19bc8b2092a2a59e7..03e05fa3c498a02a7a03cf9c720df726cfd2efcd 100644 (file)
--- a/src/parse/check.c
+++ b/src/parse/check.c
@@ -1167,6 +1167,7 @@ ANN static void check_idx(const Env env, const Type base, struct EachIdx_ *const
   idx->v = new_value(env->gwion->mp, base, s_name(idx->sym));
   valuefrom(env, idx->v->from, idx->pos);
   valid_value(env, idx->sym, idx->v);
+  SET_FLAG(idx->v, const);
 }
 
 /** sets for the key expression value