In this patch all the remarks are corrected. Also I rewrote MetricsTH.hs functions using lowercase constructing functions instead of data types directly (e.g. appE instead of AppE) in order to simplify implementation.
Oleg Ponomarev (1): Cluster metrics refactoring Makefile.am | 2 + src/Ganeti/HTools/Cluster/AllocatePrimitives.hs | 6 +- src/Ganeti/HTools/Cluster/Metrics.hs | 163 ++----------- src/Ganeti/HTools/Cluster/MetricsComponents.hs | 291 ++++++++++++++++++++++++ src/Ganeti/HTools/Cluster/MetricsTH.hs | 237 +++++++++++++++++++ src/Ganeti/Utils/Statistics.hs | 180 ++++++++------- test/hs/Test/Ganeti/Utils/Statistics.hs | 4 +- 7 files changed, 641 insertions(+), 242 deletions(-) create mode 100644 src/Ganeti/HTools/Cluster/MetricsComponents.hs create mode 100644 src/Ganeti/HTools/Cluster/MetricsTH.hs -- 1.9.1
