data-accessor 0.2.1 → 0.2.1.2
raw patch · 3 files changed
+24/−10 lines, 3 filesdep ~arraydep ~basedep ~containersPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: array, base, containers
API changes (from Hackage documentation)
Files
- data-accessor.cabal +20/−8
- src/Data/Accessor/Container.hs +2/−1
- src/Data/Accessor/Show.hs +2/−1
data-accessor.cabal view
@@ -1,5 +1,5 @@ Name: data-accessor-Version: 0.2.1+Version: 0.2.1.2 License: BSD3 License-File: LICENSE Author: Henning Thielemann <haskell@henning-thielemann.de>, Luke Palmer <lrpalmer@gmail.com>@@ -64,7 +64,7 @@ that conflicts with the two-way nature (set and get) of accessors. -- Portability: Haskell98 Cabal-Version: >=1.2-Tested-With: GHC==6.4.1 && ==6.8.2+Tested-With: GHC==6.10.4 Build-Type: Simple Extra-Source-Files:@@ -75,17 +75,29 @@ Flag category description: Check whether Arrow class is split into Arrow and Category. +Flag splitBase+ description: Choose the smaller, split-up base package from version 2 on.+ Library Build-Depends:- array >=0.1 && <0.3,- containers >=0.1 && <0.3, transformers >=0.0.1 && <0.2- If flag(category)- Hs-Source-Dirs: src-4- Build-Depends: base >= 4 && <6+ If flag(splitBase)+ Build-Depends:+ array >=0.1 && <0.4,+ containers >=0.1 && <0.4+ If flag(category)+ Hs-Source-Dirs: src-4+ Build-Depends: base >= 4 && <6+ Else+ Hs-Source-Dirs: src-3+ Build-Depends: base >= 2 && <4 Else Hs-Source-Dirs: src-3- Build-Depends: base >= 1 && <4+ Build-Depends:+ base >= 1 && <2+ If impl(jhc)+ Build-Depends:+ containers >=0.1 && <0.4 GHC-Options: -Wall Hs-Source-Dirs: src
src/Data/Accessor/Container.hs view
@@ -12,6 +12,7 @@ import qualified Data.Accessor.Basic as Accessor +import Data.Ix (Ix, ) import qualified Data.Array as Array import qualified Data.Map as Map import qualified Data.IntMap as IntMap@@ -19,7 +20,7 @@ import Prelude hiding (map) -array :: Array.Ix i => i -> Accessor.T (Array.Array i e) e+array :: Ix i => i -> Accessor.T (Array.Array i e) e array i = Accessor.fromSetGet (\e a -> a Array.// [(i,e)]) (Array.! i) {- |
src/Data/Accessor/Show.hs view
@@ -7,7 +7,8 @@ import Data.Maybe (catMaybes) -import qualified Text.Show as Show+-- import qualified Text.Show as Show+import qualified Prelude as Show import Prelude hiding (showsPrec)