From cf04daec997ae431b14dd3a3bbf0db22013b3c71 Mon Sep 17 00:00:00 2001
From: Arnaud Spiwack
Date: Tue, 29 Jul 2014 14:07:42 +0200
Subject: Untyped terms in tactic: function [type_term c] to give a typed
 version of [c].

---
 intf/tacexpr.mli | 1 +
 1 file changed, 1 insertion(+)

(limited to 'intf')

diff --git a/intf/tacexpr.mli b/intf/tacexpr.mli
index 99e151e381..940aa6d1cb 100644
--- a/intf/tacexpr.mli
+++ b/intf/tacexpr.mli
@@ -185,6 +185,7 @@ and ('trm,'pat,'cst,'ind,'ref,'nam,'lev) gen_tactic_arg =
       ('trm,'pat,'cst,'ind,'ref,'nam,'lev) gen_tactic_arg list
   | TacFreshId of string or_var list
   | Tacexp of ('trm,'pat,'cst,'ind,'ref,'nam,'lev) gen_tactic_expr
+  | TacPretype of 'trm
 
 (** Generic ltac expressions.
     't : terms, 'p : patterns, 'c : constants, 'i : inductive,
-- 
cgit v1.2.3