blob: f9a13b3236dc7869a231f95ca332e51f692f0757 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
|
TYPE CONSTRUCTORS
data type T1{1} :: * -> *
data type T2{1} :: * -> *
roles phantom
DATA CONSTRUCTORS
K2 :: forall a. FunPtr a -> T2 a
K1 :: forall a. IO a -> T1 a
Dependent modules: []
Dependent packages: [base-4.15.0.0, ghc-bignum-1.0, ghc-prim-0.7.0]
==================== Typechecker ====================
Roles2.$tcT2
= GHC.Types.TyCon
9065817229114433861## 13399581642971864140## Roles2.$trModule
(GHC.Types.TrNameS "T2"#) 0 GHC.Types.krep$*Arr*
Roles2.$tc'K2
= GHC.Types.TyCon
17395957229042313563## 12263882107019815181## Roles2.$trModule
(GHC.Types.TrNameS "'K2"#) 1 $krep
Roles2.$tcT1
= GHC.Types.TyCon
10310640733256438505## 9162099558816022096## Roles2.$trModule
(GHC.Types.TrNameS "T1"#) 0 GHC.Types.krep$*Arr*
Roles2.$tc'K1
= GHC.Types.TyCon
16530009231990968394## 11761390951471299534## Roles2.$trModule
(GHC.Types.TrNameS "'K1"#) 1 $krep
$krep [InlPrag=[~]] = GHC.Types.KindRepVar 0
$krep [InlPrag=[~]] = GHC.Types.KindRepFun $krep $krep
$krep [InlPrag=[~]] = GHC.Types.KindRepFun $krep $krep
$krep [InlPrag=[~]]
= GHC.Types.KindRepTyConApp GHC.Ptr.$tcFunPtr ((:) $krep [])
$krep [InlPrag=[~]]
= GHC.Types.KindRepTyConApp Roles2.$tcT2 ((:) $krep [])
$krep [InlPrag=[~]]
= GHC.Types.KindRepTyConApp GHC.Types.$tcIO ((:) $krep [])
$krep [InlPrag=[~]]
= GHC.Types.KindRepTyConApp Roles2.$tcT1 ((:) $krep [])
Roles2.$trModule
= GHC.Types.Module
(GHC.Types.TrNameS "main"#) (GHC.Types.TrNameS "Roles2"#)
|
