diff options
| author | letouzey | 2012-10-06 10:08:51 +0000 |
|---|---|---|
| committer | letouzey | 2012-10-06 10:08:51 +0000 |
| commit | 0256a92eb0d0265750bd38a85dce4f9487aefe5b (patch) | |
| tree | e2786cc2476aebafa664db64da2ab787f18a887a /tactics | |
| parent | 30cf9c6711df3eb583dacad3cb98158adbbf1f5f (diff) | |
still some more dead code removal
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15875 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tactics')
| -rw-r--r-- | tactics/auto.ml | 2 | ||||
| -rw-r--r-- | tactics/elim.ml | 1 | ||||
| -rw-r--r-- | tactics/hiddentac.ml | 2 |
3 files changed, 0 insertions, 5 deletions
diff --git a/tactics/auto.ml b/tactics/auto.ml index d773d20923..47b89e9af5 100644 --- a/tactics/auto.ml +++ b/tactics/auto.ml @@ -1430,6 +1430,4 @@ let gen_auto ?(debug=Off) n lems dbnames = | None -> full_auto ~debug n lems | Some l -> auto ~debug n lems l -let inj_or_var = Option.map (fun n -> ArgArg n) - let h_auto ?(debug=Off) n lems l = gen_auto ~debug n lems l diff --git a/tactics/elim.ml b/tactics/elim.ml index 685a70badb..88348206ba 100644 --- a/tactics/elim.ml +++ b/tactics/elim.ml @@ -16,7 +16,6 @@ open Hipattern open Tacmach open Tacticals open Tactics -open Tacexpr open Misctypes let introElimAssumsThen tac ba = diff --git a/tactics/hiddentac.ml b/tactics/hiddentac.ml index fc0f24fcd6..e61922d07a 100644 --- a/tactics/hiddentac.ml +++ b/tactics/hiddentac.ml @@ -6,8 +6,6 @@ (* * GNU Lesser General Public License Version 2.1 *) (************************************************************************) -open Refiner -open Tacexpr open Tactics open Util open Locus |