hw-polysemy 0.2.5.0 → 0.2.6.0
raw patch · 4 files changed
+25/−17 lines, 4 filesdep ~basePVP: major bump suggested
API removals or changes: PVP suggests a major version bump
Dependency ranges changed: base
API changes (from Hackage documentation)
- HaskellWorks.Polysemy.Hedgehog: eval :: forall r_amPm a_amCG. (Member Hedgehog r_amPm, HasCallStack) => a_amCG -> Sem r_amPm a_amCG
+ HaskellWorks.Polysemy.Hedgehog: eval :: forall r_amPo a_amCI. (Member Hedgehog r_amPo, HasCallStack) => a_amCI -> Sem r_amPo a_amCI
- HaskellWorks.Polysemy.Hedgehog: evalIO :: forall r_amPq a_amCK. (Member Hedgehog r_amPq, HasCallStack) => IO a_amCK -> Sem r_amPq a_amCK
+ HaskellWorks.Polysemy.Hedgehog: evalIO :: forall r_amPs a_amCM. (Member Hedgehog r_amPs, HasCallStack) => IO a_amCM -> Sem r_amPs a_amCM
- HaskellWorks.Polysemy.Hedgehog: evalM :: forall r_amPo a_amCJ. (Member Hedgehog r_amPo, HasCallStack) => Sem r_amPo a_amCJ -> Sem r_amPo a_amCJ
+ HaskellWorks.Polysemy.Hedgehog: evalM :: forall r_amPq a_amCL. (Member Hedgehog r_amPq, HasCallStack) => Sem r_amPq a_amCL -> Sem r_amPq a_amCL
- HaskellWorks.Polysemy.Hedgehog: failWith :: forall r_amPu a_amCO. (Member Hedgehog r_amPu, HasCallStack) => Maybe Diff -> String -> Sem r_amPu a_amCO
+ HaskellWorks.Polysemy.Hedgehog: failWith :: forall r_amPw a_amCQ. (Member Hedgehog r_amPw, HasCallStack) => Maybe Diff -> String -> Sem r_amPw a_amCQ
- HaskellWorks.Polysemy.Hedgehog: failWithCustom :: forall r_amPx a_amCQ. Member Hedgehog r_amPx => CallStack -> Maybe Diff -> String -> Sem r_amPx a_amCQ
+ HaskellWorks.Polysemy.Hedgehog: failWithCustom :: forall r_amPz a_amCS. Member Hedgehog r_amPz => CallStack -> Maybe Diff -> String -> Sem r_amPz a_amCS
- HaskellWorks.Polysemy.Hedgehog: writeLog :: forall r_amPs. Member Hedgehog r_amPs => Log -> Sem r_amPs ()
+ HaskellWorks.Polysemy.Hedgehog: writeLog :: forall r_amPu. Member Hedgehog r_amPu => Log -> Sem r_amPu ()
- HaskellWorks.Polysemy.Hedgehog.Assert: evalIO :: forall r_amPq a_amCK. (Member Hedgehog r_amPq, HasCallStack) => IO a_amCK -> Sem r_amPq a_amCK
+ HaskellWorks.Polysemy.Hedgehog.Assert: evalIO :: forall r_amPs a_amCM. (Member Hedgehog r_amPs, HasCallStack) => IO a_amCM -> Sem r_amPs a_amCM
- HaskellWorks.Polysemy.Hedgehog.Effect.Hedgehog: assertEquals :: forall r_amPj a_X0. (Member Hedgehog r_amPj, HasCallStack, Eq a_X0, Show a_X0) => a_X0 -> a_X0 -> Sem r_amPj ()
+ HaskellWorks.Polysemy.Hedgehog.Effect.Hedgehog: assertEquals :: forall r_amPl a_X0. (Member Hedgehog r_amPl, HasCallStack, Eq a_X0, Show a_X0) => a_X0 -> a_X0 -> Sem r_amPl ()
- HaskellWorks.Polysemy.Hedgehog.Effect.Hedgehog: eval :: forall r_amPm a_amCG. (Member Hedgehog r_amPm, HasCallStack) => a_amCG -> Sem r_amPm a_amCG
+ HaskellWorks.Polysemy.Hedgehog.Effect.Hedgehog: eval :: forall r_amPo a_amCI. (Member Hedgehog r_amPo, HasCallStack) => a_amCI -> Sem r_amPo a_amCI
- HaskellWorks.Polysemy.Hedgehog.Effect.Hedgehog: evalIO :: forall r_amPq a_amCK. (Member Hedgehog r_amPq, HasCallStack) => IO a_amCK -> Sem r_amPq a_amCK
+ HaskellWorks.Polysemy.Hedgehog.Effect.Hedgehog: evalIO :: forall r_amPs a_amCM. (Member Hedgehog r_amPs, HasCallStack) => IO a_amCM -> Sem r_amPs a_amCM
- HaskellWorks.Polysemy.Hedgehog.Effect.Hedgehog: evalM :: forall r_amPo a_amCJ. (Member Hedgehog r_amPo, HasCallStack) => Sem r_amPo a_amCJ -> Sem r_amPo a_amCJ
+ HaskellWorks.Polysemy.Hedgehog.Effect.Hedgehog: evalM :: forall r_amPq a_amCL. (Member Hedgehog r_amPq, HasCallStack) => Sem r_amPq a_amCL -> Sem r_amPq a_amCL
- HaskellWorks.Polysemy.Hedgehog.Effect.Hedgehog: failWith :: forall r_amPu a_amCO. (Member Hedgehog r_amPu, HasCallStack) => Maybe Diff -> String -> Sem r_amPu a_amCO
+ HaskellWorks.Polysemy.Hedgehog.Effect.Hedgehog: failWith :: forall r_amPw a_amCQ. (Member Hedgehog r_amPw, HasCallStack) => Maybe Diff -> String -> Sem r_amPw a_amCQ
- HaskellWorks.Polysemy.Hedgehog.Effect.Hedgehog: failWithCustom :: forall r_amPx a_amCQ. Member Hedgehog r_amPx => CallStack -> Maybe Diff -> String -> Sem r_amPx a_amCQ
+ HaskellWorks.Polysemy.Hedgehog.Effect.Hedgehog: failWithCustom :: forall r_amPz a_amCS. Member Hedgehog r_amPz => CallStack -> Maybe Diff -> String -> Sem r_amPz a_amCS
- HaskellWorks.Polysemy.Hedgehog.Effect.Hedgehog: writeLog :: forall r_amPs. Member Hedgehog r_amPs => Log -> Sem r_amPs ()
+ HaskellWorks.Polysemy.Hedgehog.Effect.Hedgehog: writeLog :: forall r_amPu. Member Hedgehog r_amPu => Log -> Sem r_amPu ()
- HaskellWorks.Polysemy.Hedgehog.Eval: eval :: forall r_amPm a_amCG. (Member Hedgehog r_amPm, HasCallStack) => a_amCG -> Sem r_amPm a_amCG
+ HaskellWorks.Polysemy.Hedgehog.Eval: eval :: forall r_amPo a_amCI. (Member Hedgehog r_amPo, HasCallStack) => a_amCI -> Sem r_amPo a_amCI
- HaskellWorks.Polysemy.Hedgehog.Eval: evalIO :: forall r_amPq a_amCK. (Member Hedgehog r_amPq, HasCallStack) => IO a_amCK -> Sem r_amPq a_amCK
+ HaskellWorks.Polysemy.Hedgehog.Eval: evalIO :: forall r_amPs a_amCM. (Member Hedgehog r_amPs, HasCallStack) => IO a_amCM -> Sem r_amPs a_amCM
- HaskellWorks.Polysemy.Hedgehog.Eval: evalM :: forall r_amPo a_amCJ. (Member Hedgehog r_amPo, HasCallStack) => Sem r_amPo a_amCJ -> Sem r_amPo a_amCJ
+ HaskellWorks.Polysemy.Hedgehog.Eval: evalM :: forall r_amPq a_amCL. (Member Hedgehog r_amPq, HasCallStack) => Sem r_amPq a_amCL -> Sem r_amPq a_amCL
Files
- core/HaskellWorks/Polysemy/Cabal.hs +1/−1
- core/HaskellWorks/Prelude.hs +2/−0
- hedgehog/HaskellWorks/Polysemy/Hedgehog/Jot.hs +12/−10
- hw-polysemy.cabal +10/−6
core/HaskellWorks/Polysemy/Cabal.hs view
@@ -78,7 +78,7 @@ Just bin -> return $ addExeSuffix (T.unpack bin) Nothing -> throw $ GenericError $ "Missing bin-file in " <> tshow component [] -> throw $ GenericError $ "Cannot find exe " <> tshow pkg <> " in plan"- Left message -> throw $ GenericError $ "Cannot decode plan: " <> T.pack message+ Left msg -> throw $ GenericError $ "Cannot decode plan: " <> T.pack msg where matching :: Component -> Bool matching component = case componentName component of Just name -> name == "exe:" <> T.pack pkg
core/HaskellWorks/Prelude.hs view
@@ -63,6 +63,8 @@ , ($!) , ($) , (&)+ , not+ , otherwise , (&&) , (||) , (.)
hedgehog/HaskellWorks/Polysemy/Hedgehog/Jot.hs view
@@ -1,3 +1,5 @@+{-# LANGUAGE BangPatterns #-}+ module HaskellWorks.Polysemy.Hedgehog.Jot ( jotShow, jotShow_,@@ -296,10 +298,10 @@ => Member (Reader PackagePath) r => FilePath -> Sem r FilePath-jotPkgInputFile filePath = withFrozenCallStack $ do+jotPkgInputFile fp = withFrozenCallStack $ do PackagePath { filePath = pkgPath } <- ask- jot_ $ pkgPath <> "/" <> filePath- return filePath+ jot_ $ pkgPath <> "/" <> fp+ return fp -- | Return the golden file path after annotating it relative to the package directory jotPkgGoldenFile :: ()@@ -308,10 +310,10 @@ => Member (Reader PackagePath) r => FilePath -> Sem r FilePath-jotPkgGoldenFile filePath = withFrozenCallStack $ do+jotPkgGoldenFile fp = withFrozenCallStack $ do PackagePath { filePath = pkgPath } <- ask- jot_ $ pkgPath <> "/" <> filePath- return filePath+ jot_ $ pkgPath <> "/" <> fp+ return fp jotRootInputFile :: () => HasCallStack@@ -319,9 +321,9 @@ => Member (Reader ProjectRoot) r => FilePath -> Sem r FilePath-jotRootInputFile filePath = withFrozenCallStack $ do+jotRootInputFile fp = withFrozenCallStack $ do ProjectRoot { filePath = pkgPath } <- ask- jot $ pkgPath <> "/" <> filePath+ jot $ pkgPath <> "/" <> fp -- | Return the test file path after annotating it relative to the project root directory jotTempFile :: ()@@ -330,8 +332,8 @@ => Member (Reader Workspace) r => FilePath -> Sem r FilePath-jotTempFile filePath = withFrozenCallStack $ do+jotTempFile fp = withFrozenCallStack $ do Workspace { filePath = workspace } <- ask- let relPath = workspace <> "/" <> filePath+ let relPath = workspace <> "/" <> fp jot_ $ workspace <> "/" <> relPath return relPath
hw-polysemy.cabal view
@@ -1,6 +1,6 @@ cabal-version: 3.4 name: hw-polysemy-version: 0.2.5.0+version: 0.2.6.0 synopsis: Opinionated polysemy library description: Opinionated polysemy library. license: Apache-2.0@@ -17,7 +17,7 @@ type: git location: https://github.com/haskell-works/hw-polysemy -common base { build-depends: base >= 4.18 && < 5 }+common base { build-depends: base >= 4.13 && < 5 } common aeson { build-depends: aeson < 2.3 } common async { build-depends: async < 2.3 }@@ -65,13 +65,17 @@ polysemy-plugin, default-extensions: BlockArguments DataKinds+ DeriveGeneric DuplicateRecordFields FlexibleContexts FlexibleInstances LambdaCase NoImplicitPrelude OverloadedStrings+ RankNTypes+ ScopedTypeVariables TypeApplications+ TypeOperators ghc-options: -Wall -fplugin=Polysemy.Plugin if flag(werror)@@ -143,7 +147,7 @@ HaskellWorks.Polysemy.System.Process HaskellWorks.Prelude hs-source-dirs: core- default-language: GHC2021+ default-language: Haskell2010 library hedgehog import: base, project-config,@@ -180,7 +184,7 @@ HaskellWorks.Polysemy.Hedgehog.Workspace HaskellWorks.Polysemy.Hedgehog.Workspace.Types hs-source-dirs: hedgehog- default-language: GHC2021+ default-language: Haskell2010 library import: base, project-config,@@ -226,7 +230,7 @@ HaskellWorks.Polysemy.System.Environment, HaskellWorks.Polysemy.System.IO, HaskellWorks.Polysemy.System.Process,- default-language: GHC2021+ default-language: Haskell2010 test-suite hw-polysemy-test import: base, project-config,@@ -237,7 +241,7 @@ tasty-hedgehog, tasty, text,- default-language: GHC2021+ default-language: Haskell2010 type: exitcode-stdio-1.0 build-tool-depends: tasty-discover:tasty-discover hs-source-dirs: test