removed deadcode / fixed typos (thanks to ocaml 3.09)

[helm.git] / helm / ocaml / content_pres / content2presMatcher.ml

diff --git a/helm/ocaml/content_pres/content2presMatcher.ml b/helm/ocaml/content_pres/content2presMatcher.ml
index 9a2f0d20b04193b19654f16c43748faf441153b0..4d99040d51df5117f96b172310a11570bf0a9748 100644 (file)
--- a/helm/ocaml/content_pres/content2presMatcher.ml
+++ b/helm/ocaml/content_pres/content2presMatcher.ml
@@ -56,7 +56,7 @@ struct
       | Ast.Variable _ -> PatternMatcher.Variable
       | Ast.Magic _
       | Ast.Layout _
-      | Ast.Literal _ as t -> assert false
+      | Ast.Literal _ -> assert false
       | _ -> PatternMatcher.Constructor
     let tag_of_pattern = get_tag
     let tag_of_term t = get_tag t