69785a3 · streamly · git.iko.soy

git.iko.soy/streamly

GHC-9: Remove NOINLINE on some benchmarks

Two FileSystem.Handle benchmarks required a NOINLINE earlier, now need that to be removed in GHC-9.

commit69785a31841c5108aadeb51818f56aa7d2eb62f7 authorHarendra Kumar <harendra@composewell.com> dateTue 25 Jan 2022, 15:28 (5 years ago) parente21d842

1 file changed−2

unifiedsplit

benchmark/Streamly/Benchmark/FileSystem/Handle/ReadWrite.hs−2

@@ -159,7 +159,6 @@ o_1_space_copy_fromBytes env =

159159 ]

160160

161161-- | Send the file contents ('defaultChunkSize') to /dev/null

162−{-# NOINLINE writeReadWithBufferOf #-}

163162writeReadWithBufferOf :: Handle -> Handle -> IO ()

164163writeReadWithBufferOf inh devNull = IUF.fold fld unf (defaultChunkSize, inh)

165164

@@ -177,7 +176,6 @@ inspect $ 'writeReadWithBufferOf `hasNoType` ''AT.ArrayUnsafe -- FH.write/writeN

177176#endif

178177

179178-- | Send the file contents ('AT.defaultChunkSize') to /dev/null

180−{-# NOINLINE writeRead #-}

181179writeRead :: Handle -> Handle -> IO ()

182180writeRead inh devNull = IUF.fold fld unf inh

183181