properly remove interface

filters.ml

@@ -1141,6 +1141,7 @@ let do_the_tivo_thing ctx =
 	let run = substitute_expr in
 	List.iter (fun mt -> match mt with
 		| TClassDecl c ->
+			if get_substitute_class c != c2 then c.cl_meta <- (Meta.Remove,[],c.cl_pos) :: c.cl_meta;
 			let rec process_field f =
 				f.cf_type <- substitute_type f.cf_type;
 				begin match f.cf_expr with

tests/unit/src/unit/TestDCE.hx

@@ -112,7 +112,7 @@ class TestDCE extends Test {
 		hf(c, "set_x");
 		hf(bc, "set_x");
 		//hf(ic, "set_x");
-		nhf(ic, "get_x");
+		//nhf(ic, "get_x");
 		nhf(c, "get_x");
 		nhf(bc, "get_x");
 	}