From c58900909d8a24d362cf135e80b8e548422533b6 Mon Sep 17 00:00:00 2001
From: Ralf Jung <jung@mpi-sws.org>
Date: Fri, 5 Oct 2018 10:06:02 +0200
Subject: [PATCH] bump Iris

---
 opam                             | 2 +-
 theories/adequacy.v              | 2 +-
 theories/tests/message_passing.v | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/opam b/opam
index 30924c88..769e5c30 100644
--- a/opam
+++ b/opam
@@ -9,5 +9,5 @@ build: [make "-j%{jobs}%"]
 install: [make "install"]
 remove: [ "sh" "-c" "rm -rf '%{lib}%/coq/user-contrib/igps" ]
 depends: [
-  "coq-iris" { (= "dev.2018-07-13.0.cbf73155") | (= "dev") }
+  "coq-iris" { (= "dev.2018-10-04.7.fc21b664") | (= "dev") }
 ]
diff --git a/theories/adequacy.v b/theories/adequacy.v
index 5308ce4c..52954f88 100644
--- a/theories/adequacy.v
+++ b/theories/adequacy.v
@@ -180,7 +180,7 @@ Definition base_adequacy Σ `{!basePreG Σ} e V σ φ :
   phys_inv σ ->
   view_ok (mem σ) V ->
   (∀ `{!foundationG Σ} π, PSCtx ∗ Seen π V ⊢ WP e {{ v, ⌜φ v⌝ }}) →
-  adequate NotStuck e σ φ.
+  adequate NotStuck e σ (λ v _, φ v).
 Proof.
   intros Inv VOk Hwp; eapply (ownP_adequacy _ _). iIntros (?).
   iMod (own_alloc (● {[1%positive := Excl V]} ⋅ ◯ {[1%positive:=Excl V]})) as (γV) "HV".
diff --git a/theories/tests/message_passing.v b/theories/tests/message_passing.v
index 7f662672..3fee7649 100644
--- a/theories/tests/message_passing.v
+++ b/theories/tests/message_passing.v
@@ -18,7 +18,7 @@ Next Obligation.
 Qed.
 
 Lemma message_passing :
-  adequate NotStuck (message_passing, ∅) initial_state (λ v, v.1 = LitV (LitInt 37)).
+  adequate NotStuck (message_passing, ∅) initial_state (λ v _, v.1 = LitV (LitInt 37)).
 Proof.
   apply (base_adequacy Σ _ ∅); auto.
   - split; repeat red; rewrite /initial_state /=; try set_solver.
-- 
GitLab