Skip to content

Commit ee1f19d

Browse files
committed
switch off benches for obsolete ghc's
1 parent a6d4bcb commit ee1f19d

File tree

1 file changed

+6
-1
lines changed

1 file changed

+6
-1
lines changed

benchmarks/BM.hs

Lines changed: 6 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -5,6 +5,7 @@ module Main
55
( main
66
) where
77

8+
#if __GLASGOW_HASKELL__ > 702
89
#if !MIN_VERSION_bytestring(0,10,0)
910
import Control.DeepSeq (NFData(rnf))
1011
#endif
@@ -14,10 +15,13 @@ import Criterion.Main
1415

1516
import qualified Data.ByteString as BS
1617
import qualified Data.ByteString.Base64 as B64
17-
18+
#endif
1819

1920
main :: IO ()
2021
main =
22+
#if __GLASGOW_HASKELL__ < 704
23+
return ()
24+
#else
2125
defaultMain
2226
[ env bs $ \ ~(bs25,bs100,bs1k,bs10k,bs100k,bs1mm) ->
2327
bgroup "encode"
@@ -88,3 +92,4 @@ main =
8892
instance NFData BS.ByteString where
8993
rnf bs = bs `seq` ()
9094
#endif
95+
#endif

0 commit comments

Comments
 (0)