소스 검색

do not replace interfaces with other interfaces

Simon Krajewski 9 년 전
부모
커밋
c74f7be349
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  1. 1 1
      filters.ml

+ 1 - 1
filters.ml

@@ -1102,7 +1102,7 @@ let check_remove_metadata ctx t = match t with
 
 let do_the_tivo_thing ctx =
 	let rec get_substitute_class c = match c.cl_dependent with
-		| [({cl_params = []} as c2),[]] when c.cl_interface && c.cl_params = [] && not c.cl_extern && not (Meta.has Meta.Keep c.cl_meta) ->
+		| [({cl_params = []} as c2),[]] when c.cl_interface && not c2.cl_interface && c.cl_params = [] && not c.cl_extern && not (Meta.has Meta.Keep c.cl_meta) ->
 			get_substitute_class c2
 		| _ -> c
 	in