From 1d9a7c8254758dce2ec09ab9f2166c803114fee0 Mon Sep 17 00:00:00 2001 From: fennecdjay Date: Tue, 1 Oct 2019 21:26:14 +0200 Subject: [PATCH] :art: try index_is_int --- src/parse/check.c | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/src/parse/check.c b/src/parse/check.c index 92d200d3..0688d540 100644 --- a/src/parse/check.c +++ b/src/parse/check.c @@ -402,7 +402,10 @@ ANN static Type at_depth(const Env env, const Array_Sub array) { } static inline m_bool index_is_int(const Env env, Exp e, m_uint *depth) { - do CHECK_BB(check_implicit(env, "@access", e, env->gwion->type[et_int])) + do if(isa(e->type, env->gwion->type[et_int]) < 0) + ERR_B(e->pos, _("array index %i must be of type 'int', not '%s'"), + *depth, e->type->name) +// do CHECK_BB(check_implicit(env, "@access", e, env->gwion->type[et_int])) while(++(*depth) && (e = e->next)); return GW_OK; } -- 2.43.0