8000 Kind error with GHC HEAD (in `Bifunctor.hs`) · Issue #4 · ekmett/categories · GitHub
[go: up one dir, main page]
More Web Proxy on the site http://driver.im/
Skip to content

Kind error with G 8000 HC HEAD (in Bifunctor.hs) #4

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

Open
ggreif opened this issue Aug 27, 2014 · 2 comments
Open

Kind error with GHC HEAD (in Bifunctor.hs) #4

ggreif opened this issue Aug 27, 2014 · 2 comments

Comments

@ggreif
Copy link
ggreif commented Aug 27, 2014

Just doing a cabal install in a freshly cloned categories working copy (i.e. master branch). My GHC is also built today (v7.9.20140826).

I get:

[ 6 of 11] Compiling Control.Bifunctor ( src/Control/Bifunctor.hs, dist/build/Control/Bifunctor.o )

src/Control/Bifunctor.hs:38:30:
    The first argument of ?Bifunctor?
      should have kind ?x1 -> y1 -> z1?,
      but ?p? has kind ?x2 -> y2 -> z2?
    In the type ?Bifunctor p r s t => r a b -> t (p a c) (p b c)?
    In the class declaration for ?PFunctor?
@ggreif
Copy link
Author
ggreif commented Nov 5, 2014

Tried this today with 7.9.20141103, same issue.

@hvr
Copy link
hvr commented Nov 5, 2014

Here's the output from today's GHC w/o ?-marks:

src/Control/Bifunctor.hs:38:30:
    The first argument of ‘Bifunctor’
      should have kind ‘x1 -> y1 -> z1’,
      but ‘p’ has kind ‘x2 -> y2 -> z2’
    In the type ‘Bifunctor p r s t => r a b -> t (p a c) (p b c)’
    In the class declaration for ‘PFunctor’

And this is the class-declaration referenced:

class (Category r, Category t) => PFunctor (p :: x -> y -> z) (r :: x -> x -> *) (t :: z -> z -> *) | p r -> t, p t -> r where
  first :: r a b -> t (p a c) (p b c)
  default first :: Bifunctor p r s t => r a b -> t (p a c) (p b c) -- THIS IS LINE 38
  first f = bimap f id

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

No branches or pull requests

2 participants
0