diff options
| author | Alain Frisch <alain@frisch.fr> | 2013-03-22 11:30:28 +0000 |
|---|---|---|
| committer | Alain Frisch <alain@frisch.fr> | 2013-03-22 11:30:28 +0000 |
| commit | f85f1e27591a59fc797b064e38252553d76dbf94 (patch) | |
| tree | b58300c0f873ab9b4ee6932b280e81f4ba016b74 /parsing | |
| parent | b9ad592ac04e70c5915cccdd7723f4a3c18f00eb (diff) | |
Get rid of alternative syntax for '(module...)'.
git-svn-id: http://caml.inria.fr/svn/ocaml/branches/extension_points@13420 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'parsing')
| -rw-r--r-- | parsing/parser.mly | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/parsing/parser.mly b/parsing/parser.mly index c69ef1c19..244639604 100644 --- a/parsing/parser.mly +++ b/parsing/parser.mly @@ -1181,12 +1181,12 @@ simple_expr: { mkexp (Pexp_override [])} | simple_expr SHARP label { mkexp(Pexp_send($1, $3)) } - | LPAREN MODULE ext_attributes module_expr RPAREN - { mkexp_attrs (Pexp_pack $4) $3 } - | LPAREN MODULE ext_attributes module_expr COLON package_type RPAREN - { mkexp_attrs (Pexp_constraint (ghexp (Pexp_pack $4), - Some (ghtyp (Ptyp_package $6)), None)) $3 } - | LPAREN MODULE ext_attributes module_expr COLON error + | LPAREN MODULE module_expr RPAREN + { mkexp (Pexp_pack $3) } + | LPAREN MODULE module_expr COLON package_type RPAREN + { mkexp (Pexp_constraint (ghexp (Pexp_pack $3), + Some (ghtyp (Ptyp_package $5)), None)) } + | LPAREN MODULE module_expr COLON error { unclosed "(" 1 ")" 5 } | extension { mkexp (Pexp_extension $1) } |