diff options
| author | Pierre-Marie Pédrot | 2016-03-19 03:01:26 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2016-03-19 03:01:26 +0100 |
| commit | fff96bb174df956bc38c207d716d7f8019ca04d8 (patch) | |
| tree | 842afc28f891fa8516cbb86d1051b41686eb67a6 /proofs | |
| parent | f63cf9d72c7feb6aa65e525bf6262559a355435f (diff) | |
| parent | ce2ffd090bd64963279cbbb84012d1b266ed9918 (diff) | |
Removing the VernacSolve entry of the vernacular AST.
This is an important step into making Ltac a plugin. It also allows to
see what the important entry points in the Coq codebase for a tactic
language are.
Diffstat (limited to 'proofs')
| -rw-r--r-- | proofs/pfedit.ml | 2 | ||||
| -rw-r--r-- | proofs/proof_global.ml | 1 |
2 files changed, 0 insertions, 3 deletions
diff --git a/proofs/pfedit.ml b/proofs/pfedit.ml index 20d696fd91..608ee2c700 100644 --- a/proofs/pfedit.ml +++ b/proofs/pfedit.ml @@ -105,8 +105,6 @@ let solve ?with_end_tac gi info_lvl tac pr = | Vernacexpr.SelectNth i -> Proofview.tclFOCUS i i tac | Vernacexpr.SelectId id -> Proofview.tclFOCUSID id tac | Vernacexpr.SelectAll -> tac - | Vernacexpr.SelectAllParallel -> - Errors.anomaly(str"SelectAllParallel not handled by Stm") in let (p,(status,info)) = Proof.run_tactic (Global.env ()) tac pr in let () = diff --git a/proofs/proof_global.ml b/proofs/proof_global.ml index d19dc5ba0f..647dbe1115 100644 --- a/proofs/proof_global.ml +++ b/proofs/proof_global.ml @@ -664,7 +664,6 @@ let print_goal_selector = function | Vernacexpr.SelectAll -> "all" | Vernacexpr.SelectNth i -> string_of_int i | Vernacexpr.SelectId id -> Id.to_string id - | Vernacexpr.SelectAllParallel -> "par" let parse_goal_selector = function | "all" -> Vernacexpr.SelectAll |