Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Iris
Iris
Commits
457c12fe
Commit
457c12fe
authored
Dec 09, 2016
by
Robbert Krebbers
Browse files
Make some overlapping heap_lang notations parsing only.
parent
6e697ccc
Changes
1
Hide whitespace changes
Inline
Side-by-side
heap_lang/notation.v
View file @
457c12fe
...
...
@@ -91,15 +91,15 @@ Notation "e1 || e2" :=
(
If
e1
%
E
(
Lit
(
LitBool
true
))
e2
%
E
)
(
only
parsing
)
:
expr_scope
.
(** Notations for option *)
Notation
NONE
:
=
(
InjL
#()).
Notation
SOME
x
:
=
(
InjR
x
).
Notation
NONE
:
=
(
InjL
#())
(
only
parsing
)
.
Notation
SOME
x
:
=
(
InjR
x
)
(
only
parsing
)
.
Notation
NONEV
:
=
(
InjLV
#()).
Notation
SOMEV
x
:
=
(
InjRV
x
).
Notation
NONEV
:
=
(
InjLV
#())
(
only
parsing
)
.
Notation
SOMEV
x
:
=
(
InjRV
x
)
(
only
parsing
)
.
Notation
"'match:' e0 'with' 'NONE' => e1 | 'SOME' x => e2 'end'"
:
=
(
Match
e0
BAnon
e1
x
%
bind
e2
)
(
e0
,
e1
,
x
,
e2
at
level
200
)
:
expr_scope
.
(
e0
,
e1
,
x
,
e2
at
level
200
,
only
parsing
)
:
expr_scope
.
Notation
"'match:' e0 'with' 'SOME' x => e2 | 'NONE' => e1 'end'"
:
=
(
Match
e0
BAnon
e1
x
%
bind
e2
)
(
e0
,
e1
,
x
,
e2
at
level
200
,
only
parsing
)
:
expr_scope
.
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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