From a59b644de4234fb7fe3fce28284979091f257130 Mon Sep 17 00:00:00 2001 From: aspiwack Date: Thu, 6 Dec 2007 17:36:14 +0000 Subject: Plus de combinateurs sont passés de Util à Option. Le module Options devient Flags. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10348 85f007b7-540e-0410-9357-904b9bb8a0f7 --- pretyping/coercion.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'pretyping/coercion.ml') diff --git a/pretyping/coercion.ml b/pretyping/coercion.ml index f3468bcbf..729bd84f1 100644 --- a/pretyping/coercion.ml +++ b/pretyping/coercion.ml @@ -262,7 +262,7 @@ module Default = struct (* a little more effort to get products is needed *) try decompose_prod_n nabs t with _ -> - if !Options.debug then + if !Flags.debug then msg_warning (str "decompose_prod_n failed"); raise (Invalid_argument "Coercion.inh_conv_coerces_to") in -- cgit v1.2.3