Skip to content
Open
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Original file line number Diff line number Diff line change
Expand Up @@ -37,7 +37,7 @@ fill :: TemporalEventDurationMicrosec -> Seq TraceMessage -> Word64 -> [TraceMes
fill duration acc t (x : xs) | utcToMicroseconds x.tmsgAt <= t + fromIntegral duration = fill duration (acc |> x) t xs
fill duration acc t rest = (TemporalEvent t (Foldable.toList acc), t + fromIntegral duration, rest)

-- | Slice up the trace messages into consequtive temporal events.
-- | Slice up the trace messages into consecutive temporal events.
slice :: TemporalEventDurationMicrosec -> [TraceMessage] -> [TemporalEvent]
slice _ [] = []
slice duration msg_@(x : _) = go (utcToMicroseconds (tmsgAt x)) msg_ where
Expand Down
4 changes: 2 additions & 2 deletions bench/locli/src-quick/Data/Reducer.hs
Original file line number Diff line number Diff line change
Expand Up @@ -43,7 +43,7 @@ instance ( Foldable f2
r1 <-> r2 = Chain r1 r2

-- Explicitly chain reducers with a projection function that extracts a Foldable and
-- an initial accumulator value from the first reducer's reult value
-- an initial accumulator value from the first reducer's result value
chainWith ::
( Foldable f1
, Foldable f2
Expand All @@ -67,7 +67,7 @@ instance Reducer (HigherOrder a) where
initialOf _ = ([], Nothing)

reducerOf (Threshold f) = go where
-- still in intial state? always use the head of the original sequence as first data point
-- still in initial state? always use the head of the original sequence as first data point
go ([], _) h = ([h], Just h)
go (acc@(h:_), _) next
| f h next = (next:acc, Just next)
Expand Down
2 changes: 1 addition & 1 deletion bench/locli/src-quick/Graphics/EasyPlot.hs
Original file line number Diff line number Diff line change
Expand Up @@ -197,7 +197,7 @@ data Graph3D x y z =
-- ^ plots data read from a file, optionally giving indices of which columns to plot as x, y and z

-- | Options which can be used with 'plot''
data GnuplotOption = Interactive -- ^ keeps gnuplot open, so that you can interact with the plot (only usefull with 'X11')
data GnuplotOption = Interactive -- ^ keeps gnuplot open, so that you can interact with the plot (only useful with 'X11')
| Debug -- ^ keeps intermediate files used to invoke gnuplot, such as the script '_plot.p' and the datafiles '_plot*.dat'.
deriving Eq

Expand Down