> /tmp/stackage-build13/atom-conduit-0.4.0.1$ dist/build/Tests/Tests
Tests
  Unit tests
    Link element:      OK
    Person construct:  OK
    Generator element: OK
    Source element:    OK
    Text construct:    OK
    Simple case:       OK
  HLint check:         Text/Atom/Lens.hs:3:1: Warning: Use module export list
Found:
  module Text.Atom.Lens where
Why not:
  module Text.Atom.Lens (module Text.Atom.Lens) where
Note: An explicit list is usually better

Text/Atom/Types.hs:31:1: Warning: Use module export list
Found:
  module Text.Atom.Types where
Why not:
  module Text.Atom.Types (module Text.Atom.Types) where
Note: An explicit list is usually better

Text/Atom/Conduit/Render.hs:1:1: Warning: Unused LANGUAGE pragma
Found:
  {-# LANGUAGE DeriveAnyClass #-}
Why not remove it.

3 hints
FAIL (0.82s)
    expected: True
     but got: False

1 out of 7 tests failed (0.83s)

test/Main.hs:218:5: error:
    • No instance for (Control.Monad.Fail.MonadFail Gen)
        arising from a do statement
        with the failable pattern ‘Just content’
    • In a stmt of a 'do' block:
        Just content <- fromNullable . pack <$> listOf1 alphaNum
      In the expression:
        do Just content <- fromNullable . pack <$> listOf1 alphaNum
           AtomGenerator <$> arbitrary <*> arbitrary <*> pure content
      In an equation for ‘arbitrary’:
          arbitrary
            = do Just content <- fromNullable . pack <$> listOf1 alphaNum
                 AtomGenerator <$> arbitrary <*> arbitrary <*> pure content
    |
218 |     Just content <- fromNullable . pack <$> listOf1 alphaNum
    |     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^