diff options
Diffstat (limited to 'theories')
| -rw-r--r-- | theories/Constr.v | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/theories/Constr.v b/theories/Constr.v index 3e67a486cf..072c613920 100644 --- a/theories/Constr.v +++ b/theories/Constr.v @@ -58,3 +58,8 @@ Ltac2 @ external closenl : ident list -> int -> constr -> constr := "ltac2" "con [Rel(k); ...; Rel(k+n-1)] in [c]. If two names are identical, the one of least index is kept. *) End Unsafe. + +Ltac2 @ external in_context : ident -> constr -> (unit -> unit) -> constr := "ltac2" "constr_in_context". +(** On a focussed goal [Γ ⊢ A], [in_context id c tac] evaluates [tac] in a + focussed goal [Γ, id : c ⊢ ?X] and returns [fun (id : c) => t] where [t] is + the proof built by the tactic. *) |