summaryrefslogtreecommitdiff
path: root/camlp4
diff options
context:
space:
mode:
authorAlain Frisch <alain@frisch.fr>2013-07-22 14:58:15 +0000
committerAlain Frisch <alain@frisch.fr>2013-07-22 14:58:15 +0000
commit87d9d6c877e3c5f4a5aa101d7eb66af4c79ae3b3 (patch)
tree32d14beb03d32003487dd79b904cf2e7ab6683d3 /camlp4
parent8df2057b4662c16eb6f09d403e784770a26caea3 (diff)
downloadocaml-87d9d6c877e3c5f4a5aa101d7eb66af4c79ae3b3.tar.gz
More explicit internal representation of attribute payload. Now also support patterns as payload [%id ? pat].
git-svn-id: http://caml.inria.fr/svn/ocaml/branches/extension_points@13919 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'camlp4')
-rw-r--r--camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml b/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml
index 2cca622635..8dab7d8d61 100644
--- a/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml
+++ b/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml
@@ -1270,7 +1270,7 @@ value varify_constructors var_names =
;
value attribute loc s str =
- (with_loc s loc, str_item str);
+ (with_loc s loc, PStr (str_item str));
value () =
attribute_fwd.val := attribute;