From 7b1880480f430b137f618e363dd8b35f67cd6df8 Mon Sep 17 00:00:00 2001 From: Pasqualino Titto Assini Date: Fri, 14 Apr 2017 13:50:22 +0200 Subject: [PATCH] changed size test name --- src/Main.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Main.hs b/src/Main.hs index 8b87442..0cda69b 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -252,7 +252,7 @@ sizes :: (Typeable t, NFData t, B.Binary t, F.Flat t, Serialise t,C.Serialize t, sizes (name,obj) = do ss <- mapM (\(n,s,_) -> (\ss -> (n,fromIntegral . BS.length $ ss)) <$> s obj) pkgs print ss - addMeasures workDir ("serialisation (bytes)/"++name) ss + addMeasures workDir ("size (bytes)/"++name) ss benchs :: (Eq a, Typeable a, NFData a, B.Binary a, F.Flat a, Serialise a,C.Serialize a, S.Store a) => (String, a) -> [Benchmark] benchs (name,obj) =