@@ -14,8 +14,7 @@ import qualified Data.Conduit.List as CL
14import System.Directory
14import System.Directory
15import Control.Monad
15import Control.Monad
16import Control.Exception (try, SomeException)
16import Control.Exception (try, SomeException)
17−import Test.Hspec.Monadic
17+import Test.Hspec
18−import Test.Hspec.HUnit ()
20import qualified Data.Yaml as D
19import qualified Data.Yaml as D
21import Data.Yaml (object, array)
20import Data.Yaml (object, array)
@@ -24,7 +23,7 @@ import qualified Data.HashMap.Strict as M
24import qualified Data.Text as T
23import qualified Data.Text as T
26main :: IO ()
25main :: IO ()
27−main = hspecX $ do
26+main = hspec $ do
28 describe "streaming" $ do
27 describe "streaming" $ do
29 it "count scalars with anchor" caseCountScalarsWithAnchor
28 it "count scalars with anchor" caseCountScalarsWithAnchor
30 it "count sequences with anchor" caseCountSequencesWithAnchor
29 it "count sequences with anchor" caseCountSequencesWithAnchor