Skip to content

Commit 7bfef2e

Browse files
authored
Convert hedgehog api to use new hedgehog effect (#13)
* Hide -Werror in dev flag * Convert hedgehog api to use new hedgehog effect that supports property tests * Remove unused type class MonadTestProxy * Convert hedgehog api to use new effects * Move PropertyTest and UnitTest types to their own modules * Disable deprecations in Effectful.Zoo.Core.Prim * Bump tasty version * Re-exports from Effectful.Zoo.Hedgehog.Data * Refactor Core submodules to not be submodules
1 parent 91333c3 commit 7bfef2e

File tree

30 files changed

+304
-555
lines changed

30 files changed

+304
-555
lines changed

components/blockfrost/Effectful/Zoo/Blockfrost/Api.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -339,10 +339,10 @@ import Data.Maybe
339339
import Data.Text
340340
import Effectful
341341
import Effectful.Dispatch.Dynamic
342-
import Effectful.Zoo.Core.Error.Static
343342
import Effectful.Zoo.Blockfrost.Dynamic (Blockfrost, runBlockfrost)
344343
import Effectful.Zoo.Blockfrost.Dynamic qualified as BF
345344
import Effectful.Zoo.Core
345+
import Effectful.Zoo.Error.Static
346346
import HaskellWorks.Prelude
347347

348348
-- Client

components/core/Effectful/Zoo/Aeson.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -7,7 +7,7 @@ import Data.Aeson qualified as Aeson
77
import Data.ByteString.Lazy qualified as LBS
88
import Effectful
99
import Effectful.Zoo.Core
10-
import Effectful.Zoo.Core.Error.Static
10+
import Effectful.Zoo.Error.Static
1111
import HaskellWorks.Error.Types.JsonDecodeError
1212
import HaskellWorks.Prelude
1313

components/core/Effectful/Zoo/Core.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -3,4 +3,4 @@ module Effectful.Zoo.Core
33
type (<<:),
44
) where
55

6-
import Effectful.Zoo.Core.Prim
6+
import Effectful.Zoo.Prim

components/core/Effectful/Zoo/Core/Error/Dynamic.hs renamed to components/core/Effectful/Zoo/Error/Dynamic.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,4 @@
1-
module Effectful.Zoo.Core.Error.Dynamic
1+
module Effectful.Zoo.Error.Dynamic
22
( Error,
33

44
throw,

components/core/Effectful/Zoo/Core/Error/Static.hs renamed to components/core/Effectful/Zoo/Error/Static.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,4 @@
1-
module Effectful.Zoo.Core.Error.Static
1+
module Effectful.Zoo.Error.Static
22
( Error,
33

44
throw,
@@ -33,7 +33,7 @@ module Effectful.Zoo.Core.Error.Static
3333
import Effectful
3434
import Effectful.Error.Static (Error, runError)
3535
import Effectful.Error.Static qualified as E
36-
import Effectful.Zoo.Core
36+
import Effectful.Zoo.Prim
3737
import HaskellWorks.Prelude
3838

3939
throw :: forall e r a. ()

components/core/Effectful/Zoo/Core/Exception.hs renamed to components/core/Effectful/Zoo/Exception.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,4 @@
1-
module Effectful.Zoo.Core.Exception
1+
module Effectful.Zoo.Exception
22
( Exception,
33
catchIO,
44
throwIO,

components/core/Effectful/Zoo/FileSystem.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -25,8 +25,8 @@ import Effectful
2525
import Effectful.Dispatch.Static
2626
import Effectful.FileSystem (FileSystem)
2727
import Effectful.Zoo.Core
28-
import Effectful.Zoo.Core.Error.Static
29-
import Effectful.Zoo.Core.Exception
28+
import Effectful.Zoo.Error.Static
29+
import Effectful.Zoo.Exception
3030
import Effectful.Zoo.Log.Api.Text
3131
import Effectful.Zoo.Log.Dynamic
3232
import Effectful.Zoo.Unsafe

components/core/Effectful/Zoo/Core/Function.hs renamed to components/core/Effectful/Zoo/Function.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,11 +1,11 @@
1-
module Effectful.Zoo.Core.Function
1+
module Effectful.Zoo.Function
22
( once,
33
) where
44

55
import Effectful
66
import Effectful.Concurrent
77
import Effectful.Concurrent.MVar
8-
import Effectful.Zoo.Core.Prim
8+
import Effectful.Zoo.Prim
99
import HaskellWorks.Prelude
1010

1111
once :: ()

components/core/Effectful/Zoo/Core/Prim.hs renamed to components/core/Effectful/Zoo/Prim.hs

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,6 @@
1-
module Effectful.Zoo.Core.Prim
1+
{-# OPTIONS_GHC -fno-warn-deprecations #-}
2+
3+
module Effectful.Zoo.Prim
24
( type (<:),
35
type (<<:)
46
) where

components/hedgehog-test/Effectful/Zoo/Hedgehog/Test/HedgehogTest.hs

Lines changed: 0 additions & 32 deletions
This file was deleted.

0 commit comments

Comments
 (0)