Explorar o código

minor "throw" bugfix

Nicolas Cannasse %!s(int64=17) %!d(string=hai) anos
pai
achega
fdfe97c701
Modificáronse 1 ficheiros con 1 adicións e 0 borrados
  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);