aboutsummaryrefslogtreecommitdiffhomepage
path: root/contrib/romega
diff options
context:
space:
mode:
authorGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2002-06-03 10:09:53 +0000
committerGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2002-06-03 10:09:53 +0000
commit8a1550e2db6e95004eda1beec57200e214e91c72 (patch)
treea4a5f1b8ffbb49bda42a0c767044eea87223ba94 /contrib/romega
parentd03d9d2993b4e9e67c3d21f0e4515256917906e1 (diff)
Protection des tactiques contre l'utilisation sans le bon contexte de thories
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2745 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/romega')
-rw-r--r--contrib/romega/refl_omega.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/contrib/romega/refl_omega.ml b/contrib/romega/refl_omega.ml
index 788d3338c..f87f3db96 100644
--- a/contrib/romega/refl_omega.ml
+++ b/contrib/romega/refl_omega.ml
@@ -818,6 +818,7 @@ let destructure_hyps gl =
loop (pf_ids_of_hyps gl) (pf_hyps gl) gl
let omega_solver gl =
+ Library.check_required_module ["Coq";"romega";"ROmega"];
let concl = pf_concl gl in
let rec loop t =
match destructurate t with