From: Jean Privat <jean@pryen.org>
Date: Mon, 26 Jan 2009 21:31:08 +0000 (-0500)
Subject: Do not compile unaccessible constructors.
X-Git-Url: http://nitlanguage.org

Do not compile unaccessible constructors.
---

diff --git a/src/compiling/compiling_global.nit b/src/compiling/compiling_global.nit
index 8a70439..c0407e4 100644
--- a/src/compiling/compiling_global.nit
+++ b/src/compiling/compiling_global.nit
@@ -521,7 +521,7 @@ redef class MMSrcModule
 					end
 					p.compile_property_to_c(v)
 				end
-				if pg.is_init then
+				if pg.is_init_for(c) then
 					# Declare constructors
 					var params = new Array[String]
 					for i in [0..p.signature.arity[ do
@@ -898,7 +898,7 @@ redef class MMLocalClass
 			for g in global_properties do
 				var p = self[g]
 				# FIXME skip invisible constructors
-				if not p.global.is_init then continue
+				if not p.global.is_init_for(self) then continue
 				var params = new Array[String]
 				var args = ["self"]
 				for i in [0..p.signature.arity[ do