diff options
| author |  Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2014-10-26 22:33:45 +0100 |
|---|---|---|
| committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2014-10-27 09:57:11 +0100 |
| commit | a9adcb3941900c416f106ddac6fd646603b335b8 (patch) | |
| tree | 0c86b8c13cfd06179b96b72aeb2896cee3bdd272 /parsing/g_tactic.ml4 | |
| parent | 65c8d91cd4c11b8de44f0b23cd44a3303cd54d4e (diff) | |
Dead code
Diffstat (limited to 'parsing/g_tactic.ml4')
| -rw-r--r-- | parsing/g_tactic.ml4 | 7 |
1 files changed, 0 insertions, 7 deletions
diff --git a/parsing/g_tactic.ml4 b/parsing/g_tactic.ml4 index 25dd0db45..fb09a3108 100644 --- a/parsing/g_tactic.ml4 +++ b/parsing/g_tactic.ml4 @@ -619,13 +619,6 @@ GEXTEND Gram l = LIST0 [","; c = pattern_occ; na = as_name -> (c,na)] -> TacAtom (!@loc, TacGeneralize (((nl,c),na)::l)) | IDENT "generalize"; IDENT "dependent"; c = constr -> TacAtom (!@loc, TacGeneralizeDep c) -(* Towards a "generalize in" which generalize in place: problem: this is somehow inconsistent with "generalize at" (from 8.2) which is not in place. - | IDENT "generalize"; c = constr; "in"; cl = in_clause; - na = as_name; - l = LIST0 [","; c = constr; "in"; cl = in_clause; na = as_name -> - ((cl,c),na)] -> - TacGeneralize (true,((cl,c),na)::l) -*) (* Derived basic tactics *) | IDENT "induction"; ic = induction_clause_list -> |