on master help sign in
Fix build with "dev" flag
90da325Harendra Kumar
benchmark/NanoBenchmarks.hs+1−1
@@ -114,7 +114,7 @@ main = do
114 defaultMain [mkBenchText "splitOn abc...xyz" inText $ do
114 defaultMain [mkBenchText "splitOn abc...xyz" inText $ do
115 (S.length $ Internal.splitOnSeq (A.fromList $ map (fromIntegral . ord)
115 (S.length $ Internal.splitOnSeq (A.fromList $ map (fromIntegral . ord)
116 "abcdefghijklmnopqrstuvwxyz") FL.drain
116 "abcdefghijklmnopqrstuvwxyz") FL.drain
117− $ IFH.toStream inText) >>= print
117+ $ IFH.toBytes inText) >>= print
118 ]
118 ]
119 where
119 where
120
120