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 /bytecomp/translcore.ml | |
parent | cb38ccc346a8ef0a240d70cdd02375ca90c15005 (diff) |
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 'bytecomp/translcore.ml')
-rw-r--r-- | bytecomp/translcore.ml | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/bytecomp/translcore.ml b/bytecomp/translcore.ml index 3f541f4a8..d621221f5 100644 --- a/bytecomp/translcore.ml +++ b/bytecomp/translcore.ml @@ -869,7 +869,9 @@ and transl_exp0 e = { cl_desc = Tcl_structure cs; cl_loc = e.exp_loc; cl_type = Cty_signature cty; - cl_env = e.exp_env } + cl_env = e.exp_env; + cl_attributes = []; + } and transl_list expr_list = List.map transl_exp expr_list |