Compile with more recent versions of GHC.

This commit is contained in:
Tony Morris 2017-04-20 10:41:05 +10:00
parent 4d6a99fa72
commit 56aaad1f95
2 changed files with 10 additions and 10 deletions

View file

@ -5,7 +5,7 @@
Let's Lens presents a series of exercises, in a similar format to
[the Data61 functional programming course material](http://github.com/data61/fp-course).
The subject of the exercises is around the concept of lenses, initially proposed
by Foster et al., to solve the view-update problem of relational databases.
by Foster et al., to solve the view-update problem of relational databases.
The theories around lenses have been advanced significantly in recent years,
resulting in a library, implemented in Haskell, called `lens`.

View file

@ -314,14 +314,14 @@ setP ::
Prism s t a b
-> s
-> Either t a
setP =
setP _ _ =
error "todo: setP"
getP ::
Prism s t a b
-> b
-> t
getP =
getP _ _ =
error "todo: getP"
type Prism' a b =
@ -345,7 +345,7 @@ modify ::
-> (a -> b)
-> s
-> t
modify =
modify _ _ _ =
error "todo: modify"
-- | An alias for @modify@.
@ -375,7 +375,7 @@ infixr 4 %~
-> b
-> s
-> t
(.~) =
(.~) _ _ _ =
error "todo: (.~)"
infixl 5 .~
@ -396,7 +396,7 @@ fmodify ::
-> (a -> f b)
-> s
-> f t
fmodify =
fmodify _ _ _ =
error "todo: fmodify"
-- |
@ -412,7 +412,7 @@ fmodify =
-> f b
-> s
-> f t
(|=) =
(|=) _ _ _ =
error "todo: (|=)"
infixl 5 |=
@ -498,7 +498,7 @@ compose ::
Lens s t a b
-> Lens q r s t
-> Lens q r a b
compose =
compose _ _ =
error "todo: compose"
-- | An alias for @compose@.
@ -534,7 +534,7 @@ product ::
Lens s t a b
-> Lens q r c d
-> Lens (s, q) (t, r) (a, c) (b, d)
product =
product _ _ =
error "todo: product"
-- | An alias for @product@.
@ -564,7 +564,7 @@ choice ::
Lens s t a b
-> Lens q r a b
-> Lens (Either s q) (Either t r) a b
choice =
choice _ _ =
error "todo: choice"
-- | An alias for @choice@.