update Iris

opam

@@ -9,5 +9,5 @@ build: [make "-j%{jobs}%"]
 install: [make "install"]
 remove: ["rm" "-rf" "%{lib}%/coq/user-contrib/iris_atomic"]
 depends: [
-  "coq-iris" { (= "dev.2017-10-18.1") | (= "dev") }
+  "coq-iris" { (= "dev.2017-10-28.12") | (= "dev") }
 ]

theories/misc.v

@@ -60,7 +60,7 @@ Section big_op_later.
 End big_op_later.
 
 Section pair.
-  Context {A : ofeT} `{EqDecision A, !Discrete A, !LeibnizEquiv A, !inG Σ (prodR fracR (agreeR A))}.
+  Context {A : ofeT} `{EqDecision A, !OfeDiscrete A, !LeibnizEquiv A, !inG Σ (prodR fracR (agreeR A))}.
 
   Lemma m_frag_agree γm (q1 q2: Qp) (a1 a2: A):
     own γm (q1, to_agree a1) ∗ own γm (q2, to_agree a2) ⊢ ⌜a1 = a2⌝.

theories/treiber.v

@@ -81,10 +81,10 @@ Section proof.
 
   Definition is_stack (s: loc) xs: iProp Σ := (∃ hd: loc, s ↦ #hd ∗ is_list hd xs)%I.
 
-  Global Instance is_list_timeless xs hd: TimelessP (is_list hd xs).
+  Global Instance is_list_timeless xs hd: Timeless (is_list hd xs).
   Proof. generalize hd. induction xs; apply _. Qed.
 
-  Global Instance is_stack_timeless xs hd: TimelessP (is_stack hd xs).
+  Global Instance is_stack_timeless xs hd: Timeless (is_stack hd xs).
   Proof. generalize hd. induction xs; apply _. Qed.
 
   Lemma new_stack_spec: