Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
POTTIER Francois
menhir
Commits
8cc8231b
Commit
8cc8231b
authored
Feb 11, 2015
by
POTTIER Francois
Browse files
A tiny simplification.
parent
592dd96e
Changes
1
Hide whitespace changes
Inline
Side-by-side
src/fancy-parser.mly
View file @
8cc8231b
...
...
@@ -63,7 +63,7 @@ grammar:
{
pg_filename
=
""
;
(* filled in by the caller *)
pg_declarations
=
List
.
flatten
ds
;
pg_rules
=
List
.
flatten
rs
;
pg_rules
=
rs
;
pg_trailer
=
t
}
}
...
...
@@ -227,16 +227,14 @@ rule:
branches
=
branches
{
let
public
,
inline
=
flags
in
[
{
pr_public_flag
=
public
;
pr_inline_flag
=
inline
;
pr_nt
=
Positions
.
value
symbol
;
pr_positions
=
[
Positions
.
position
symbol
];
pr_parameters
=
List
.
map
Positions
.
value
params
;
pr_branches
=
branches
}
]
{
pr_public_flag
=
public
;
pr_inline_flag
=
inline
;
pr_nt
=
Positions
.
value
symbol
;
pr_positions
=
[
Positions
.
position
symbol
];
pr_parameters
=
List
.
map
Positions
.
value
params
;
pr_branches
=
branches
}
}
|
error
{
Error
.
error
(
Positions
.
two
$
startpos
$
endpos
)
"syntax error inside the definition of a nonterminal symbol."
}
...
...
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