Przeglądaj źródła

keep inline var constraints when -D haxe3 is set

Simon Krajewski 13 lat temu
rodzic
commit
1ae48da4a3
1 zmienionych plików z 1 dodań i 1 usunięć
  1. 1 1
      typeload.ml

+ 1 - 1
typeload.ml

@@ -950,7 +950,7 @@ let init_class ctx c p herits fields =
 					if not inline then mark_used cf;
 					let e = type_var_field ctx t e stat p in
 					let e = (match cf.cf_kind with
-					| Var v when not stat ->
+					| Var v when not stat || (v.v_read = AccInline && Common.defined ctx.com "haxe3") ->
 						let e = ctx.g.do_optimize ctx e in
 						let rec is_const e =
 							match e.eexpr with