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
Iris
gpfsl
Commits
f2e1c371
Commit
f2e1c371
authored
Oct 04, 2021
by
Hai Dang
Browse files
Fix build
parent
db6938b7
Changes
2
Hide whitespace changes
Inline
Side-by-side
theories/examples/stack/proof_elim_graph.v
View file @
f2e1c371
...
...
@@ -1224,7 +1224,7 @@ Proof.
(* store our local observations at an old view *)
iCombine
"sbs sx Gs1 SLb0 ELx0"
as
"THUNK"
.
iDestruct
(
view_at_intro_incl
with
"THUNK sV0"
)
as
(
V1
)
"(sV1 & %LeV0 & sbs' & sx' & Gs1' & SLb0' & ELx0' {THUNK}"
.
as
(
V1
)
"(sV1 & %LeV0 & sbs' & sx' & Gs1' & SLb0' & ELx0'
)
{THUNK}"
.
wp_lam
.
wp_op
.
rewrite
shift_0
.
(* read base stack pointer *)
...
...
theories/examples/stack/proof_treiber_graph.v
View file @
f2e1c371
...
...
@@ -809,8 +809,8 @@ Proof.
iDestruct
(
StackLocal_upgrade_instance
with
"SI SL1"
)
as
"{SL1} #[Gs1 SL1]"
.
iDestruct
(
StackLocal_upgrade_instance
with
"SI SL2"
)
as
"{SL2} #[Gs2 SL2]"
.
iDestruct
(
graph_snap_union
with
"Gs1 Gs2"
)
as
"$"
.
iDestruct
"SL1
'
"
as
(
γ
γ
h
)
"(SS1 & MT1 & II)"
.
iDestruct
"SL2
'
"
as
(
γ
2
γ
h2
)
"(SS2 & MT2 & _)"
.
iDestruct
"SL1"
as
(
γ
γ
h
)
"(SS1 & MT1 & II)"
.
iDestruct
"SL2"
as
(
γ
2
γ
h2
)
"(SS2 & MT2 & _)"
.
iDestruct
(
meta_agree
with
"MT1 MT2"
)
as
%[<-
<-]%
pair_inj
.
iExists
γ
,
γ
h
.
iFrame
"MT1 II"
.
iDestruct
"SI"
as
(
γ
2
T
SC
)
"[G SL]"
.
...
...
Write
Preview
Supports
Markdown
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