summaryrefslogtreecommitdiff
path: root/tests/examples/ghc86/TH_abstractFamily.hs
blob: 921dfaa1920503c632acbf0336d29d28d18255b5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
{-# LANGUAGE TemplateHaskell #-}
module TH_abstractFamily where

import Language.Haskell.TH

-- Empty closed type families are okay...
ds1 :: Q [Dec]
ds1 = [d| type family F a where |]

-- ...but abstract ones should result in a type error
ds2 :: Q [Dec]
ds2 = [d| type family G a where .. |]