Nicolas Cannasse преди 15 години
родител
ревизия
2bea56c69b
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      typeload.ml

+ 1 - 1
typeload.ml

@@ -664,7 +664,7 @@ let init_class ctx c p herits fields =
 				t
 			) in
 			let delay = (
-				if (c.cl_extern || c.cl_interface) && cf.cf_name <> "__init__" then
+				if ((c.cl_extern && not inline) || c.cl_interface) && cf.cf_name <> "__init__" then
 					(fun() -> ())
 				else begin
 					cf.cf_type <- TLazy r;