diff options
Diffstat (limited to '')
| -rw-r--r-- | src/lux/analyser/case.clj | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/lux/analyser/case.clj b/src/lux/analyser/case.clj index 7a1ec4860..f302088d9 100644 --- a/src/lux/analyser/case.clj +++ b/src/lux/analyser/case.clj @@ -241,6 +241,9 @@ ;; :let [_ (println "#15")] ] (return (&/T (&/V $VariantTestAC (&/T idx (&/|length group) =test)) =kont))) + + _ + (fail (str "[Pattern-matching Error] Unrecognized pattern syntax: " (&/show-ast pattern))) ))) (defn ^:private analyse-branch [analyse exo-type value-type pattern body patterns] |