Show sources of cost centers in .prof
[ghc.git] / testsuite / tests / generics / T9563.hs
1 {-# LANGUAGE TypeFamilies #-}
2 {-# LANGUAGE DeriveGeneric #-}
3 {-# LANGUAGE FlexibleInstances #-}
4 {-# LANGUAGE StandaloneDeriving #-}
5
6 module T9563 where
7
8 import GHC.Generics
9
10 data family F typ :: * -> *
11 data A
12 data instance F A a = AData a
13 deriving (Generic, Generic1)
14
15 data family G a b c d
16 data instance G Int b Float d = H deriving Generic
17
18 deriving instance Generic1 (G Int b Float)