diff options
author | Arnaud Spiwack <arnaud@spiwack.net> | 2014-08-05 17:55:48 +0200 |
---|---|---|
committer | Arnaud Spiwack <arnaud@spiwack.net> | 2014-11-01 22:43:57 +0100 |
commit | 967883e29a46a0fff9da8e56974468531948b174 (patch) | |
tree | 9c9a814a92c2a7fb5006d478e6d20e16bcf74d7a /stm/vernac_classifier.ml | |
parent | 3c8797a7e0d6536e28b8a8e7f4256241fc79dfc8 (diff) |
Add [Info] command.
Called with [Info n tac], runs [tac] and prints its info trace unfolding [n] level of tactic names ([0] for no unfolding at all).
Diffstat (limited to 'stm/vernac_classifier.ml')
-rw-r--r-- | stm/vernac_classifier.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/stm/vernac_classifier.ml b/stm/vernac_classifier.ml index 733f3e441..63b9e2e7f 100644 --- a/stm/vernac_classifier.ml +++ b/stm/vernac_classifier.ml @@ -97,7 +97,7 @@ let rec classify_vernac e = | VernacCheckMayEval _ -> VtQuery (true,(Stateid.dummy,Feedback.default_route)), VtLater (* ProofStep *) - | VernacSolve (SelectAllParallel,_,_) -> VtProofStep true, VtLater + | VernacSolve (SelectAllParallel,_,_,_) -> VtProofStep true, VtLater | VernacProof _ | VernacBullet _ | VernacFocus _ | VernacUnfocus |