aboutsummaryrefslogtreecommitdiffhomepage
path: root/contrib/correctness/pmisc.ml
diff options
context:
space:
mode:
authorGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2003-11-24 12:33:06 +0000
committerGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2003-11-24 12:33:06 +0000
commit8aea38ca9b526d1d1ed731948528b4e921b303d2 (patch)
treee73ee9505b8d30b00baf86d472ee5a3e3685980b /contrib/correctness/pmisc.ml
parent047cc297fddba6567f68550c11769142411a17e1 (diff)
Prise en compte des defs syntaxiques dans is_global et global_reference qui passent donc de Termops a Constrintern
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4980 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/correctness/pmisc.ml')
-rw-r--r--contrib/correctness/pmisc.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/correctness/pmisc.ml b/contrib/correctness/pmisc.ml
index ba96b98b7..5fbcf4489 100644
--- a/contrib/correctness/pmisc.ml
+++ b/contrib/correctness/pmisc.ml
@@ -170,7 +170,7 @@ let coq_false = mkConstruct ((bool_sp,0),2)
let constant s =
let id = Constrextern.id_of_v7_string s in
- Termops.global_reference id
+ Constrintern.global_reference id
let connective_and = id_of_string "prog_bool_and"
let connective_or = id_of_string "prog_bool_or"