summaryrefslogtreecommitdiff
path: root/tests/examples/ghc86/T5217.hs
blob: ac06be48fd209186fa1959253bd58fe56cc5bb84 (plain)
1
2
3
4
5
6
7
8
9
10
11
{-# LANGUAGE GADTs #-}
{-# LANGUAGE TemplateHaskell #-}

module T5217 where
import Language.Haskell.TH

$([d| data T a b where { T1 :: Int -> T Int Char
                       ; T2 :: a -> T a a
                       ; T3 :: a -> T [a] a
                       ; T4 :: a -> b -> T b [a] } |])