浏览代码

remove debug leftovers [skip-ci]

Simon Krajewski 11 年之前
父节点
当前提交
dea986e91f
共有 1 个文件被更改,包括 0 次插入2 次删除
  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 ->
 			let check_cast e =
 				(* 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
 					e
 				else begin match e.eexpr,follow cf.cf_type with