packages feed

timeplot 1.0.32 → 1.0.33

raw patch · 2 files changed

+8/−6 lines, 2 files

Files

Tools/TimePlot/Plots.hs view
@@ -9,6 +9,7 @@ import Data.List (foldl', sort)
 import Data.Maybe
 import qualified Data.Map as M
+import qualified Data.Map.Strict as MS
 import qualified Data.Set as Set
 import qualified Data.ByteString.Char8 as S
 
@@ -271,7 +272,7 @@     --  * r  = reversed list of results per bins
     modState s t (!m, ts,r) f = (m', ts, r)
       where
-        m' = M.insertWith' (\new !old -> f old) s (f (0,t,0,0)) m
+        m' = MS.insertWith (\new !old -> f old) s (f (0,t,0,0)) m
 
     flushBin st@(m,t1:t2:ts,!r) = (m', t2:ts, r')
       where
timeplot.cabal view
@@ -1,6 +1,6 @@ name: timeplot-version: 1.0.32-cabal-version: >=1.6+version: 1.0.33+cabal-version: >=1.10 build-type: Simple license: BSD3 license-file: LICENSE@@ -23,9 +23,10 @@  executable tplot     main-is: Tools/TimePlot.hs-    other-modules: Tools.TimePlot.Conf Tools.TimePlot.Incremental -                   Tools.TimePlot.Plots Tools.TimePlot.Render Tools.TimePlot.Source -                   Tools.TimePlot.Types+    default-language: Haskell2010+    other-modules: Tools.TimePlot.Conf Tools.TimePlot.Incremental+                   Tools.TimePlot.Plots Tools.TimePlot.Render Tools.TimePlot.Source+                   Tools.TimePlot.Types Paths_timeplot     buildable: True     ghc-options: -rtsopts     other-modules: Graphics.Rendering.Chart.Event