diff --git a/coq-lambda-rust.opam b/coq-lambda-rust.opam index 251fd15a26b61b5a638362dc6f113e830f417b50..135f16ead52fcc276265c68acc66824d4e08c02d 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-26.0.c7fcd140") | (= "dev") } + "coq-iris" { (= "dev.2021-07-16.0.ca19ab25") | (= "dev") } ] build: [make "-j%{jobs}%"] diff --git a/theories/lifetime/model/creation.v b/theories/lifetime/model/creation.v index dbfdff98dff95b716b776af3e371a2e29d9caa15..9aa2e3ae38c58bb817ecfa0a9caf25c4e3377855 100644 --- a/theories/lifetime/model/creation.v +++ b/theories/lifetime/model/creation.v @@ -53,7 +53,8 @@ Proof. iModIntro. rewrite /lft_inv_dead. iExists Q. iFrame. rewrite /lft_bor_dead. iExists (dom _ B), P. rewrite !gset_to_gmap_dom -map_fmap_compose. - rewrite (map_fmap_ext _ ((1%Qp,.) ∘ to_agree) B); last naive_solver. + rewrite (map_fmap_ext _ ((1%Qp,.) ∘ to_agree) B); last first. + { move=>?? /HB ->. done. } iFrame. Qed.