diff options
| author | Hugo Herbelin | 2016-04-26 12:17:42 +0200 |
|---|---|---|
| committer | Hugo Herbelin | 2016-04-27 21:55:49 +0200 |
| commit | eb9216e544cb5fce4347052f42e9452a822c2f64 (patch) | |
| tree | 56fc453536a44df3888feac1c758b72b91f396d6 /interp/constrarg.ml | |
| parent | 67335c832a55cbd0ca559906bbe1af2485241353 (diff) | |
Revert "Honor parsing and printing levels for tactic entry in TACTIC EXTEND and"
This reverts commit fb1b7b084bcbbbc176040fcadeac00aee6b1e462.
Diffstat (limited to 'interp/constrarg.ml')
| -rw-r--r-- | interp/constrarg.ml | 18 |
1 files changed, 0 insertions, 18 deletions
diff --git a/interp/constrarg.ml b/interp/constrarg.ml index 9103a5caf0..46be0b8a1f 100644 --- a/interp/constrarg.ml +++ b/interp/constrarg.ml @@ -28,24 +28,6 @@ let wit_intro_pattern : (Constrexpr.constr_expr intro_pattern_expr located, glob let wit_tactic : (raw_tactic_expr, glob_tactic_expr, Val.t) genarg_type = Genarg.make0 "tactic" -let wit_tactic0 : (raw_tactic_expr, glob_tactic_expr, Val.t) genarg_type = - Genarg.make0 "tactic0" - -let wit_tactic1 : (raw_tactic_expr, glob_tactic_expr, Val.t) genarg_type = - Genarg.make0 "tactic1" - -let wit_tactic2 : (raw_tactic_expr, glob_tactic_expr, Val.t) genarg_type = - Genarg.make0 "tactic2" - -let wit_tactic3 : (raw_tactic_expr, glob_tactic_expr, Val.t) genarg_type = - Genarg.make0 "tactic3" - -let wit_tactic4 : (raw_tactic_expr, glob_tactic_expr, Val.t) genarg_type = - Genarg.make0 "tactic4" - -let wit_tactic5 : (raw_tactic_expr, glob_tactic_expr, Val.t) genarg_type = - Genarg.make0 "tactic5" - let wit_ltac = Genarg.make0 ~dyn:(val_tag (topwit Stdarg.wit_unit)) "ltac" let wit_ident = |