86ad39a · streamly · git.iko.soy

git.iko.soy/streamly

Fix hlint issues in streamly package

commit86ad39afeb670a2d565fbd20019377501dda8360 authorHarendra Kumar <harendra@composewell.com> dateMon 18 Dec 2023, 22:41 (3 years ago) parent7f711f7

3 files changed+8−5

unifiedsplit

.hlint.ignore+3

@@ -2,6 +2,9 @@ core/src/Streamly/Internal/Data/Stream/StreamK/Type.hs

22core/src/Streamly/Internal/Data/Pipe/Type.hs

33core/src/Streamly/Internal/Unicode/Stream.hs

44src/Streamly/Internal/Data/SmallArray/Type.hs

5+src/Streamly/Internal/Data/Stream/IsStream/Eliminate.hs

6+src/Streamly/Internal/Data/Stream/Serial.hs

7+src/Streamly/Internal/Data/Stream/Zip.hs

58test/Streamly/Test/Data/Array.hs

69test/Streamly/Test/Data/Parser.hs

710test/Streamly/Test/Data/ParserK.hs

src/Streamly/Internal/Data/Stream/Concurrent.hs+2−2

@@ -646,8 +646,8 @@ parConcatIterate modifier f input =

646646

647647 where

648648

649− iterateStream channel stream =

650− parConcatMapChanKGeneric modifier channel (generate channel) stream

649+ iterateStream channel =

650+ parConcatMapChanKGeneric modifier channel (generate channel)

651651

652652 generate channel x =

653653 -- XXX The channel q should be FIFO for DFS, otherwise it is BFS

src/Streamly/Internal/Unicode/Char.hs+3−3

@@ -227,13 +227,13 @@ partialComposeD (Stream step state) = Stream step' (ComposeNone state)

227227 Stop -> Skip $ YieldList rbuf ComposeStop

228228

229229 {-# INLINE initHangul #-}

230− initHangul c st = ComposeJamo (Hangul c) st

230+ initHangul c = ComposeJamo (Hangul c)

231231

232232 {-# INLINE initJamo #-}

233− initJamo c st = ComposeJamo (Jamo c) st

233+ initJamo c = ComposeJamo (Jamo c)

234234

235235 {-# INLINE initReg #-}

236− initReg !c st = ComposeReg 0 [c] st

236+ initReg !c = ComposeReg 0 [c]

237237

238238 {-# INLINE composeNone #-}

239239 composeNone ch st