sydtest-hspec 0.3.0.0 → 0.3.0.1

raw patch · 3 files changed

+18/−5 lines, 3 filesdep ~hspec-core

Dependency ranges changed: hspec-core

Files

• CHANGELOG.md +6/−0
• src/Test/Syd/Hspec.hs +10/−3
• sydtest-hspec.cabal +2/−2

@@ -1,5 +1,11 @@ # Changelog +## [0.3.0.1] - 2022-06-04++### Added++* Compatibility with `hspec 2.7`+ ## [0.3.0.0] - 2022-04-28  ### Added

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} {-# LANGUAGE DataKinds #-} {-# LANGUAGE LambdaCase #-} {-# LANGUAGE RecordWildCards #-}@@ -32,15 +33,21 @@   doNotRandomiseExecutionOrder $ sequential $ mapM_ importSpecTree trees   pure result +-- Hspec.NodeWithCleanup's semantics are so weird that we can only do+-- this translation if inner equals (). importSpecTree :: Hspec.SpecTree () -> Syd.Spec importSpecTree = go   where     go = \case       Hspec.Leaf item -> importItem item       Hspec.Node d ts -> describe d $ mapM_ go ts-      -- Hspec.NodeWithCleanup's semantics are so weird that we can only do-      -- this translation if inner equals ().-      Hspec.NodeWithCleanup _ cleanup ts -> afterAll_ (cleanup ()) $ mapM_ go ts++#if MIN_VERSION_hspec_core(2,8,0)+      Hspec.NodeWithCleanup _ cleanup ts -> afterAll_ (cleanup ()) (mapM_ go ts)++#else+      Hspec.NodeWithCleanup cleanup ts ->   afterAll_ (cleanup ()) (mapM_ go ts)+#endif  importItem :: forall inner. Hspec.Item inner -> Syd.TestDefM '[] inner () importItem item@Hspec.Item {..} =

@@ -5,7 +5,7 @@ -- see: https://github.com/sol/hpack  name:           sydtest-hspec-version:        0.3.0.0+version:        0.3.0.1 synopsis:       An Hspec companion library for sydtest category:       Testing homepage:       https://github.com/NorfairKing/sydtest#readme@@ -34,7 +34,7 @@   build-depends:       QuickCheck     , base >=4.7 && <5-    , hspec-core >=2.8+    , hspec-core >=2.7.10     , mtl     , stm     , sydtest >=0.9.0.0