From 940da8a791b8b1c704f28662fa2e6a8f3ddf040f Mon Sep 17 00:00:00 2001 From: Pierre-Marie Pédrot Date: Tue, 26 Sep 2017 18:57:18 +0200 Subject: Adding quotations for the assert family of tactics. --- src/tac2qexpr.mli | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'src/tac2qexpr.mli') diff --git a/src/tac2qexpr.mli b/src/tac2qexpr.mli index 580039afe5..cb43a980de 100644 --- a/src/tac2qexpr.mli +++ b/src/tac2qexpr.mli @@ -141,3 +141,9 @@ type move_location_r = type move_location = move_location_r located type pose = (Id.t located or_anti option * Constrexpr.constr_expr) located + +type assertion_r = +| QAssertType of intro_pattern option * Constrexpr.constr_expr * raw_tacexpr option +| QAssertValue of Id.t located or_anti * Constrexpr.constr_expr + +type assertion = assertion_r located -- cgit v1.2.3