浏览代码

[swf] do not generate dynamic method fields in interfaces (see #3159)

Simon Krajewski 11 年之前
父节点
当前提交
f399394472
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      genswf9.ml

+ 1 - 1
genswf9.ml

@@ -362,7 +362,7 @@ let property ctx p t =
 		let rec loop c =
 		let rec loop c =
 			try
 			try
 				(match PMap.find p c.cl_fields with
 				(match PMap.find p c.cl_fields with
-				| { cf_kind = Var _ } -> raise Exit (* no vars in interfaces in swf9 *)
+				| { cf_kind = Var _ | Method MethDynamic } -> raise Exit (* no vars in interfaces in swf9 *)
 				| _ -> c)
 				| _ -> c)
 			with Not_found ->
 			with Not_found ->
 				let rec loop2 = function
 				let rec loop2 = function