summaryrefslogtreecommitdiff
path: root/testsuite/tests/generics/GenDerivOutput.stderr
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/generics/GenDerivOutput.stderr')
-rw-r--r--testsuite/tests/generics/GenDerivOutput.stderr156
1 files changed, 78 insertions, 78 deletions
diff --git a/testsuite/tests/generics/GenDerivOutput.stderr b/testsuite/tests/generics/GenDerivOutput.stderr
index 9c008e0038..463609b19e 100644
--- a/testsuite/tests/generics/GenDerivOutput.stderr
+++ b/testsuite/tests/generics/GenDerivOutput.stderr
@@ -1,13 +1,13 @@
==================== Derived instances ====================
Derived class instances:
- instance GHC.Generics.Generic (GenDerivOutput.List a) where
+ instance GHC.Generics.Generic (GenDerivOutput.Rose a) where
GHC.Generics.from x
= GHC.Generics.M1
(case x of
- GenDerivOutput.Nil
+ GenDerivOutput.Empty
-> GHC.Generics.L1 (GHC.Generics.M1 GHC.Generics.U1)
- GenDerivOutput.Cons g1 g2
+ GenDerivOutput.Rose g1 g2
-> GHC.Generics.R1
(GHC.Generics.M1
((GHC.Generics.:*:)
@@ -16,47 +16,43 @@ Derived class instances:
GHC.Generics.to (GHC.Generics.M1 x)
= case x of
(GHC.Generics.L1 (GHC.Generics.M1 GHC.Generics.U1))
- -> GenDerivOutput.Nil
+ -> GenDerivOutput.Empty
(GHC.Generics.R1 (GHC.Generics.M1 ((GHC.Generics.:*:) (GHC.Generics.M1 (GHC.Generics.K1 g1))
(GHC.Generics.M1 (GHC.Generics.K1 g2)))))
- -> GenDerivOutput.Cons g1 g2
+ -> GenDerivOutput.Rose g1 g2
- instance GHC.Generics.Generic1 GenDerivOutput.List where
+ instance GHC.Generics.Generic1 GenDerivOutput.Rose where
GHC.Generics.from1 x
= GHC.Generics.M1
(case x of
- GenDerivOutput.Nil
+ GenDerivOutput.Empty
-> GHC.Generics.L1 (GHC.Generics.M1 GHC.Generics.U1)
- GenDerivOutput.Cons g1 g2
+ GenDerivOutput.Rose g1 g2
-> GHC.Generics.R1
(GHC.Generics.M1
((GHC.Generics.:*:)
(GHC.Generics.M1 (GHC.Generics.Par1 g1))
- (GHC.Generics.M1 (GHC.Generics.Rec1 g2)))))
+ (GHC.Generics.M1
+ ((GHC.Base..)
+ GHC.Generics.Comp1 (GHC.Base.fmap GHC.Generics.Rec1) g2)))))
GHC.Generics.to1 (GHC.Generics.M1 x)
= case x of
(GHC.Generics.L1 (GHC.Generics.M1 GHC.Generics.U1))
- -> GenDerivOutput.Nil
+ -> GenDerivOutput.Empty
(GHC.Generics.R1 (GHC.Generics.M1 ((GHC.Generics.:*:) (GHC.Generics.M1 g1)
(GHC.Generics.M1 g2))))
- -> GenDerivOutput.Cons
- (GHC.Generics.unPar1 g1) (GHC.Generics.unRec1 g2)
-
- instance GHC.Base.Functor GenDerivOutput.List where
- GHC.Base.fmap f GenDerivOutput.Nil = GenDerivOutput.Nil
- GHC.Base.fmap f (GenDerivOutput.Cons a1 a2)
- = GenDerivOutput.Cons (f a1) (GHC.Base.fmap f a2)
- (GHC.Base.<$) z GenDerivOutput.Nil = GenDerivOutput.Nil
- (GHC.Base.<$) z (GenDerivOutput.Cons a1 a2)
- = GenDerivOutput.Cons ((\ b1 -> z) a1) ((GHC.Base.<$) z a2)
+ -> GenDerivOutput.Rose
+ (GHC.Generics.unPar1 g1)
+ ((GHC.Base..)
+ (GHC.Base.fmap GHC.Generics.unRec1) GHC.Generics.unComp1 g2)
- instance GHC.Generics.Generic (GenDerivOutput.Rose a) where
+ instance GHC.Generics.Generic (GenDerivOutput.List a) where
GHC.Generics.from x
= GHC.Generics.M1
(case x of
- GenDerivOutput.Empty
+ GenDerivOutput.Nil
-> GHC.Generics.L1 (GHC.Generics.M1 GHC.Generics.U1)
- GenDerivOutput.Rose g1 g2
+ GenDerivOutput.Cons g1 g2
-> GHC.Generics.R1
(GHC.Generics.M1
((GHC.Generics.:*:)
@@ -65,165 +61,169 @@ Derived class instances:
GHC.Generics.to (GHC.Generics.M1 x)
= case x of
(GHC.Generics.L1 (GHC.Generics.M1 GHC.Generics.U1))
- -> GenDerivOutput.Empty
+ -> GenDerivOutput.Nil
(GHC.Generics.R1 (GHC.Generics.M1 ((GHC.Generics.:*:) (GHC.Generics.M1 (GHC.Generics.K1 g1))
(GHC.Generics.M1 (GHC.Generics.K1 g2)))))
- -> GenDerivOutput.Rose g1 g2
+ -> GenDerivOutput.Cons g1 g2
- instance GHC.Generics.Generic1 GenDerivOutput.Rose where
+ instance GHC.Generics.Generic1 GenDerivOutput.List where
GHC.Generics.from1 x
= GHC.Generics.M1
(case x of
- GenDerivOutput.Empty
+ GenDerivOutput.Nil
-> GHC.Generics.L1 (GHC.Generics.M1 GHC.Generics.U1)
- GenDerivOutput.Rose g1 g2
+ GenDerivOutput.Cons g1 g2
-> GHC.Generics.R1
(GHC.Generics.M1
((GHC.Generics.:*:)
(GHC.Generics.M1 (GHC.Generics.Par1 g1))
- (GHC.Generics.M1
- ((GHC.Base..)
- GHC.Generics.Comp1 (GHC.Base.fmap GHC.Generics.Rec1) g2)))))
+ (GHC.Generics.M1 (GHC.Generics.Rec1 g2)))))
GHC.Generics.to1 (GHC.Generics.M1 x)
= case x of
(GHC.Generics.L1 (GHC.Generics.M1 GHC.Generics.U1))
- -> GenDerivOutput.Empty
+ -> GenDerivOutput.Nil
(GHC.Generics.R1 (GHC.Generics.M1 ((GHC.Generics.:*:) (GHC.Generics.M1 g1)
(GHC.Generics.M1 g2))))
- -> GenDerivOutput.Rose
- (GHC.Generics.unPar1 g1)
- ((GHC.Base..)
- (GHC.Base.fmap GHC.Generics.unRec1) GHC.Generics.unComp1 g2)
+ -> GenDerivOutput.Cons
+ (GHC.Generics.unPar1 g1) (GHC.Generics.unRec1 g2)
+
+ instance GHC.Base.Functor GenDerivOutput.List where
+ GHC.Base.fmap f GenDerivOutput.Nil = GenDerivOutput.Nil
+ GHC.Base.fmap f (GenDerivOutput.Cons a1 a2)
+ = GenDerivOutput.Cons (f a1) (GHC.Base.fmap f a2)
+ (GHC.Base.<$) z GenDerivOutput.Nil = GenDerivOutput.Nil
+ (GHC.Base.<$) z (GenDerivOutput.Cons a1 a2)
+ = GenDerivOutput.Cons ((\ b1 -> z) a1) ((GHC.Base.<$) z a2)
Derived type family instances:
- type GHC.Generics.Rep (GenDerivOutput.List a) = GHC.Generics.D1
+ type GHC.Generics.Rep (GenDerivOutput.Rose a) = GHC.Generics.D1
('GHC.Generics.MetaData
- "List"
+ "Rose"
"GenDerivOutput"
"main"
'GHC.Types.False)
(GHC.Generics.C1
('GHC.Generics.MetaCons
- "Nil"
+ "Empty"
'GHC.Generics.PrefixI
'GHC.Types.False)
GHC.Generics.U1
GHC.Generics.:+: GHC.Generics.C1
('GHC.Generics.MetaCons
- "Cons"
+ "Rose"
'GHC.Generics.PrefixI
- 'GHC.Types.True)
+ 'GHC.Types.False)
(GHC.Generics.S1
('GHC.Generics.MetaSel
- ('GHC.Maybe.Just
- "element")
+ 'GHC.Maybe.Nothing
'GHC.Generics.NoSourceUnpackedness
'GHC.Generics.NoSourceStrictness
'GHC.Generics.DecidedLazy)
(GHC.Generics.Rec0 a)
GHC.Generics.:*: GHC.Generics.S1
('GHC.Generics.MetaSel
- ('GHC.Maybe.Just
- "rest")
+ 'GHC.Maybe.Nothing
'GHC.Generics.NoSourceUnpackedness
'GHC.Generics.NoSourceStrictness
'GHC.Generics.DecidedLazy)
(GHC.Generics.Rec0
(GenDerivOutput.List
- a))))
- type GHC.Generics.Rep1 GenDerivOutput.List = GHC.Generics.D1
+ (GenDerivOutput.Rose
+ a)))))
+ type GHC.Generics.Rep1 GenDerivOutput.Rose = GHC.Generics.D1
('GHC.Generics.MetaData
- "List" "GenDerivOutput" "main" 'GHC.Types.False)
+ "Rose" "GenDerivOutput" "main" 'GHC.Types.False)
(GHC.Generics.C1
('GHC.Generics.MetaCons
- "Nil" 'GHC.Generics.PrefixI 'GHC.Types.False)
+ "Empty"
+ 'GHC.Generics.PrefixI
+ 'GHC.Types.False)
GHC.Generics.U1
GHC.Generics.:+: GHC.Generics.C1
('GHC.Generics.MetaCons
- "Cons"
+ "Rose"
'GHC.Generics.PrefixI
- 'GHC.Types.True)
+ 'GHC.Types.False)
(GHC.Generics.S1
('GHC.Generics.MetaSel
- ('GHC.Maybe.Just
- "element")
+ 'GHC.Maybe.Nothing
'GHC.Generics.NoSourceUnpackedness
'GHC.Generics.NoSourceStrictness
'GHC.Generics.DecidedLazy)
GHC.Generics.Par1
GHC.Generics.:*: GHC.Generics.S1
('GHC.Generics.MetaSel
- ('GHC.Maybe.Just
- "rest")
+ 'GHC.Maybe.Nothing
'GHC.Generics.NoSourceUnpackedness
'GHC.Generics.NoSourceStrictness
'GHC.Generics.DecidedLazy)
- (GHC.Generics.Rec1
- GenDerivOutput.List)))
- type GHC.Generics.Rep (GenDerivOutput.Rose a) = GHC.Generics.D1
+ (GenDerivOutput.List
+ GHC.Generics.:.: GHC.Generics.Rec1
+ GenDerivOutput.Rose)))
+ type GHC.Generics.Rep (GenDerivOutput.List a) = GHC.Generics.D1
('GHC.Generics.MetaData
- "Rose"
+ "List"
"GenDerivOutput"
"main"
'GHC.Types.False)
(GHC.Generics.C1
('GHC.Generics.MetaCons
- "Empty"
+ "Nil"
'GHC.Generics.PrefixI
'GHC.Types.False)
GHC.Generics.U1
GHC.Generics.:+: GHC.Generics.C1
('GHC.Generics.MetaCons
- "Rose"
+ "Cons"
'GHC.Generics.PrefixI
- 'GHC.Types.False)
+ 'GHC.Types.True)
(GHC.Generics.S1
('GHC.Generics.MetaSel
- 'GHC.Maybe.Nothing
+ ('GHC.Maybe.Just
+ "element")
'GHC.Generics.NoSourceUnpackedness
'GHC.Generics.NoSourceStrictness
'GHC.Generics.DecidedLazy)
(GHC.Generics.Rec0 a)
GHC.Generics.:*: GHC.Generics.S1
('GHC.Generics.MetaSel
- 'GHC.Maybe.Nothing
+ ('GHC.Maybe.Just
+ "rest")
'GHC.Generics.NoSourceUnpackedness
'GHC.Generics.NoSourceStrictness
'GHC.Generics.DecidedLazy)
(GHC.Generics.Rec0
(GenDerivOutput.List
- (GenDerivOutput.Rose
- a)))))
- type GHC.Generics.Rep1 GenDerivOutput.Rose = GHC.Generics.D1
+ a))))
+ type GHC.Generics.Rep1 GenDerivOutput.List = GHC.Generics.D1
('GHC.Generics.MetaData
- "Rose" "GenDerivOutput" "main" 'GHC.Types.False)
+ "List" "GenDerivOutput" "main" 'GHC.Types.False)
(GHC.Generics.C1
('GHC.Generics.MetaCons
- "Empty"
- 'GHC.Generics.PrefixI
- 'GHC.Types.False)
+ "Nil" 'GHC.Generics.PrefixI 'GHC.Types.False)
GHC.Generics.U1
GHC.Generics.:+: GHC.Generics.C1
('GHC.Generics.MetaCons
- "Rose"
+ "Cons"
'GHC.Generics.PrefixI
- 'GHC.Types.False)
+ 'GHC.Types.True)
(GHC.Generics.S1
('GHC.Generics.MetaSel
- 'GHC.Maybe.Nothing
+ ('GHC.Maybe.Just
+ "element")
'GHC.Generics.NoSourceUnpackedness
'GHC.Generics.NoSourceStrictness
'GHC.Generics.DecidedLazy)
GHC.Generics.Par1
GHC.Generics.:*: GHC.Generics.S1
('GHC.Generics.MetaSel
- 'GHC.Maybe.Nothing
+ ('GHC.Maybe.Just
+ "rest")
'GHC.Generics.NoSourceUnpackedness
'GHC.Generics.NoSourceStrictness
'GHC.Generics.DecidedLazy)
- (GenDerivOutput.List
- GHC.Generics.:.: GHC.Generics.Rec1
- GenDerivOutput.Rose)))
+ (GHC.Generics.Rec1
+ GenDerivOutput.List)))
View Lorry Controller Status