浏览代码

fixed issue #716

Nicolas Cannasse 13 年之前
父节点
当前提交
13fd36554f
共有 1 个文件被更改,包括 2 次插入0 次删除
  1. 2 0
      genswf9.ml

+ 2 - 0
genswf9.ml

@@ -1879,6 +1879,8 @@ let generate_field_kind ctx f c stat =
 				PMap.exists name c.cl_fields || loop c name
 		in
 		(match f.cf_kind with
+		| Method MethDynamic when List.mem f.cf_name c.cl_overrides ->
+			None
 		| Var _ | Method MethDynamic ->
 			Some (HFVar {
 				hlv_type = Some (type_path ctx ([],"Function"));