git.iko.soy/streamly
on master help sign in
Fix inspection testing
commitdc68afd1671c8bd22ffa7afee13c8e37e0218657 authorHarendra Kumar <harendra@composewell.com> dateSun 7 Jun 2020, 10:27 (6 years ago) parent54c5d7d
3 files changed+16−1
compare with master
unifiedsplit
benchmark/Streamly/Benchmark/Prelude/WSerial.hs+8−1 benchmark/Streamly/Benchmark/Prelude/ZipSerial.hs+7 benchmark/streamly-benchmarks.cabal+1
benchmark/Streamly/Benchmark/Prelude/WSerial.hs+8−1
@@ -29,6 +29,13 @@ import Streamly.Benchmark.Prelude
2929
3030import Gauge
3131
32+#ifdef INSPECTION
33+import GHC.Types (SPEC(..))
34+import Test.Inspection
35+
36+import qualified Streamly.Internal.Data.Stream.StreamD as D
37+#endif
38+
3239moduleName :: String
3340moduleName = "Prelude.WSerial"
3441
@@ -100,7 +107,7 @@ concatMapWithWSerial = concatStreamsWith wSerial
100107
101108#ifdef INSPECTION
102109inspect $ hasNoTypeClasses 'concatMapWithWSerial
103−inspect $ 'concatMapWithSerial `hasNoType` ''SPEC
110+inspect $ 'concatMapWithWSerial `hasNoType` ''SPEC
104111#endif
105112
106113o_1_space_concat :: Int -> [Benchmark]
benchmark/Streamly/Benchmark/Prelude/ZipSerial.hs+7
@@ -29,6 +29,13 @@ import Streamly.Benchmark.Prelude
2929
3030import Gauge
3131
32+#ifdef INSPECTION
33+import GHC.Types (SPEC(..))
34+import Test.Inspection
35+
36+import qualified Streamly.Internal.Data.Stream.StreamD as D
37+#endif
38+
3239moduleName :: String
3340moduleName = "Prelude.ZipSerial"
3441
benchmark/streamly-benchmarks.cabal+1
@@ -117,6 +117,7 @@ common bench-depends
117117 if flag(inspection)
118118 build-depends: template-haskell >= 2.14 && < 2.17
119119 , inspection-testing >= 0.4 && < 0.5
120+ , ghc-prim >= 0.2 && < 0.7
120121 -- Array uses a Storable constraint in dev build making several inspection
121122 -- tests fail
122123 if flag(dev) && flag(inspection)