testsuite/tests/th/T7532.hs


1
2
3
4
5
6
7
8
9
10
11

{-# OPTIONS_GHC -ddump-rn -ddump-splices #-}
{-# LANGUAGE TemplateHaskell, TypeFamilies #-}
module T7532 where

import Language.Haskell.TH
import T7532a

instance C Bool where
  data D Bool = MkD

$(bang')