From 2bdcd093b357adb2185518dabbafd1a0b9279044 Mon Sep 17 00:00:00 2001 From: Stephane Glondu Date: Tue, 27 Mar 2012 07:41:19 +0200 Subject: Imported Upstream version 8.3.pl4 --- tactics/class_tactics.ml4 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'tactics/class_tactics.ml4') diff --git a/tactics/class_tactics.ml4 b/tactics/class_tactics.ml4 index 465d1d80..cf9213dd 100644 --- a/tactics/class_tactics.ml4 +++ b/tactics/class_tactics.ml4 @@ -8,7 +8,7 @@ (*i camlp4deps: "parsing/grammar.cma" i*) -(* $Id: class_tactics.ml4 14641 2011-11-06 11:59:10Z herbelin $ *) +(* $Id: class_tactics.ml4 15025 2012-03-09 14:27:07Z glondu $ *) open Pp open Util @@ -219,7 +219,7 @@ let e_possible_resolve db_list local_db gl = let rec catchable = function | Refiner.FailError _ -> true - | Stdpp.Exc_located (_, e) -> catchable e + | Compat.Exc_located (_, e) -> catchable e | e -> Logic.catchable_exception e let is_dep gl gls = -- cgit v1.2.3