Collect only groups contained in self.root

Property definitions

nitc :: model_collect $ MPackage :: collect_mgroups
	# Collect only groups contained in `self.root`
	fun collect_mgroups(filter: nullable ModelFilter): HashSet[MGroup] do
		var res = new HashSet[MGroup]
		var root = self.root
		if root == null then return res
		res.add_all root.collect_mgroups(filter)
		return res
	end
src/model/model_collect.nit:301,2--308,4