X-Git-Url: http://nitlanguage.org diff --git a/src/metrics/mmodules_metrics.nit b/src/metrics/mmodules_metrics.nit index 72bf41d..335831c 100644 --- a/src/metrics/mmodules_metrics.nit +++ b/src/metrics/mmodules_metrics.nit @@ -17,21 +17,21 @@ # Collect common metrics about modules module mmodules_metrics -import model import metrics_base -import phase -import frontend redef class ToolContext - var mmodules_metrics_phase = new MModulesMetricsPhase(self, null) + var mmodules_metrics_phase: Phase = new MModulesMetricsPhase(self, null) end # Extract metrics about modules from the model. private class MModulesMetricsPhase super Phase - redef fun process_mainmodule(mainmodule) + redef fun process_mainmodule(mainmodule, given_mmodules) do if not toolcontext.opt_mmodules.value and not toolcontext.opt_all.value then return + var csv = toolcontext.opt_csv.value + var out = "{toolcontext.opt_dir.value or else "metrics"}/mmodules" + out.mkdir print toolcontext.format_h1("\n# MModules metrics") @@ -41,17 +41,19 @@ private class MModulesMetricsPhase var model = toolcontext.modelbuilder.model var mmodules = new HashSet[MModule] - for mproject in model.mprojects do + for mpackage in model.mpackages do - print toolcontext.format_h2("\n ## project {mproject}") - for mgroup in mproject.mgroups do + print toolcontext.format_h2("\n ## package {mpackage}") + for mgroup in mpackage.mgroups do if mgroup.mmodules.is_empty then continue # Scalar metrics print toolcontext.format_h3(" `- group {mgroup.full_name}") mmodules.add_all(mgroup.mmodules) + metrics.clear metrics.collect(new HashSet[MModule].from(mgroup.mmodules)) metrics.to_console(1, not toolcontext.opt_nocolors.value) + if csv then metrics.to_csv.save("{out}/{mgroup}.csv") end end if not mmodules.is_empty then @@ -60,6 +62,7 @@ private class MModulesMetricsPhase metrics.clear metrics.collect(mmodules) metrics.to_console(1, not toolcontext.opt_nocolors.value) + if csv then metrics.to_csv.save("{out}/summary.csv") end end end