diff options
author | Jérémie Dimino <jeremie@dimino.org> | 2013-05-23 15:12:04 +0000 |
---|---|---|
committer | Jérémie Dimino <jeremie@dimino.org> | 2013-05-23 15:12:04 +0000 |
commit | 8cee3aedf99a9649d96088e7ce31951b0fac0268 (patch) | |
tree | e739d6eaa06af1c118017378d8d86e0e9cf90918 /parsing/parsetree.mli | |
parent | 3beb7a5da092284677f3f58540d7c0c6374619f2 (diff) | |
download | ocaml-8cee3aedf99a9649d96088e7ce31951b0fac0268.tar.gz |
Revert addition of raw literals to the parsetree
It turns out it is not possible to have the exact raw representation
since a constant does not always correspond to exactly one token, so
there is no point in making the AST more complex.
git-svn-id: http://caml.inria.fr/svn/ocaml/branches/extension_points@13702 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'parsing/parsetree.mli')
-rw-r--r-- | parsing/parsetree.mli | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/parsing/parsetree.mli b/parsing/parsetree.mli index 68161fcb71..2dc932fa50 100644 --- a/parsing/parsetree.mli +++ b/parsing/parsetree.mli @@ -130,9 +130,9 @@ and pattern_desc = (* x *) | Ppat_alias of pattern * string loc (* P as 'a *) - | Ppat_constant of raw_constant + | Ppat_constant of constant (* 1, 'a', "true", 1.0, 1l, 1L, 1n *) - | Ppat_interval of raw_constant * raw_constant + | Ppat_interval of constant * constant (* 'a'..'z' Other forms of interval are recognized by the parser @@ -183,7 +183,7 @@ and expression_desc = (* x M.x *) - | Pexp_constant of raw_constant + | Pexp_constant of constant (* 1, 'a', "true", 1.0, 1l, 1L, 1n *) | Pexp_let of rec_flag * (pattern * expression) list * expression (* let P1 = E1 and ... and Pn = EN in E (flag = Nonrecursive) |