|
let empty_ctor = mk_class_field "new" (TFun(["empty",false,empty_ctor_type],basic.tvoid)) false cl.cl_pos (Method MethNormal) [] in
|
|
let empty_ctor = mk_class_field "new" (TFun(["empty",false,empty_ctor_type],basic.tvoid)) false cl.cl_pos (Method MethNormal) [] in
|
|
empty_ctor.cf_meta <- [Meta.SkipCtor,[],empty_ctor.cf_pos];
|
|
empty_ctor.cf_meta <- [Meta.SkipCtor,[],empty_ctor.cf_pos];
|