:bug: Unused operator id

diff --git a/src/parse/check.c b/src/parse/check.c
index 8147c7443f7098f06e80f934b5cc454d7c27ce67..6b1ac31c3bc610e3a9d576c71fdf8b562ddf1d4a 100644 (file)
--- a/src/parse/check.c
+++ b/src/parse/check.c
@@ -340,8 +340,10 @@ ANN static Type prim_id_non_res(const Env env, const Symbol *data) {
   const Value  v   = check_non_res_value(env, data);
   if (!v || !vflag(v, vflag_valid) || (v->from->ctx && v->from->ctx->error)) {
     const m_str name = s_name(*data);
-    if (!isalpha(*name) && *name != '_') /* && *name != '@' ???*/
+    if (!isalpha(*name) && *name != '_') { /* && *name != '@' ???*/
+      prim_self(data)->value = env->gwion->type[et_op]->info->value;
       return env->gwion->type[et_op];
+    }
     gwerr_basic(_("Invalid variable"), _("not legit at this point."), NULL,
                 env->name, prim_pos(data), 0);
     did_you_mean_nspc(v ? value_owner(env, v) : env->curr, s_name(sym));