diff options
| author | Arnaud Spiwack | 2014-07-29 17:22:26 +0200 |
|---|---|---|
| committer | Arnaud Spiwack | 2014-07-29 17:22:26 +0200 |
| commit | 6fbaac4bea11324e6c6785e8a5a7e4334ebcea1e (patch) | |
| tree | 977f4f852bc41bc93b382035d8016785ffd1223e | |
| parent | 0c7278f6253a807a0385a348dd12ed2e39540e88 (diff) | |
Allow [uconstr:c] as argument of a tactic.
| -rw-r--r-- | parsing/g_ltac.ml4 | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/parsing/g_ltac.ml4 b/parsing/g_ltac.ml4 index 4be4aa4ae7..d6f45d9f49 100644 --- a/parsing/g_ltac.ml4 +++ b/parsing/g_ltac.ml4 @@ -127,6 +127,7 @@ GEXTEND Gram tactic_arg: [ [ IDENT "ltac"; ":"; a = tactic_expr LEVEL "0" -> arg_of_expr a | IDENT "ltac"; ":"; n = natural -> TacGeneric (genarg_of_int n) + | IDENT "uconstr"; ":" ; c = Constr.constr -> UConstr c | IDENT "ipattern"; ":"; ipat = simple_intropattern -> TacGeneric (genarg_of_ipattern ipat) | a = may_eval_arg -> a |