From 65c185275f8c78908c1496c6665bc7fd50a4607b Mon Sep 17 00:00:00 2001
From: Chantal Keller <Chantal.Keller@lri.fr>
Date: Thu, 14 Apr 2022 18:01:15 +0200
Subject: Clean-up

---
 src/trace/coqInterface.ml | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/trace/coqInterface.ml')

diff --git a/src/trace/coqInterface.ml b/src/trace/coqInterface.ml
index a8af566..8b91225 100644
--- a/src/trace/coqInterface.ml
+++ b/src/trace/coqInterface.ml
@@ -150,6 +150,7 @@ let set_evars_tac noc =
 (* Other differences between the two versions of Coq *)
 type constr_expr = Constrexpr.constr_expr
 let error s = CErrors.user_err (Pp.str s)
+let anomaly s = CErrors.anomaly (Pp.str s)
 let warning n s = CWarnings.create ~name:n ~category:"SMTCoq plugin" Pp.str s
 
 let extern_constr c = Constrextern.extern_constr true Environ.empty_env Evd.empty (EConstr.of_constr c)
-- 
cgit