Ver Fonte

remove debug leftovers [skip-ci]

Simon Krajewski há 11 anos atrás
pai
commit
dea986e91f
1 ficheiros alterados com 0 adições e 2 exclusões
  1. 0 2
      typeload.ml

+ 0 - 2
typeload.ml

@@ -1715,8 +1715,6 @@ let init_class ctx c p context_init herits fields =
 		| Some e ->
 		| Some e ->
 			let check_cast e =
 			let check_cast e =
 				(* insert cast to keep explicit field type (issue #1901) *)
 				(* insert cast to keep explicit field type (issue #1901) *)
-				let st = s_type (print_context()) in
-				if e.epos.pfile = "src/Main.hx" then Printf.printf "%s %s\n" (st e.etype) (st cf.cf_type);
 				if type_iseq e.etype cf.cf_type then
 				if type_iseq e.etype cf.cf_type then
 					e
 					e
 				else begin match e.eexpr,follow cf.cf_type with
 				else begin match e.eexpr,follow cf.cf_type with