From ba1981f71e84895c32d9afd4c23bf6e81863e1f4 Mon Sep 17 00:00:00 2001 From: herbelin Date: Sat, 8 Nov 2003 20:20:40 +0000 Subject: Fusion de tuple_constr/tuple_pattern dans operconstr/pattern git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4832 85f007b7-540e-0410-9357-904b9bb8a0f7 --- toplevel/metasyntax.ml | 2 -- 1 file changed, 2 deletions(-) (limited to 'toplevel') diff --git a/toplevel/metasyntax.ml b/toplevel/metasyntax.ml index 2ccdfdc40..cdb9574e6 100644 --- a/toplevel/metasyntax.ml +++ b/toplevel/metasyntax.ml @@ -213,9 +213,7 @@ let print_grammar univ entry = let te = match entry with | "constr" | "operconstr" -> weaken_entry Pcoq.Constr.operconstr - | "tuple_constr" -> weaken_entry Pcoq.Constr.tuple_constr | "pattern" -> weaken_entry Pcoq.Constr.pattern - | "tuple_pattern" -> weaken_entry Pcoq.Constr.tuple_pattern | "tactic" -> weaken_entry Pcoq.Tactic.simple_tactic | _ -> error "Unknown or unprintable grammar entry" in Gram.Entry.print te -- cgit v1.2.3