diff --git a/CHANGELOG.md b/CHANGELOG.md new file mode 100644 --- /dev/null +++ b/CHANGELOG.md @@ -0,0 +1,18 @@ +# Change Log + +Notable changes to the project will be documented in this file. + +The format is based on [Keep a Changelog](http://keepachangelog.com/) and the +project adheres to the [Haskell Package Versioning +Policy (PVP)](https://pvp.haskell.org) + +## [0.2.0.0] - 2017-09-21 + * update for accelerate-1.1.* + +## [0.1.0.0] - 2017-03-31 + * initial release + + +[0.2.0.0]: https://github.com/tmcdonell/colour-accelerate/compare/0.1.0.0...0.2.0.0 +[0.1.0.0]: https://github.com/tmcdonell/colour-accelerate/compare/6b2dc2e55bc0503aa4c94b883f6b608aaa734101...0.1.0.0 + diff --git a/Data/Array/Accelerate/Data/Colour/HSL.hs b/Data/Array/Accelerate/Data/Colour/HSL.hs --- a/Data/Array/Accelerate/Data/Colour/HSL.hs +++ b/Data/Array/Accelerate/Data/Colour/HSL.hs @@ -40,18 +40,18 @@ ) where -import Data.Array.Accelerate as A +import Data.Array.Accelerate as A hiding ( clamp ) import Data.Array.Accelerate.Smart -import Data.Array.Accelerate.Product ( TupleIdx(..), IsProduct(..) ) -import Data.Array.Accelerate.Array.Sugar ( Elt(..), EltRepr, Tuple(..) ) +import Data.Array.Accelerate.Product ( TupleIdx(..), IsProduct(..) ) +import Data.Array.Accelerate.Array.Sugar ( Elt(..), EltRepr, Tuple(..) ) -import Data.Array.Accelerate.Data.Colour.RGB ( RGB(..) ) -import Data.Array.Accelerate.Data.Colour.Names as C +import Data.Array.Accelerate.Data.Colour.RGB ( RGB(..) ) +import Data.Array.Accelerate.Data.Colour.Names as C import Data.Functor import Data.Typeable -import Prelude ( fromInteger ) -- ghc < 8 bug -import qualified Prelude as P +import Prelude ( fromInteger ) -- ghc < 8 bug +import qualified Prelude as P -- | A HSL colour value diff --git a/Data/Array/Accelerate/Data/Colour/HSV.hs b/Data/Array/Accelerate/Data/Colour/HSV.hs --- a/Data/Array/Accelerate/Data/Colour/HSV.hs +++ b/Data/Array/Accelerate/Data/Colour/HSV.hs @@ -40,18 +40,18 @@ ) where -import Data.Array.Accelerate as A +import Data.Array.Accelerate as A hiding ( clamp ) import Data.Array.Accelerate.Smart -import Data.Array.Accelerate.Product ( TupleIdx(..), IsProduct(..) ) -import Data.Array.Accelerate.Array.Sugar ( Elt(..), EltRepr, Tuple(..) ) +import Data.Array.Accelerate.Product ( TupleIdx(..), IsProduct(..) ) +import Data.Array.Accelerate.Array.Sugar ( Elt(..), EltRepr, Tuple(..) ) -import Data.Array.Accelerate.Data.Colour.RGB ( RGB(..) ) -import Data.Array.Accelerate.Data.Colour.Names as C +import Data.Array.Accelerate.Data.Colour.RGB ( RGB(..) ) +import Data.Array.Accelerate.Data.Colour.Names as C import Data.Functor import Data.Typeable -import Prelude ( fromInteger ) -- ghc < 8 bug -import qualified Prelude as P +import Prelude ( fromInteger ) -- ghc < 8 bug +import qualified Prelude as P -- | A HSV colour value diff --git a/Data/Array/Accelerate/Data/Colour/Internal/Pack.hs b/Data/Array/Accelerate/Data/Colour/Internal/Pack.hs --- a/Data/Array/Accelerate/Data/Colour/Internal/Pack.hs +++ b/Data/Array/Accelerate/Data/Colour/Internal/Pack.hs @@ -11,8 +11,8 @@ module Data.Array.Accelerate.Data.Colour.Internal.Pack where -import Data.Array.Accelerate as A -import Data.Array.Accelerate.Data.Bits as A +import Data.Array.Accelerate as A +import Data.Array.Accelerate.Data.Bits as A -- | Pack the given four bytes into a single 4-byte word. The first argument diff --git a/Data/Array/Accelerate/Data/Colour/Names.hs b/Data/Array/Accelerate/Data/Colour/Names.hs --- a/Data/Array/Accelerate/Data/Colour/Names.hs +++ b/Data/Array/Accelerate/Data/Colour/Names.hs @@ -15,7 +15,7 @@ module Data.Array.Accelerate.Data.Colour.Names where -import Data.Array.Accelerate ( Elt, Exp, constant ) +import Data.Array.Accelerate ( Elt, Exp, constant ) class NamedColour c where diff --git a/Data/Array/Accelerate/Data/Colour/RGB.hs b/Data/Array/Accelerate/Data/Colour/RGB.hs --- a/Data/Array/Accelerate/Data/Colour/RGB.hs +++ b/Data/Array/Accelerate/Data/Colour/RGB.hs @@ -40,16 +40,16 @@ ) where -import Data.Array.Accelerate as A +import Data.Array.Accelerate as A hiding ( clamp ) import Data.Array.Accelerate.Smart -import Data.Array.Accelerate.Product ( TupleIdx(..), IsProduct(..) ) -import Data.Array.Accelerate.Array.Sugar ( Elt(..), EltRepr, Tuple(..) ) +import Data.Array.Accelerate.Product ( TupleIdx(..), IsProduct(..) ) +import Data.Array.Accelerate.Array.Sugar ( Elt(..), EltRepr, Tuple(..) ) import Data.Array.Accelerate.Data.Colour.Names import Data.Array.Accelerate.Data.Colour.Internal.Pack import Data.Typeable -import Prelude as P +import Prelude as P -- | An RGB colour value diff --git a/Data/Array/Accelerate/Data/Colour/RGBA.hs b/Data/Array/Accelerate/Data/Colour/RGBA.hs --- a/Data/Array/Accelerate/Data/Colour/RGBA.hs +++ b/Data/Array/Accelerate/Data/Colour/RGBA.hs @@ -41,16 +41,16 @@ ) where -import Data.Array.Accelerate as A +import Data.Array.Accelerate as A hiding ( clamp ) import Data.Array.Accelerate.Smart -import Data.Array.Accelerate.Product ( TupleIdx(..), IsProduct(..) ) -import Data.Array.Accelerate.Array.Sugar ( Elt(..), EltRepr, Tuple(..) ) +import Data.Array.Accelerate.Product ( TupleIdx(..), IsProduct(..) ) +import Data.Array.Accelerate.Array.Sugar ( Elt(..), EltRepr, Tuple(..) ) import Data.Array.Accelerate.Data.Colour.Names import Data.Array.Accelerate.Data.Colour.Internal.Pack import Data.Typeable -import Prelude as P +import Prelude as P -- | An RGBA colour value. diff --git a/Data/Array/Accelerate/Data/Colour/SRGB.hs b/Data/Array/Accelerate/Data/Colour/SRGB.hs --- a/Data/Array/Accelerate/Data/Colour/SRGB.hs +++ b/Data/Array/Accelerate/Data/Colour/SRGB.hs @@ -23,10 +23,10 @@ ) where -import Data.Array.Accelerate as A -import Data.Array.Accelerate.Data.Colour.RGB ( RGB(..) ) +import Data.Array.Accelerate as A hiding ( clamp ) +import Data.Array.Accelerate.Data.Colour.RGB ( RGB(..) ) -import Data.Functor ( fmap ) +import Data.Functor ( fmap ) -- | An sRGB colour value diff --git a/README.md b/README.md --- a/README.md +++ b/README.md @@ -2,6 +2,7 @@ ================= [![Build Status](https://travis-ci.org/tmcdonell/colour-accelerate.svg?branch=master)](https://travis-ci.org/tmcdonell/colour-accelerate) +[![Hackage](https://img.shields.io/hackage/v/colour-accelerate.svg)](https://hackage.haskell.org/package/colour-accelerate) This package provides data types and operations for dealing with colours in Accelerate. For details on Accelerate, refer to the [main diff --git a/colour-accelerate.cabal b/colour-accelerate.cabal --- a/colour-accelerate.cabal +++ b/colour-accelerate.cabal @@ -1,5 +1,5 @@ name: colour-accelerate -version: 0.1.0.0 +version: 0.2.0.0 synopsis: Working with colours in Accelerate description: This package provides data types for colours and transparency for use with @@ -13,12 +13,13 @@ copyright: Copyright (c) [2016]. Trevor L. McDonell category: Data, Graphics build-type: Simple -cabal-version: >=1.10 +cabal-version: >=1.18 homepage: https://github.com/tmcdonell/colour-accelerate bug-reports: https://github.com/tmcdonell/colour-accelerate/issues extra-source-files: + CHANGELOG.md README.md examples/*.hs @@ -29,8 +30,8 @@ library default-language: Haskell2010 build-depends: - base >= 4.7 && < 4.10 - , accelerate >= 0.16 + base >= 4.7 && < 4.11 + , accelerate >= 1.1 ghc-options: -Wall @@ -52,7 +53,7 @@ source-repository this type: git - tag: 0.1.0.0 + tag: 0.2.0.0 location: https://github.com/tmcdonell/colour-accelerate -- vim: nospell