From: Jean Privat <jean@pryen.org>
Date: Sat, 4 Jun 2016 16:17:51 +0000 (-0400)
Subject: nitls: fix broken group tree when there is a chain of empty groups
X-Git-Url: http://nitlanguage.org

nitls: fix broken group tree when there is a chain of empty groups

Signed-off-by: Jean Privat <jean@pryen.org>
---

diff --git a/src/nitls.nit b/src/nitls.nit
index f875083..4321214 100644
--- a/src/nitls.nit
+++ b/src/nitls.nit
@@ -178,7 +178,10 @@ if opt_tree.value then
 		var pa = mp.mgroup
 		while pa != null and not pa.is_interesting do pa = pa.parent
 		ot.add(pa, mp)
-		if pa != null then mgroups.add pa
+		while pa != null do
+			mgroups.add pa
+			pa = pa.parent
+		end
 	end
 	for g in mgroups do
 		var pa = g.parent