From: Stefan Lage <lagestfan@gmail.com>
Date: Fri, 28 Jun 2013 18:16:58 +0000 (-0400)
Subject: model_utils: All modules contain in a class
X-Git-Tag: v0.6.1~73^2~5^2~72^2~34
X-Git-Url: http://nitlanguage.org

model_utils: All modules contain in a class

Added a function to get all modules concerned in a class

Signed-off-by: Stefan Lage <lagestfan@gmail.com>
---

diff --git a/src/model_utils.nit b/src/model_utils.nit
index df90150..7963eda 100644
--- a/src/model_utils.nit
+++ b/src/model_utils.nit
@@ -180,6 +180,12 @@ redef class MClass
 		return res
 	end
 
+	fun mmodules: Set[MModule] do
+		var mdls = new HashSet[MModule]
+		for mclassdef in mclassdefs do mdls.add(mclassdef.mmodule)
+		return mdls
+	end
+
 	fun is_class: Bool do
 		return self.kind == concrete_kind or self.kind == abstract_kind
 	end