non-negative 0.1.2 → 0.1.2.1

raw patch · 2 files changed

+29/−14 lines, 2 filesdep +non-negativedep ~basedep ~semigroups

Dependencies added: non-negative

Dependency ranges changed: base, semigroups

Files

• Test/Numeric/NonNegative/Chunky.hs +21/−0
• non-negative.cabal +8/−14

@@ -101,6 +101,20 @@    let y = Chunky.fromNumber limit    in  P.min x y == y +showInfinite0 :: Int -> Bool+showInfinite0 =+   (\t -> t==t) . take 1000000 . show .+   const (Chunky.fromChunks $ iterate (2-) (1::NonNegW.Integer))++showInfinite1 :: (NonNeg.C a, Num a, Show a) => a -> Bool+showInfinite1 =+   (\t -> t==t) . take 10000 . show .+   (\n -> Chunky.fromChunks $ iterate (2-) (1+0*n))++showInfinite2 :: (NonNeg.C a, Num a, Show a) => a -> Bool+showInfinite2 =+   (\t -> t==t) . take 10000 . show . infinity+ addInfiniteL :: (NonNeg.C a, Num a) => a -> a -> Chunky.T a -> Bool addInfiniteL limit x y =    checkInfinity limit (infinity x + y)@@ -222,6 +236,13 @@      quickCheck splitSpaceLeak4) :    ("splitSpaceLeak5",      quickCheck splitSpaceLeak5) :++   ("showInfinite0",+     quickCheck (showInfinite0 :: Int -> Bool)) :+   ("showInfinite1",+     quickCheck (showInfinite1 :: NonNegW.Int -> Bool)) :+   ("showInfinite2",+     quickCheck (showInfinite2 :: NonNegW.Int -> Bool)) :     ("addInfiniteL",      quickCheck (addInfiniteL :: Card -> Card -> Chunky.T Card -> Bool)) :

@@ -1,5 +1,5 @@ Name:             non-negative-Version:          0.1.2+Version:          0.1.2.1 License:          GPL License-File:     LICENSE Author:           Henning Thielemann <haskell@henning-thielemann.de>@@ -17,11 +17,8 @@ Cabal-Version:    >=1.10 Build-Type:       Simple -Flag splitBase-  description: Choose the new smaller, split-up base package.- Source-Repository this-  Tag:         0.1.2+  Tag:         0.1.2.1   Type:        darcs   Location:    http://code.haskell.org/~thielema/non-negative/ @@ -31,13 +28,10 @@  Library   Build-Depends:-    semigroups >=0.1 && <1.0,-    utility-ht >= 0.0.1 && <0.1,-    QuickCheck >= 2.1 && <3-  If flag(splitBase)-    Build-Depends: base >= 2 && < 5-  Else-    Build-Depends: base >= 1.0 && < 2+    semigroups >=0.1 && <1,+    utility-ht >=0.0.1 && <0.1,+    QuickCheck >=2.1 && <3,+    base >=2 && <5    Default-Language: Haskell98   GHC-Options:      -Wall@@ -52,13 +46,13 @@ Test-Suite test   Type: exitcode-stdio-1.0   Default-Language: Haskell98-  Hs-source-dirs:   src, .+  Build-Depends:    non-negative   GHC-Options:      -Wall   Build-Depends:     QuickCheck,     semigroups,     utility-ht,-    base+    base >=2 && <5   Main-Is:          Test/Main.hs   Other-Modules:     Test.Utility