[GHC] #13963: Runtime representation confusingly displayed
#13963: Runtime representation confusingly displayed -------------------------------------+------------------------------------- Reporter: Iceland_jack | Owner: (none) Type: bug | Status: new Priority: normal | Milestone: Component: Compiler | Version: 8.0.1 Keywords: | Operating System: Unknown/Multiple Architecture: | Type of failure: None/Unknown Unknown/Multiple | Test Case: | Blocked By: Blocking: | Related Tickets: Differential Rev(s): | Wiki Page: -------------------------------------+------------------------------------- 8.3.20170605: {{{
:set -XRankNTypes -XTypeInType import GHC.Exts (TYPE, RuntimeRep(LiftedRep)) type Pair (a::TYPE rep) (b::TYPE rep') rep'' = forall (r::TYPE rep''). (a -> b -> r) -> r :kind Pair Pair :: * -> * -> * :kind Pair Int Pair Int :: * -> * :kind Pair Int Float Pair Int Float :: * :kind Pair Int Float LiftedRep Pair Int Float LiftedRep :: * }}}
It still behaves oddly with `-fprint-explicit-runtime-reps` enabled {{{
:set -fprint-explicit-runtime-reps :kind Pair Pair :: * -> * -> forall (rep'' :: RuntimeRep) -> * :kind Pair Int Pair Int :: * -> forall (rep'' :: RuntimeRep) -> * :kind Pair Int Float Pair Int Float :: * :kind Pair Int Float LiftedRep Pair Int Float LiftedRep :: * }}}
I would have also expected to see `Pair`'s kind displayed something like this {{{#!hs forall {rep :: RuntimeRep} {rep' :: RuntimeRep}. TYPE rep -> TYPE rep' -> forall (rep'' :: RuntimeRep) -> * }}} which is how the kind of the corresponding `newtype` gets displayed {{{
newtype Pair2 (a::TYPE rep) (b::TYPE rep') rep'' = P2 (forall (r::TYPE rep''). (a -> b -> r) -> r) :kind Pair2 Pair2 :: forall {rep :: RuntimeRep} {rep' :: RuntimeRep}. TYPE rep -> TYPE rep' -> forall (rep'' :: RuntimeRep) -> * }}}
-- Ticket URL: http://ghc.haskell.org/trac/ghc/ticket/13963 GHC http://www.haskell.org/ghc/ The Glasgow Haskell Compiler
#13963: Runtime representation confusingly displayed -------------------------------------+------------------------------------- Reporter: Iceland_jack | Owner: (none) Type: bug | Status: new Priority: normal | Milestone: Component: Compiler | Version: 8.0.1 Resolution: | Keywords: Operating System: Unknown/Multiple | Architecture: | Unknown/Multiple Type of failure: None/Unknown | Test Case: Blocked By: | Blocking: Related Tickets: | Differential Rev(s): Wiki Page: | -------------------------------------+------------------------------------- Comment (by Iceland_jack): For comparison here is the `newtype` `Pair2` becoming fully saturated {{{
:kind Pair2 Pair2 :: forall {rep :: RuntimeRep} {rep' :: RuntimeRep}. TYPE rep -> TYPE rep' -> forall (rep'' :: RuntimeRep) -> * :kind Pair2 Int# Pair2 Int# :: * -> forall (rep'' :: RuntimeRep) -> * :kind Pair2 Int# Double# Pair2 Int# Double# :: forall (rep'' :: RuntimeRep) -> * :kind Pair2 Int# Double# LiftedRep Pair2 Int# Double# LiftedRep :: * }}}
Is the kind of `Pair Int#` not `TYPE rep' -> forall (rep'' :: RuntimeRep) -> *` -- Ticket URL: http://ghc.haskell.org/trac/ghc/ticket/13963#comment:1 GHC http://www.haskell.org/ghc/ The Glasgow Haskell Compiler
#13963: Runtime representation confusingly displayed -------------------------------------+------------------------------------- Reporter: Iceland_jack | Owner: (none) Type: bug | Status: new Priority: normal | Milestone: Component: Compiler | Version: 8.0.1 Resolution: | Keywords: TypeInType, | LevityPolymorphism Operating System: Unknown/Multiple | Architecture: | Unknown/Multiple Type of failure: None/Unknown | Test Case: Blocked By: | Blocking: Related Tickets: | Differential Rev(s): Wiki Page: | -------------------------------------+------------------------------------- Changes (by goldfire): * keywords: => TypeInType, LevityPolymorphism -- Ticket URL: http://ghc.haskell.org/trac/ghc/ticket/13963#comment:2 GHC http://www.haskell.org/ghc/ The Glasgow Haskell Compiler
#13963: Runtime representation confusingly displayed -------------------------------------+------------------------------------- Reporter: Iceland_jack | Owner: (none) Type: bug | Status: new Priority: normal | Milestone: Component: Compiler | Version: 8.0.1 Resolution: | Keywords: TypeInType, | LevityPolymorphism Operating System: Unknown/Multiple | Architecture: | Unknown/Multiple Type of failure: None/Unknown | Test Case: Blocked By: | Blocking: Related Tickets: | Differential Rev(s): Wiki Page: | -------------------------------------+------------------------------------- Comment (by Iceland_jack): I guess, since the type synonym returns `r` that its kind should actually be {{{#!hs forall {rep :: RuntimeRep} {rep' :: RuntimeRep}. TYPE rep -> TYPE rep' -> forall (rep'' :: RuntimeRep) -> TYPE rep'' }}} -- Ticket URL: http://ghc.haskell.org/trac/ghc/ticket/13963#comment:3 GHC http://www.haskell.org/ghc/ The Glasgow Haskell Compiler
#13963: Runtime representation confusingly displayed -------------------------------------+------------------------------------- Reporter: Iceland_jack | Owner: (none) Type: bug | Status: new Priority: normal | Milestone: Component: Compiler | Version: 8.0.1 Resolution: | Keywords: TypeInType, | LevityPolymorphism Operating System: Unknown/Multiple | Architecture: | Unknown/Multiple Type of failure: None/Unknown | Test Case: Blocked By: | Blocking: Related Tickets: | Differential Rev(s): Wiki Page: | -------------------------------------+------------------------------------- Comment (by goldfire): OK. I've fixed this. Here is the new output: {{{ Pair :: TYPE rep -> TYPE rep' -> RuntimeRep -> * Pair Int :: * -> RuntimeRep -> * Pair Int Float :: RuntimeRep -> * Pair Int Float LiftedRep :: * }}} I'd say this is correct, because in the `Pair Int` case, we already have to choose the representation -- and we never regeneralize over `RuntimeRep` arguments. Patch will land with several others, in due course. -- Ticket URL: http://ghc.haskell.org/trac/ghc/ticket/13963#comment:4 GHC http://www.haskell.org/ghc/ The Glasgow Haskell Compiler
#13963: Runtime representation confusingly displayed
-------------------------------------+-------------------------------------
Reporter: Iceland_jack | Owner: (none)
Type: bug | Status: new
Priority: normal | Milestone:
Component: Compiler | Version: 8.0.1
Resolution: | Keywords: TypeInType,
| LevityPolymorphism
Operating System: Unknown/Multiple | Architecture:
| Unknown/Multiple
Type of failure: None/Unknown | Test Case:
Blocked By: | Blocking:
Related Tickets: | Differential Rev(s):
Wiki Page: |
-------------------------------------+-------------------------------------
Comment (by Ben Gamari
#13963: Runtime representation confusingly displayed -------------------------------------+------------------------------------- Reporter: Iceland_jack | Owner: (none) Type: bug | Status: closed Priority: normal | Milestone: 8.4.1 Component: Compiler | Version: 8.0.1 Resolution: fixed | Keywords: TypeInType, | LevityPolymorphism Operating System: Unknown/Multiple | Architecture: | Unknown/Multiple Type of failure: None/Unknown | Test Case: | ghci/scripts/T13963 Blocked By: | Blocking: Related Tickets: | Differential Rev(s): Wiki Page: | -------------------------------------+------------------------------------- Changes (by RyanGlScott): * status: new => closed * testcase: => ghci/scripts/T13963 * resolution: => fixed * milestone: => 8.4.1 -- Ticket URL: http://ghc.haskell.org/trac/ghc/ticket/13963#comment:6 GHC http://www.haskell.org/ghc/ The Glasgow Haskell Compiler
participants (1)
-
GHC