Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Gaurav Parthasarathy
examples_rdcss_old
Commits
3aa2c6c8
Commit
3aa2c6c8
authored
Jun 23, 2018
by
Ralf Jung
Browse files
bump Iris; fix for std++ change
parent
b6f3e75d
Changes
2
Hide whitespace changes
Inline
Side-by-side
opam
View file @
3aa2c6c8
...
...
@@ -9,6 +9,6 @@ build: [make "-j%{jobs}%"]
install: [make "install"]
remove: ["rm" "-rf" "%{lib}%/coq/user-contrib/iris_examples"]
depends: [
"coq-iris" { (= "dev.2018-0
5-17.0.463474fb
") | (= "dev") }
"coq-iris" { (= "dev.2018-0
6-23.0.a6e581d0
") | (= "dev") }
"coq-autosubst" { = "dev.coq86" }
]
theories/concurrent_stacks/concurrent_stack4.v
View file @
3aa2c6c8
...
...
@@ -268,13 +268,11 @@ Section stack_works.
iDestruct
"Hstack"
as
(
l''
v'
xs
)
"[% [Hl'' [Hstack HP]]]"
.
iDestruct
(
"Hmove"
with
"HP"
)
as
"Hmove"
.
iDestruct
(
fupd_mask_mono
with
"Hmove"
)
as
"Hmove"
;
last
iMod
"Hmove"
as
"[HP HQ'']"
.
{
apply
ndisj_subseteq_difference
;
try
solve_ndisj
.
}
last
iMod
"Hmove"
as
"[HP HQ'']"
;
first
solve_ndisj
.
iDestruct
"Hcont"
as
"[Hsucc _]"
.
iDestruct
(
"Hsucc"
with
"HP"
)
as
"Hsucc"
.
iDestruct
(
fupd_mask_mono
with
"Hsucc"
)
as
"Hsucc"
;
last
(
iMod
"Hsucc"
as
"[HQ HP]"
).
{
apply
ndisj_subseteq_difference
;
try
solve_ndisj
.
}
last
(
iMod
"Hsucc"
as
"[HQ HP]"
)
;
first
solve_ndisj
.
iMod
(
"Hclose2"
with
"[Hl'' Hstack HP]"
).
{
iExists
l''
,
v'
,
xs
;
iSplit
;
iFrame
;
auto
.
}
iModIntro
.
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment