From 24b2887853c09fed12e7bd70385c1deb9f7d8781 Mon Sep 17 00:00:00 2001
From: Robbert Krebbers <mail@robbertkrebbers.nl>
Date: Tue, 13 Aug 2019 19:42:36 +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 25ea28e..c5a8d97 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.2019-07-01.1.6e79f000") | (= "dev") }
+  "coq-iris" { (= "dev.2019-08-13.5.c1d6ef7f") | (= "dev") }
   "coq-autosubst" { = "dev.coq86" }
 ]
diff --git a/theories/logic/spec_ra.v b/theories/logic/spec_ra.v
index b605046..9f481b0 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 op_singleton -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 op_singleton right_id -pair_op.
     move=> [_ Hv]. move:Hv => /=.
     rewrite singleton_valid.
     by intros [_ ?%agree_op_invL'].
-- 
GitLab