aboutsummaryrefslogtreecommitdiff
path: root/src/lux/analyser.clj
diff options
context:
space:
mode:
Diffstat (limited to 'src/lux/analyser.clj')
-rw-r--r--src/lux/analyser.clj1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/lux/analyser.clj b/src/lux/analyser.clj
index 4d68ab0d5..d4b90cc3a 100644
--- a/src/lux/analyser.clj
+++ b/src/lux/analyser.clj
@@ -21,6 +21,7 @@
;; [Utils]
(defn analyse-variant+ [analyse exo-type ident values]
(|do [[module tag-name] (&/normalize ident)
+ _ (&&module/ensure-can-see-tag module tag-name)
idx (&&module/tag-index module tag-name)
group (&&module/tag-group module tag-name)
:let [is-last? (= idx (dec (&/|length group)))]]