소스 검색

[swf] explicitly ignore Null when building swf catalog

closes #7994
Simon Krajewski 6 년 전
부모
커밋
d7426d107d
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  1. 1 1
      src/generators/genswf.ml

+ 1 - 1
src/generators/genswf.ml

@@ -74,7 +74,7 @@ let build_dependencies t =
 			(match c.cl_kind with KTypeParameter _ -> () | _ -> add_path c.cl_path DKType);
 			List.iter (add_type_rec (t::l)) pl;
 		| TAbstract (a,pl) ->
-			if Meta.has Meta.CoreType a.a_meta then
+			if a.a_path <> ([],"Null") && Meta.has Meta.CoreType a.a_meta then
 				add_path a.a_path DKType;
 			List.iter (add_type_rec (t::l)) pl;
 		| TFun (pl,t2) ->