aboutsummaryrefslogtreecommitdiffhomepage
path: root/parsing
diff options
context:
space:
mode:
authorGravatar letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7>2012-05-29 11:08:53 +0000
committerGravatar letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7>2012-05-29 11:08:53 +0000
commit8a71afd27620a5d6c507b115d6fd408d879544c5 (patch)
tree7365991d6afdfeae8529b5d47e3830b63a037a56 /parsing
parent392300a73bc4e57d2be865d9a8d77c608ef02f59 (diff)
Pattern as a mli-only file, operations in Patternops
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15376 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing')
-rw-r--r--parsing/grammar.mllib1
-rw-r--r--parsing/q_constr.ml42
2 files changed, 1 insertions, 2 deletions
diff --git a/parsing/grammar.mllib b/parsing/grammar.mllib
index c2dce0231..7ab65b443 100644
--- a/parsing/grammar.mllib
+++ b/parsing/grammar.mllib
@@ -65,7 +65,6 @@ Inductiveops
Miscops
Glob_ops
Detyping
-Pattern
Topconstr
Genarg
Ppextend
diff --git a/parsing/q_constr.ml4 b/parsing/q_constr.ml4
index 543240a82..d78b6c8c0 100644
--- a/parsing/q_constr.ml4
+++ b/parsing/q_constr.ml4
@@ -31,7 +31,7 @@ EXTEND
GLOBAL: expr;
expr:
[ [ "PATTERN"; "["; c = constr; "]" ->
- <:expr< snd (Pattern.pattern_of_glob_constr $c$) >> ] ]
+ <:expr< snd (Patternops.pattern_of_glob_constr $c$) >> ] ]
;
sort:
[ [ "Set" -> GSet