Simon Krajewski 12 gadi atpakaļ
vecāks
revīzija
4ecfd4f7d9
1 mainītis faili ar 1 papildinājumiem un 1 dzēšanām
  1. 1 1
      filters.ml

+ 1 - 1
filters.ml

@@ -936,7 +936,7 @@ let add_field_inits ctx t =
 		let inits,fields = List.fold_left (fun (inits,fields) cf ->
 			match cf.cf_kind,cf.cf_expr with
 			| Var _, Some _ ->
-				(cf :: inits, cf :: fields)
+				if Common.defined ctx.com Define.As3 then (inits, cf :: fields) else (cf :: inits, cf :: fields)
 			| Method MethDynamic, Some e when Common.defined ctx.com Define.As3 ->
 				(* TODO : this would have a better place in genSWF9 I think - NC *)
 				(* we move the initialization of dynamic functions to the constructor and also solve the