Skip to content

Make library compatible with v0.14.0 #226

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Closed
wants to merge 1 commit into from
Closed
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
1 change: 1 addition & 0 deletions src/Control/Category.purs
Original file line number Diff line number Diff line change
Expand Up @@ -13,6 +13,7 @@ import Control.Semigroupoid (class Semigroupoid, compose, (<<<), (>>>))
-- | `Semigroupoid` law:
-- |
-- | - Identity: `identity <<< p = p <<< identity = p`
class Category :: forall k. (k -> k -> Type) -> Constraint
class Semigroupoid a <= Category a where
identity :: forall t. a t t

Expand Down
1 change: 1 addition & 0 deletions src/Control/Semigroupoid.purs
Original file line number Diff line number Diff line change
Expand Up @@ -9,6 +9,7 @@ module Control.Semigroupoid where
-- |
-- | One example of a `Semigroupoid` is the function type constructor `(->)`,
-- | with `(<<<)` defined as function composition.
class Semigroupoid :: forall k. (k -> k -> Type) -> Constraint
class Semigroupoid a where
compose :: forall b c d. a c d -> a b c -> a b d

Expand Down
1 change: 1 addition & 0 deletions src/Data/Monoid/Endo.purs
Original file line number Diff line number Diff line change
Expand Up @@ -11,6 +11,7 @@ import Prelude
-- | Endo f <> Endo g == Endo (f <<< g)
-- | (mempty :: Endo _) == Endo identity
-- | ```
newtype Endo :: forall k. (k -> k -> Type) -> k -> Type
newtype Endo c a = Endo (c a a)

derive newtype instance eqEndo :: Eq (c a a) => Eq (Endo c a)
Expand Down
1 change: 1 addition & 0 deletions src/Data/NaturalTransformation.purs
Original file line number Diff line number Diff line change
Expand Up @@ -14,6 +14,7 @@ module Data.NaturalTransformation where
-- | `f` and `g` should be functors, but the `Functor` constraint is not
-- | enforced here; that the types are of kind `Type -> Type` is enough for our
-- | purposes.
type NaturalTransformation :: forall k. (k -> Type) -> (k -> Type) -> Type
type NaturalTransformation f g = forall a. f a -> g a

infixr 4 type NaturalTransformation as ~>
2 changes: 1 addition & 1 deletion src/Type/Data/RowList.purs
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
module Type.Data.RowList where

import Prim.RowList (kind RowList)
import Prim.RowList (RowList)

-- | A proxy to carry information about a rowlist.
data RLProxy (rowlist :: RowList Type)
Expand Down