testsuite/tests/th/T8624.hs


1
2
3
4
5
6
7
8

{-# LANGUAGE TemplateHaskell #-}
{-# OPTIONS_GHC -dth-dec-file #-}
module T8624 (THDec(..)) where

import Language.Haskell.TH

$(return [DataD [] (mkName "THDec") [] Nothing
          [NormalC (mkName "THDec") []] []])