|
@@ -332,6 +332,7 @@ let module_pass_1 ctx m tdecls loadp =
|
|
|
a_write = None;
|
|
|
a_enum = List.mem AbEnum d.d_flags || Meta.has Meta.Enum d.d_meta;
|
|
|
} in
|
|
|
+ if a.a_enum && not (Meta.has Meta.Enum a.a_meta) then a.a_meta <- (Meta.Enum,[],null_pos) :: a.a_meta;
|
|
|
decls := (TAbstractDecl a, decl) :: !decls;
|
|
|
match d.d_data with
|
|
|
| [] when Meta.has Meta.CoreType a.a_meta ->
|