Browse Source

fix do_bind check (closes #2323)

Simon Krajewski 11 years ago
parent
commit
d2aade7e46
1 changed files with 1 additions and 1 deletions
  1. 1 1
      typeload.ml

+ 1 - 1
typeload.ml

@@ -1725,7 +1725,7 @@ let init_class ctx c p context_init herits fields =
 				cf_params = params;
 				cf_overloads = [];
 			} in
-			let do_bind = ref (not (cf.cf_name <> "__init__" && (c.cl_extern && not inline) || c.cl_interface)) in
+			let do_bind = ref (((not c.cl_extern || inline) && not c.cl_interface) || cf.cf_name = "__init__") in
 			(match c.cl_kind with
 				| KAbstractImpl a ->
 					let m = mk_mono() in