Show sources of cost centers in .prof
[ghc.git] / testsuite / tests / generics / T5462No1.hs
1 {-# LANGUAGE FlexibleContexts #-}
2 {-# LANGUAGE FlexibleInstances #-}
3 {-# LANGUAGE DeriveGeneric #-}
4 {-# LANGUAGE DeriveFunctor #-}
5 {-# LANGUAGE DefaultSignatures #-}
6 {-# LANGUAGE StandaloneDeriving #-}
7 {-# LANGUAGE UndecidableInstances #-}
8
9 -- DeriveAnyClass not enabled
10
11 module T5462No1 where
12
13 import GHC.Generics hiding (C, C1, D)
14 import GFunctor
15
16 class C1 a where
17 c1 :: a -> Int
18
19 class C2 a where
20 c2 :: a -> Int
21 c2 _ = 0
22
23 newtype F a = F1 [a]
24 deriving (Show, Eq, Generic, Generic1, GFunctor)
25
26 data G = G1 deriving (C1)
27 data H = H1 deriving (C2)