Collect all class definitions of self

Property definitions

nitc :: model_collect $ MClass :: collect_mclassdefs
	# Collect all class definitions of `self`
	fun collect_mclassdefs(filter: nullable ModelFilter): Set[MClassDef] do
		var res = new HashSet[MClassDef]
		for mclassdef in mclassdefs do
			if filter == null or filter.accept_mentity(mclassdef) then res.add mclassdef
		end
		return res
	end
src/model/model_collect.nit:696,2--703,4