From 242c884afa9dd97d73082ace71f9e1cbe1982f46 Mon Sep 17 00:00:00 2001 From: Ralf Jung <jung@mpi-sws.org> Date: Sun, 27 Jun 2021 00:49:14 +0200 Subject: [PATCH] update dependencies --- coq-lambda-rust.opam | 2 +- theories/lifetime/model/accessors.v | 4 ++-- theories/lifetime/model/reborrow.v | 6 +++--- 3 files changed, 6 insertions(+), 6 deletions(-) diff --git a/coq-lambda-rust.opam b/coq-lambda-rust.opam index c3058ceb..251fd15a 100644 --- a/coq-lambda-rust.opam +++ b/coq-lambda-rust.opam @@ -13,7 +13,7 @@ the type system, and safety proof for some Rust libraries. """ depends: [ - "coq-iris" { (= "dev.2021-06-18.0.366d607e") | (= "dev") } + "coq-iris" { (= "dev.2021-06-26.0.c7fcd140") | (= "dev") } ] build: [make "-j%{jobs}%"] diff --git a/theories/lifetime/model/accessors.v b/theories/lifetime/model/accessors.v index 90b1b968..ac80399c 100644 --- a/theories/lifetime/model/accessors.v +++ b/theories/lifetime/model/accessors.v @@ -28,7 +28,7 @@ Proof. by apply (exclusive_local_update _ (1%Qp, to_agree (Bor_open q))). } rewrite own_bor_op -fmap_insert. iDestruct "Hbor" as "[Hown $]". iExists _. iFrame "∗". - rewrite -insert_delete big_sepM_insert ?lookup_delete // big_sepM_delete /=; last done. + rewrite -insert_delete_insert big_sepM_insert ?lookup_delete // big_sepM_delete /=; last done. iDestruct "HB" as "[_ $]". auto. Qed. @@ -51,7 +51,7 @@ Proof. rewrite own_bor_op -fmap_insert. iDestruct "Hbor" as "[Hown $]". rewrite big_sepM_delete //. simpl. iDestruct "HB" as "[>$ HB]". iExists _. iFrame "Hbox Hown". - rewrite -insert_delete big_sepM_insert ?lookup_delete //. simpl. by iFrame. + rewrite -insert_delete_insert big_sepM_insert ?lookup_delete //. simpl. by iFrame. Qed. Lemma add_vs Pb Pb' P Q Pi κ : diff --git a/theories/lifetime/model/reborrow.v b/theories/lifetime/model/reborrow.v index 7b0bce86..3f990264 100644 --- a/theories/lifetime/model/reborrow.v +++ b/theories/lifetime/model/reborrow.v @@ -49,7 +49,7 @@ Proof. rewrite /to_borUR !fmap_insert. iFrame "Hbox HBâ—". iDestruct (@big_sepM_delete with "HB") as "[_ HB]"; first done. rewrite (big_sepM_delete _ (<[_:=_]>_) i); last by rewrite lookup_insert. - rewrite -insert_delete delete_insert ?lookup_delete //=. iFrame; auto. } + rewrite -insert_delete_insert delete_insert ?lookup_delete //=. iFrame; auto. } clear B HB Pb' Pi'. rewrite {1}/lft_bor_alive. iDestruct "Hκalive'" as (B) "(Hbox & >HBâ— & HB)". iMod (slice_insert_full _ _ true with "HP Hbox") @@ -93,7 +93,7 @@ Proof. iIntros (_). rewrite lft_inv_alive_unfold. iExists Pb', Pi'. iFrame "Hvs' Hinh". rewrite /lft_bor_alive. iExists (<[i:=Bor_in]>B'). rewrite /to_borUR !fmap_insert. iFrame. - rewrite -insert_delete big_sepM_insert ?lookup_delete //=. by iFrame. } + rewrite -insert_delete_insert big_sepM_insert ?lookup_delete //=. by iFrame. } iModIntro. rewrite -[S n]Nat.add_1_l -nat_op auth_frag_op own_cnt_op. by iFrame. Qed. @@ -135,7 +135,7 @@ Proof. as (Pb'') "HH"; [solve_ndisj|done|done| | |]. { rewrite /lft_bor_alive (big_sepM_delete _ B i') //. iDestruct "HB" as "[_ HB]". iExists (delete i' B). rewrite -fmap_delete. iFrame. - rewrite fmap_delete -insert_delete delete_insert ?lookup_delete //=. } + rewrite fmap_delete -insert_delete_insert delete_insert ?lookup_delete //=. } { iNext. iApply (lft_vs_cons with "[] Hvs"). iIntros "[??] _ !>". iNext. iRewrite "HeqPb'". iFrame. by iApply "HP'". } iDestruct "HH" as "([HI Hinvκ] & $ & Halive & Hvs)". -- GitLab