2
0
Nicolas Cannasse 17 жил өмнө
parent
commit
fdfe97c701
1 өөрчлөгдсөн 1 нэмэгдсэн , 0 устгасан
  1. 1 0
      genswf9.ml

+ 1 - 0
genswf9.ml

@@ -737,6 +737,7 @@ let rec gen_expr_content ctx retval e =
 	| TConst c ->
 		gen_constant ctx c e.etype e.epos
 	| TThrow e ->
+		ctx.infos.icond <- true;
 		getvar ctx (VGlobal (type_path ctx ([],ctx.boot)));
 		let id = type_path ctx (["flash"],"Error") in
 		write ctx (HFindPropStrict id);