board-games 0.4.0.2 → 0.4.0.3

raw patch · 3 files changed

+28/−37 lines, 3 filesdep ~basePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: base

API changes (from Hackage documentation)

Files

• board-games.cabal +7/−14
• src/Game/Labyrinth.hs +0/−2
• test/Test/Game/Labyrinth.hs +21/−21

@@ -1,5 +1,5 @@ Name:             board-games-Version:          0.4.0.2+Version:          0.4.0.3 License:          GPL License-File:     LICENSE Author:           Henning Thielemann <haskell@henning-thielemann.de>@@ -44,16 +44,13 @@   location: http://code.haskell.org/~thielema/games/  Source-Repository this-  tag:      0.4.0.2+  tag:      0.4.0.3   type:     darcs   location: http://code.haskell.org/~thielema/games/  Flag buildExamples   description: build example web server that runs the games -Flag splitBase-  description: Choose the new smaller, split-up base package.- Library   Build-Depends:     html >=1.0 && <1.1,@@ -67,15 +64,11 @@     combinatorial >=0.1 && <0.2,     transformers >=0.2.2 && <0.7,     enummapset >=0.1 && <0.8,-    QuickCheck >=2 && <3-  If flag(splitBase)-    Build-Depends:-      containers >=0.2 && <0.9,-      random >=1 && <1.4,-      array >=0.1 && <0.6,-      base >= 2 && <5-  Else-    Build-Depends: base >= 1.0 && < 2+    QuickCheck >=2 && <3,+    containers >=0.2 && <0.9,+    random >=1 && <1.4,+    array >=0.1 && <0.6,+    base >=4.11 && <5    Default-Language: Haskell2010   GHC-Options:      -Wall

@@ -65,7 +65,6 @@  instance Monoid Board where    mempty = Board 0-   mappend = (<>)  instance QC.Arbitrary Board where    arbitrary = Board . (boardMask .&.) <$> QC.arbitrary@@ -257,7 +256,6 @@  instance Monoid a => Monoid (Directions a) where    mempty = pure mempty-   mappend = App.lift2 mappend  instance Functor Directions where    fmap f (Directions n w s e) = Directions (f n) (f w) (f s) (f e)

@@ -10,51 +10,51 @@  test :: DocTest.T () test = do+ DocTest.printPrefix "Game.Labyrinth:137: "+{-# LINE 137 "src/Game/Labyrinth.hs" #-}+ DocTest.property(+{-# LINE 137 "src/Game/Labyrinth.hs" #-}+      \k b -> b == Labyrinth.shiftRowLeft k (Labyrinth.shiftRowRight k b)+  )  DocTest.printPrefix "Game.Labyrinth:138: " {-# LINE 138 "src/Game/Labyrinth.hs" #-}  DocTest.property( {-# LINE 138 "src/Game/Labyrinth.hs" #-}-      \k b -> b == Labyrinth.shiftRowLeft k (Labyrinth.shiftRowRight k b)+      \k b -> b == Labyrinth.shiftRowRight k (Labyrinth.shiftRowLeft k b)   )- DocTest.printPrefix "Game.Labyrinth:139: "-{-# LINE 139 "src/Game/Labyrinth.hs" #-}+ DocTest.printPrefix "Game.Labyrinth:153: "+{-# LINE 153 "src/Game/Labyrinth.hs" #-}  DocTest.property(-{-# LINE 139 "src/Game/Labyrinth.hs" #-}-      \k b -> b == Labyrinth.shiftRowRight k (Labyrinth.shiftRowLeft k b)+{-# LINE 153 "src/Game/Labyrinth.hs" #-}+      \k b -> b == Labyrinth.shiftColumnUp k (Labyrinth.shiftColumnDown k b)   )  DocTest.printPrefix "Game.Labyrinth:154: " {-# LINE 154 "src/Game/Labyrinth.hs" #-}  DocTest.property( {-# LINE 154 "src/Game/Labyrinth.hs" #-}-      \k b -> b == Labyrinth.shiftColumnUp k (Labyrinth.shiftColumnDown k b)+      \k b -> b == Labyrinth.shiftColumnDown k (Labyrinth.shiftColumnUp k b)   )- DocTest.printPrefix "Game.Labyrinth:155: "-{-# LINE 155 "src/Game/Labyrinth.hs" #-}+ DocTest.printPrefix "Game.Labyrinth:202: "+{-# LINE 202 "src/Game/Labyrinth.hs" #-}  DocTest.property(-{-# LINE 155 "src/Game/Labyrinth.hs" #-}-      \k b -> b == Labyrinth.shiftColumnDown k (Labyrinth.shiftColumnUp k b)+{-# LINE 202 "src/Game/Labyrinth.hs" #-}+      \k b -> b == Labyrinth.cycleRowLeft k (Labyrinth.cycleRowRight k b)   )  DocTest.printPrefix "Game.Labyrinth:203: " {-# LINE 203 "src/Game/Labyrinth.hs" #-}  DocTest.property( {-# LINE 203 "src/Game/Labyrinth.hs" #-}-      \k b -> b == Labyrinth.cycleRowLeft k (Labyrinth.cycleRowRight k b)+      \k b -> b == Labyrinth.cycleRowRight k (Labyrinth.cycleRowLeft k b)   )- DocTest.printPrefix "Game.Labyrinth:204: "-{-# LINE 204 "src/Game/Labyrinth.hs" #-}+ DocTest.printPrefix "Game.Labyrinth:212: "+{-# LINE 212 "src/Game/Labyrinth.hs" #-}  DocTest.property(-{-# LINE 204 "src/Game/Labyrinth.hs" #-}-      \k b -> b == Labyrinth.cycleRowRight k (Labyrinth.cycleRowLeft k b)+{-# LINE 212 "src/Game/Labyrinth.hs" #-}+      \k b -> b == Labyrinth.cycleColumnUp k (Labyrinth.cycleColumnDown k b)   )  DocTest.printPrefix "Game.Labyrinth:213: " {-# LINE 213 "src/Game/Labyrinth.hs" #-}  DocTest.property( {-# LINE 213 "src/Game/Labyrinth.hs" #-}-      \k b -> b == Labyrinth.cycleColumnUp k (Labyrinth.cycleColumnDown k b)-  )- DocTest.printPrefix "Game.Labyrinth:214: "-{-# LINE 214 "src/Game/Labyrinth.hs" #-}- DocTest.property(-{-# LINE 214 "src/Game/Labyrinth.hs" #-}       \k b -> b == Labyrinth.cycleColumnDown k (Labyrinth.cycleColumnUp k b)   )