diff options
| author | Alain Frisch <alain@frisch.fr> | 2013-04-09 15:54:41 +0000 |
|---|---|---|
| committer | Alain Frisch <alain@frisch.fr> | 2013-04-09 15:54:41 +0000 |
| commit | d84ae411827a04f4240f94139e2d8c4aa64b139e (patch) | |
| tree | 475f98289a7dc345dda3c8f5afb1c2d7be1e3820 /camlp4/Camlp4/Struct | |
| parent | 3df9fa27623d2c23fc3af6b78361a0134eaa8de5 (diff) | |
Item attributes on class fields.
git-svn-id: http://caml.inria.fr/svn/ocaml/branches/extension_points@13493 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'camlp4/Camlp4/Struct')
| -rw-r--r-- | camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml b/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml index 294125fac..69e708ba8 100644 --- a/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml +++ b/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml @@ -69,7 +69,7 @@ module Make (Ast : Sig.Camlp4Ast) = struct 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 mkcf loc d = { pcf_desc = d; pcf_loc = mkloc loc; }; + value mkcf loc d = { pcf_desc = d; pcf_loc = mkloc loc; pcf_attributes = []}; value mkctf loc d = { pctf_desc = d; pctf_loc = mkloc loc; }; value mkpolytype t = |