Extract the list of packages from the mmodules passed as arguments

Property definitions

nitc $ NitPackagePhase :: extract_mpackages
	# Extract the list of packages from the mmodules passed as arguments
	fun extract_mpackages(mmodules: Collection[MModule]): Collection[MPackage] do
		var mpackages = new ArraySet[MPackage]
		for mmodule in mmodules do
			var mpackage = mmodule.mpackage
			if mpackage == null then continue
			mpackages.add mpackage
		end
		return mpackages.to_a
	end
src/nitpackage.nit:137,2--146,4