Skip to content
Snippets Groups Projects
Commit 10d74380 authored by Robbert Krebbers's avatar Robbert Krebbers
Browse files

Apply 1 suggestion(s) to 1 file(s)

parent 0202441f
No related branches found
No related tags found
No related merge requests found
......@@ -65,7 +65,7 @@ Ltac inv_head_step :=
| H : to_val _ = Some _ |- _ => apply of_to_val in H
| H : head_step ?e _ _ _ _ _ |- _ =>
try (is_var e; fail 1); (* inversion yields many goals if [e] is a variable
and can thus better be avoided. *)
and should thus better be avoided. *)
inversion H; subst; clear H
end.
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment