From 4ce78761937ccada863fb4cda56d486804c048dc Mon Sep 17 00:00:00 2001 From: Ralf Jung <jung@mpi-sws.org> Date: Thu, 22 Oct 2020 08:59:03 +0200 Subject: [PATCH] update dependencies; fix for auth changes --- opam | 2 +- theories/lang/arc_cmra.v | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/opam b/opam index d57c87b2..e41b3f1e 100644 --- a/opam +++ b/opam @@ -16,7 +16,7 @@ This branch uses a proper weak memory model. """ depends: [ - "coq-gpfsl" { (= "dev.2020-10-13.0.65e2d7ca") | (= "dev") } + "coq-gpfsl" { (= "dev.2020-10-21.0.e29403ca") | (= "dev") } ] build: [make "-j%{jobs}%"] diff --git a/theories/lang/arc_cmra.v b/theories/lang/arc_cmra.v index ec4e06cd..81a09112 100644 --- a/theories/lang/arc_cmra.v +++ b/theories/lang/arc_cmra.v @@ -366,7 +366,7 @@ Section ArcGhost. iDestruct 1 as (Ut) "WU". iIntros "WU'". iDestruct (WkUps_join with "[$WU $WU']") as "WU". iDestruct (@own_valid _ arcUR with "WU") - as %[_ [_ [[VAL _]%auth_frag_valid _]]]. + as %[_ [_ [[VAL _]%auth_frag_valid_1 _]]]. iPureIntro. simpl in VAL. have Lt: (1%Qp < (1%Qp + q)%Qp)%Qc. apply Qp_lt_sum. by eexists. apply (irreflexive_eq (R:= Qclt) 1%Qp 1%Qp); [done|]. @@ -583,7 +583,7 @@ Section ArcGhost. iDestruct 1 as (Mt) "SM". iIntros "SM'". iDestruct (StrMoves_agree with "[$SM $SM']") as %?. subst Mt'. iDestruct (StrMoves_fractional with "[$SM $SM']") as "SM". - iDestruct (@own_valid _ arcUR with "SM") as %[_ [[[[VAL _] _] _] _]]. + iDestruct (@own_valid _ arcUR with "SM") as %[_ [[[[VAL _]%auth_frag_valid_1 _] _] _]]. iPureIntro. simpl in VAL. have Lt: (1%Qp < (1%Qp + q)%Qp)%Qc. apply Qp_lt_sum. by eexists. apply (irreflexive_eq (R:= Qclt) 1%Qp 1%Qp); [done|]. -- GitLab