Skip to content
Snippets Groups Projects
Commit 944cead9 authored by Ralf Jung's avatar Ralf Jung
Browse files

bump Iris, fix for prettify

parent b8430b11
No related branches found
No related tags found
No related merge requests found
Pipeline #
......@@ -9,5 +9,5 @@ build: [make "-j%{jobs}%"]
install: [make "install"]
remove: [ "sh" "-c" "rm -rf '%{lib}%/coq/user-contrib/igps" ]
depends: [
"coq-iris" { (= "branch.gen_proofmode.2018-07-03.0.4c3f5b17") | (= "dev") }
"coq-iris" { (= "branch.gen_proofmode.2018-07-04.2.34f64c8d") | (= "dev") }
]
......@@ -22,7 +22,7 @@ Lemma tac_wp_value `{ghosts.foundationG Σ} Δ E Φ e v :
envs_entails Δ (Φ v) envs_entails Δ (WP e @ E {{ Φ }}).
Proof. rewrite envs_entails_eq=> ? ->. by apply wp_value. Qed.
Ltac wp_value_head := eapply tac_wp_value; [apply _|lazy beta].
Ltac wp_value_head := eapply tac_wp_value; [apply _|reduction.pm_prettify].
Tactic Notation "wp_pure" open_constr(efoc) :=
iStartProof;
......
......@@ -32,7 +32,7 @@ Lemma tac_wp_value `{foundationG Σ} Δ E Φ e v :
envs_entails Δ (Φ v) envs_entails Δ (WP e @ E {{ Φ }}).
Proof. rewrite envs_entails_eq=> <- ->. now apply: wp_value'. Qed.
Ltac wp_value_head := eapply tac_wp_value; [apply _|lazy beta].
Ltac wp_value_head := eapply tac_wp_value; [apply _|reduction.pm_prettify].
Tactic Notation "wp_pure" open_constr(efoc) :=
iStartProof;
......
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