From 8a1550e2db6e95004eda1beec57200e214e91c72 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Mon, 3 Jun 2002 10:09:53 +0000
Subject: 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
---
 contrib/romega/refl_omega.ml | 1 +
 1 file changed, 1 insertion(+)

(limited to 'contrib/romega')

diff --git a/contrib/romega/refl_omega.ml b/contrib/romega/refl_omega.ml
index 788d3338cf..f87f3db964 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
-- 
cgit v1.2.3