diff options
| author | Alain Frisch <alain@frisch.fr> | 2013-04-10 17:26:55 +0000 |
|---|---|---|
| committer | Alain Frisch <alain@frisch.fr> | 2013-04-10 17:26:55 +0000 |
| commit | ee5f754a42fa42f69cc70283bb033ea2be1ce6f1 (patch) | |
| tree | 58967ecffa45177a8d93a104c9d70e10f05e41a4 /camlp4 | |
| parent | cb38ccc346a8ef0a240d70cdd02375ca90c15005 (diff) | |
| download | ocaml-ee5f754a42fa42f69cc70283bb033ea2be1ce6f1.tar.gz | |
Attributes and extension points in class_expr.
git-svn-id: http://caml.inria.fr/svn/ocaml/branches/extension_points@13500 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'camlp4')
| -rw-r--r-- | camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml | 2 | ||||
| -rw-r--r-- | camlp4/boot/Camlp4.ml | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml b/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml index 12cd576982..4590022932 100644 --- a/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml +++ b/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml @@ -68,7 +68,7 @@ module Make (Ast : Sig.Camlp4Ast) = struct value mkmod loc d = {pmod_desc = d; pmod_loc = mkloc loc; pmod_attributes = []}; value mkstr loc d = {pstr_desc = d; pstr_loc = mkloc loc}; value mkcty loc d = {pcty_desc = d; pcty_loc = mkloc loc}; - value mkcl loc d = {pcl_desc = d; pcl_loc = mkloc loc}; + value mkcl loc d = {pcl_desc = d; pcl_loc = mkloc loc; pcl_attributes = []}; value mkcf loc d = { pcf_desc = d; pcf_loc = mkloc loc; pcf_attributes = []}; value mkctf loc d = { pctf_desc = d; pctf_loc = mkloc loc; pctf_attributes = []}; diff --git a/camlp4/boot/Camlp4.ml b/camlp4/boot/Camlp4.ml index 4ae04dac8d..2ce1832cef 100644 --- a/camlp4/boot/Camlp4.ml +++ b/camlp4/boot/Camlp4.ml @@ -14187,7 +14187,7 @@ module Struct = let mkcty loc d = { pcty_desc = d; pcty_loc = mkloc loc; } - let mkcl loc d = { pcl_desc = d; pcl_loc = mkloc loc; } + let mkcl loc d = { pcl_desc = d; pcl_loc = mkloc loc; pcl_attributes = []} let mkcf loc d = { pcf_desc = d; pcf_loc = mkloc loc; pcf_attributes = [] } |