From 55737304eb3897184e1e7967dac12954b0fa7fd1 Mon Sep 17 00:00:00 2001 From: =?utf8?q?J=C3=A9r=C3=A9mie=20Astor?= Date: Tue, 30 Jun 2020 23:26:50 +0200 Subject: [PATCH] :art: Forbid type shallowing --- src/parse/scan0.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/parse/scan0.c b/src/parse/scan0.c index e57a3d00..5f2b6c59 100644 --- a/src/parse/scan0.c +++ b/src/parse/scan0.c @@ -29,7 +29,7 @@ static inline Type scan0_type(const Env env, const m_uint xid, } ANN static inline m_bool scan0_defined(const Env env, const Symbol s, const loc_t pos) { - if(nspc_lookup_type0(env->curr, s)) + if(nspc_lookup_type1(env->curr, s)) ERR_B(pos, _("type '%s' already defined"), s_name(s)); return already_defined(env, s, pos); } -- 2.43.0