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

update Iris

parent aeaaf8b2
Branches
Tags
No related merge requests found
Pipeline #28359 passed
Stage: build
Hide whitespace changes
Inline Side-by-side
opam
+ 1
− 1
View file @ 15526ec5
...@@ -9,6 +9,6 @@ build: [make "-j%{jobs}%"] ...@@ -9,6 +9,6 @@ build: [make "-j%{jobs}%"]
install: [make "install"] install: [make "install"]
remove: ["rm" "-rf" "%{lib}%/coq/user-contrib/reloc"] remove: ["rm" "-rf" "%{lib}%/coq/user-contrib/reloc"]
depends: [ depends: [
"coq-iris" { (= "dev.2020-04-16.1.4b6f5dc6") | (= "dev") } "coq-iris" { (= "dev.2020-05-18.2.fdda97e8") | (= "dev") }
"coq-autosubst" { = "dev.coq86" } "coq-autosubst" { = "dev.coq86" }
] ]
theories/logic/adequacy.v
+ 1
− 1
View file @ 15526ec5
...@@ -28,7 +28,7 @@ Lemma refines_adequate Σ `{relocPreG Σ} ...@@ -28,7 +28,7 @@ Lemma refines_adequate Σ `{relocPreG Σ}
∧ P v v'). ∧ P v v').
Proof. Proof.
intros HA Hlog. intros HA Hlog.
eapply (heap_adequacy Σ _); iIntros (Hinv). eapply (heap_adequacy Σ _); iIntros (Hinv) "_".
iMod (own_alloc (● (to_tpool [e'], to_gen_heap (heap σ)) iMod (own_alloc (● (to_tpool [e'], to_gen_heap (heap σ))
⋅ ◯ ((to_tpool [e'] : tpoolUR, ∅) : cfgUR))) ⋅ ◯ ((to_tpool [e'] : tpoolUR, ∅) : cfgUR)))
as (γc) "[Hcfg1 Hcfg2]". as (γc) "[Hcfg1 Hcfg2]".
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment