]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/components/disambiguation/disambiguate.ml
fixed coercion mechanism w.r.t. undo/require
[helm.git] / helm / software / components / disambiguation / disambiguate.ml
index fa63d1f484e6daca79d910587dafd579fcf5ed15..354a737832bd15085e5ce8f89ec6f8fa25951cd0 100644 (file)
@@ -310,7 +310,8 @@ let rec domain_of_term ?(loc = HExtlib.dummy_floc) ~context = function
                 [] subst in
             [ Node ([loc], Id name, terms) ]))
   | Ast.Uri _ -> []
-  | Ast.Implicit -> []
+  | Ast.NRef _ -> []
+  | Ast.Implicit _ -> []
   | Ast.Num (num, i) -> [ Node ([loc], Num i, []) ]
   | Ast.Meta (index, local_context) ->
       List.fold_left