From 9487c4c3c83584c02c71226d5492affbbbd47403 Mon Sep 17 00:00:00 2001 From: Robbert Krebbers <mail@robbertkrebbers.nl> Date: Thu, 9 Apr 2020 08:43:59 +0200 Subject: [PATCH] Bump Iris. --- opam | 2 +- theories/logic/spec_ra.v | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/opam b/opam index 99972c6..29acab3 100644 --- a/opam +++ b/opam @@ -9,6 +9,6 @@ build: [make "-j%{jobs}%"] install: [make "install"] remove: ["rm" "-rf" "%{lib}%/coq/user-contrib/reloc"] depends: [ - "coq-iris" { (= "dev.2020-04-04.3.9b2ad256") | (= "dev") } + "coq-iris" { (= "dev.2020-04-07.7.64bed0ca") | (= "dev") } "coq-autosubst" { = "dev.coq86" } ] diff --git a/theories/logic/spec_ra.v b/theories/logic/spec_ra.v index ef586ca..ce4370c 100644 --- a/theories/logic/spec_ra.v +++ b/theories/logic/spec_ra.v @@ -127,7 +127,7 @@ Section mapsto. Global Instance mapsto_fractional l v : Fractional (λ q, l ↦ₛ{q} v)%I. Proof. intros p q. rewrite heapS_mapsto_eq -own_op -auth_frag_op. - by rewrite -pair_op op_singleton -pair_op agree_idemp right_id. + by rewrite -pair_op singleton_op -pair_op agree_idemp right_id. Qed. Global Instance mapsto_as_fractional l q v : AsFractional (l ↦ₛ{q} v) (λ q, l ↦ₛ{q} v)%I q. @@ -138,7 +138,7 @@ Section mapsto. apply bi.wand_intro_r. rewrite heapS_mapsto_eq -own_op -auth_frag_op own_valid uPred.discrete_valid. f_equiv=> /=. - rewrite -pair_op op_singleton right_id -pair_op. + rewrite -pair_op singleton_op right_id -pair_op. move=> [_ Hv]. move:Hv => /=. rewrite singleton_valid. by intros [_ ?%agree_op_invL']. -- GitLab