瀏覽代碼

Visit abstract implementation types too

Hugh Sanderson 12 年之前
父節點
當前提交
c1698af736
共有 1 個文件被更改,包括 2 次插入0 次删除
  1. 2 0
      gencpp.ml

+ 2 - 0
gencpp.ml

@@ -2134,6 +2134,8 @@ let find_referenced_types ctx obj super_deps constructor_deps header_only for_de
 			)
 		| TFun (args,haxe_type) -> visit_type haxe_type;
 				List.iter (fun (_,_,t) -> visit_type t; ) args;
+		| TAbstract (abs,pl) when abs.a_impl <> None ->
+			visit_type (apply_params abs.a_types pl abs.a_this)
 		| _ -> ()
 	in
 	let rec visit_types expression =