From d33ced344ba377f0a4003102d77f880fda108fd7 Mon Sep 17 00:00:00 2001
From: glondu
Date: Fri, 24 Dec 2010 23:49:21 +0000
Subject: More {raw => glob} changes for consistency

perl -pi -e 's/(\W|_)raw((?:sort|_prop|terms?|_branch|_red_flag|pat
tern|_constr_of|_of_pat)(?:\W|_))/\1glob_\2/g;s/glob__/glob_/g;s/(\
W)R((?:Prop|Type|Fix|CoFix|StructRec|WfRec|MeasureRec)\W)/\1G\2/g;s
/glob_terms?/glob_constr/g' **/*.ml*

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@13756 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 pretyping/pattern.mli | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'pretyping/pattern.mli')

diff --git a/pretyping/pattern.mli b/pretyping/pattern.mli
index b25637de9e..23de675989 100644
--- a/pretyping/pattern.mli
+++ b/pretyping/pattern.mli
@@ -70,7 +70,7 @@ type constr_pattern =
   | PLambda of name * constr_pattern * constr_pattern
   | PProd of name * constr_pattern * constr_pattern
   | PLetIn of name * constr_pattern * constr_pattern
-  | PSort of rawsort
+  | PSort of glob_sort
   | PMeta of patvar option
   | PIf of constr_pattern * constr_pattern * constr_pattern
   | PCase of (case_style * int array * inductive option * (int * int) option)
-- 
cgit v1.2.3