Commit a0edf35d authored by Ralf Jung's avatar Ralf Jung
Browse files

use iDestructHyp instead of iDestruct

parent 68582b3b
...@@ -365,7 +365,7 @@ Tactic Notation "wp_alloc" ident(l) "as" constr(H) := ...@@ -365,7 +365,7 @@ Tactic Notation "wp_alloc" ident(l) "as" constr(H) :=
first [intros l | fail 1 "wp_alloc:" l "not fresh"]; first [intros l | fail 1 "wp_alloc:" l "not fresh"];
eexists; split; eexists; split;
[pm_reflexivity || fail "wp_alloc:" H "not fresh" [pm_reflexivity || fail "wp_alloc:" H "not fresh"
|iDestruct Htmp as H; wp_expr_simpl; try wp_value_head] in |iDestructHyp Htmp as H; wp_expr_simpl; try wp_value_head] in
iStartProof; iStartProof;
lazymatch goal with lazymatch goal with
| |- envs_entails _ (wp ?s ?E ?e ?Q) => | |- envs_entails _ (wp ?s ?E ?e ?Q) =>
......
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