aboutsummaryrefslogtreecommitdiffhomepage
path: root/toplevel/vernac.ml
diff options
context:
space:
mode:
Diffstat (limited to 'toplevel/vernac.ml')
-rw-r--r--toplevel/vernac.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/toplevel/vernac.ml b/toplevel/vernac.ml
index 1602f9c68..22dc02f03 100644
--- a/toplevel/vernac.ml
+++ b/toplevel/vernac.ml
@@ -134,7 +134,7 @@ let rec interp_vernac sid (loc,com) =
document. Hopefully this is fixed when VtBack can be removed
and Undo etc... are just interpreted regularly. *)
let is_proof_step = match fst (Vernac_classifier.classify_vernac v) with
- | VtProofStep _ | VtStm (VtBack _, _) | VtStartProof _ -> true
+ | VtProofStep _ | VtBack (_, _) | VtStartProof _ -> true
| _ -> false
in