blob: 977372a516fe4d580279e06e445955fadc654b47 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
{-# OPTIONS_GHC -XDeriveDataTypeable -XStandaloneDeriving #-}
-- See Trac #1825
-- Test stand-alone deriving for Typeable
-- Horridly, one needs to define instance for Typeable1 etc
module ShouldCompile where
import Data.OldTypeable
data T1 a = T1 a
data T2 a b = T2 a b
deriving instance Typeable1 T1
deriving instance Typeable2 T2
|
