Commit b92a75d3 authored by Robbert Krebbers's avatar Robbert Krebbers

Remove superfluous space in error of iPvs.

parent f92cd3f3
......@@ -106,7 +106,7 @@ Tactic Notation "iPvsCore" constr(H) :=
eapply tac_pvs_elim_fsa with _ _ _ _ H _ _ _;
[env_cbv; reflexivity || fail "iPvs:" H "not found"
|let P := match goal with |- FSASplit ?P _ _ _ _ => P end in
apply _ || fail "iPvs: " P "not a pvs"
apply _ || fail "iPvs:" P "not a pvs"
|env_cbv; reflexivity|simpl]
end.
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment