Pārlūkot izejas kodu

[typer] add back @:enum for enum abstracts

Simon Krajewski 5 gadi atpakaļ
vecāks
revīzija
17025b699d
1 mainītis faili ar 1 papildinājumiem un 0 dzēšanām
  1. 1 0
      src/typing/typeloadModule.ml

+ 1 - 0
src/typing/typeloadModule.ml

@@ -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 ->