summaryrefslogtreecommitdiffstats
path: root/bytecomp/translcore.ml
diff options
context:
space:
mode:
authorAlain Frisch <alain@frisch.fr>2013-04-10 17:26:55 +0000
committerAlain Frisch <alain@frisch.fr>2013-04-10 17:26:55 +0000
commitee5f754a42fa42f69cc70283bb033ea2be1ce6f1 (patch)
tree58967ecffa45177a8d93a104c9d70e10f05e41a4 /bytecomp/translcore.ml
parentcb38ccc346a8ef0a240d70cdd02375ca90c15005 (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.ml4
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