From: Alexandre Terrasa <alexandre@moz-code.org>
Date: Fri, 29 Sep 2017 21:47:59 +0000 (-0400)
Subject: model: tag groups as tests
X-Git-Url: http://nitlanguage.org

model: tag groups as tests

Signed-off-by: Alexandre Terrasa <alexandre@moz-code.org>
---

diff --git a/src/model/model.nit b/src/model/model.nit
index dc9b978..3ceb9f3 100644
--- a/src/model/model.nit
+++ b/src/model/model.nit
@@ -159,6 +159,14 @@ class ConcernsTree
 	super OrderedTree[MConcern]
 end
 
+redef class MGroup
+	redef var is_test is lazy do
+		var parent = self.parent
+		if parent != null and parent.is_test then return true
+		return name == "tests"
+	end
+end
+
 redef class MModule
 	# All the classes introduced in the module
 	var intro_mclasses = new Array[MClass]