nri-prelude 0.1.0.2 → 0.1.0.3

raw patch · 12 files changed

+18/−14 lines, 12 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• CHANGELOG.md +4/−0
• nri-prelude.cabal +2/−2
• src/Internal/Expectation.hs +1/−1
• src/Internal/Test.hs +1/−1
• src/Test/Console/Color.hs +1/−1
• tests/ArraySpec.hs +1/−1
• tests/BitwiseSpec.hs +1/−1
• tests/DebugSpec.hs +1/−1
• tests/LogSpec.hs +2/−2
• tests/PlatformSpec.hs +1/−1
• tests/SetSpec.hs +1/−1
• tests/TextSpec.hs +2/−2

@@ -1,3 +1,7 @@+# 0.1.0.3++- Fix tests to allow inclusion in stackage.+ # 0.1.0.2  - Relax version bounds to encompass `pretty-diff-0.2.0.0` and `base-4.14.0.0`.

@@ -4,10 +4,10 @@ -- -- see: https://github.com/sol/hpack ----- hash: ea55bb44b27db4aa3e8076c1e81eba4a3a5ea3110e5279c8f287b04e0860db2e+-- hash: ee41ff653ca1fcf64b9ab1936a1da4d874f93d3a88165081669e5540a1f64a24  name:           nri-prelude-version:        0.1.0.2+version:        0.1.0.3 synopsis:       A Prelude inspired by the Elm programming language description:    Please see the README at <https://github.com/NoRedInk/haskell-libraries/tree/trunk/nri-prelude>. category:       Web

@@ -11,10 +11,10 @@   ) where -import NriPrelude import Control.Monad.IO.Class (liftIO) import qualified Internal.TestResult as TestResult import Internal.TestResult (TestResult)+import NriPrelude import Prelude (Applicative, Functor, IO, Monad, Show, pure)  newtype Expectation a = Expectation (IO a)

@@ -11,7 +11,6 @@   ) where -import NriPrelude import qualified Control.Exception.Safe as Exception import Control.Monad.IO.Class (MonadIO, liftIO) import qualified Data.Text@@ -27,6 +26,7 @@ import Internal.TestResult (TestResult) import List (List) import qualified List+import NriPrelude import Test.Tasty (TestTree) import qualified Text import Prelude (IO, Monad, Show, pure, show, traverse)

@@ -11,9 +11,9 @@   ) where -import NriPrelude import qualified Data.Text import List (List)+import NriPrelude import qualified System.Console.ANSI as Console import Text (Text) 

@@ -1,10 +1,10 @@ module ArraySpec (tests) where  import Array-import NriPrelude hiding (map) import qualified Expect import qualified Fuzz import qualified List+import NriPrelude hiding (map) import Test (Test, describe, fuzz, fuzz2, test)  tests :: Test

@@ -1,8 +1,8 @@ module BitwiseSpec (tests) where  import Bitwise-import NriPrelude import qualified Expect+import NriPrelude import Test (Test, describe, test)  tests :: Test

@@ -1,11 +1,11 @@ module DebugSpec (tests) where -import NriPrelude import Control.Exception.Safe (SomeException) import Control.Exception.Safe as Exception import qualified Debug import qualified Expect import List (head)+import NriPrelude import Test (Test, describe, test) import qualified Text import Prelude (Either (Left, Right), Show)

@@ -1,6 +1,5 @@ module LogSpec (tests) where -import NriPrelude import qualified Control.Concurrent import qualified Control.Exception.Safe as Exception import qualified Data.IORef as IORef@@ -8,6 +7,7 @@ import qualified Expect import qualified GHC.Stack as Stack import Log+import NriPrelude import qualified Platform.Internal as Internal import qualified Task import Test (Test, describe, test)@@ -174,7 +174,7 @@  instance Exception.Exception TestException -newHandler :: Stack.HasCallStack => Prelude.IO (Prelude.IO [Internal.TracingSpan], Internal.Handler)+newHandler :: Stack.HasCallStack => Prelude.IO (Prelude.IO [Internal.TracingSpan], Internal.LogHandler) newHandler = do   recordedTracingSpans <- IORef.newIORef []   handler <-

@@ -1,8 +1,8 @@ module PlatformSpec (tests) where -import NriPrelude import Data.Aeson as Aeson import qualified Expect+import NriPrelude import qualified Platform import Test (Test, describe, test) 

@@ -1,9 +1,9 @@ module SetSpec (tests) where -import NriPrelude import qualified Expect import List (List) import qualified List+import NriPrelude import Set (Set) import qualified Set import Test (Test, describe, test)

@@ -1,7 +1,7 @@ module TextSpec (tests) where -import NriPrelude import qualified Expect+import NriPrelude import Test (Test, describe, test) import Text @@ -33,7 +33,7 @@         [ test "uncons non-empty" <| \() ->             Expect.equal (Just ('a', "bc")) (Text.uncons "abc"),           test "uncons empty" <| \() ->-            Expect.nothing (Text.uncons ""),+            Expect.equal Nothing (Text.uncons ""),           test "append 1" <| \() ->             Expect.equal "butterfly" (Text.append "butter" "fly"),           test "append 2" <| \() ->