blob: 5391cf602b59da4c85c83ca513d277d228bd40bd (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE StandaloneDeriving #-}
{-# LANGUAGE TemplateHaskell #-}
module T18321 where
import Data.Ix
data T = MkT deriving (Eq, Ord, Ix)
$(return [])
deriving instance Enum T
data S a = MkS
deriving instance Enum (S Int)
$(return [])
deriving instance Enum (S Bool)
|
