timeplot 0.3.1 → 0.3.2

raw patch · 2 files changed

+2/−2 lines, 2 files

Files

Tools/TimePlot.hs +1/−1
timeplot.cabal +1/−1

Tools/TimePlot.hs view

@@ -546,7 +546,7 @@ edges2events :: (Ord t) => [(t,S.ByteString,Edge)] -> t -> t -> [(S.ByteString,Event t Status)] edges2events tes minTime maxTime = snd $ RWS.execRWS (mapM_ step tes >> flush) () M.empty    where-    getTrack s = M.findWithDefault (undefined, 0, emptyStatus) s `fmap` RWS.get +    getTrack s = M.findWithDefault (minTime, 0, emptyStatus) s `fmap` RWS.get      putTrack s t = RWS.get >>= RWS.put . M.insert s t     trackCase s whenZero withNonzero = do       (t0, numActive, st) <- getTrack s

timeplot.cabal view

@@ -1,5 +1,5 @@ name: timeplot-version: 0.3.1+version: 0.3.2 cabal-version: >=1.6 build-type: Simple license: BSD3