on master help sign in
Move Lens to Internal
f9efe24Csongor Kiss
generic-records.cabal+1−1
@@ -33,7 +33,7 @@ library
33 , Data.Generic.Record.Subtype
33 , Data.Generic.Record.Subtype
34 , Data.Generic.Record.HasField
34 , Data.Generic.Record.HasField
35
35
36− other-modules: Data.Generic.Record.Lens
36+ other-modules: Data.Generic.Record.Internal.Lens
37
37
38 other-extensions: AllowAmbiguousTypes
38 other-extensions: AllowAmbiguousTypes
39 , DataKinds
39 , DataKinds
src/Data/Generic/Record/HasField.hs+1−1
@@ -34,7 +34,7 @@ module Data.Generic.Record.HasField
34 , GHasField (..)
34 , GHasField (..)
35 ) where
35 ) where
36
36
37−import Data.Generic.Record.Lens
37+import Data.Generic.Record.Internal.Lens
38
38
39import GHC.TypeLits (Symbol, TypeError, ErrorMessage(..))
39import GHC.TypeLits (Symbol, TypeError, ErrorMessage(..))
40import Data.Kind (Type)
40import Data.Kind (Type)
src/Data/Generic/Record/Lens.hs → src/Data/Generic/Record/Internal/Lens.hsrenamed+2−2
@@ -3,7 +3,7 @@
3
3
4-----------------------------------------------------------------------------
4-----------------------------------------------------------------------------
5-- |
5-- |
6−-- Module : Data.Generic.Record.Lens
6+-- Module : Data.Generic.Record.Internal.Lens
7-- Copyright : (C) 2017 Csongor Kiss
7-- Copyright : (C) 2017 Csongor Kiss
8-- License : BSD3
8-- License : BSD3
9-- Maintainer : Csongor Kiss <kiss.csongor.kiss@gmail.com>
9-- Maintainer : Csongor Kiss <kiss.csongor.kiss@gmail.com>
@@ -13,7 +13,7 @@
13-- Unexported lens helpers
13-- Unexported lens helpers
14--
14--
15-----------------------------------------------------------------------------
15-----------------------------------------------------------------------------
16−module Data.Generic.Record.Lens where
16+module Data.Generic.Record.Internal.Lens where
17
17
18import Control.Applicative ( Const (..) )
18import Control.Applicative ( Const (..) )
19import GHC.Generics ( (:*:) (..), Generic (..), M1 (..), Rep )
19import GHC.Generics ( (:*:) (..), Generic (..), M1 (..), Rep )
src/Data/Generic/Record/Subtype.hs+1−1
@@ -27,7 +27,7 @@ module Data.Generic.Record.Subtype
27 ) where
27 ) where
28
28
29import Data.Generic.Record.HasField
29import Data.Generic.Record.HasField
30−import Data.Generic.Record.Lens
30+import Data.Generic.Record.Internal.Lens
31
31
32import Data.Kind (Type)
32import Data.Kind (Type)
33import GHC.Generics
33import GHC.Generics