Преглед на файлове

keep inline var constraints when -D haxe3 is set

Simon Krajewski преди 13 години
родител
ревизия
1ae48da4a3
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  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