소스 검색

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