summaryrefslogtreecommitdiff
path: root/tests/examples/ghc86/TH_reifyMkName.hs
blob: a7835355ae98f10a998e1aea78734c7d8075aca8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
-- Trac #2339
{-# LANGUAGE TemplateHaskell #-}

module Foo where

import System.IO
import Language.Haskell.TH

type C = Int

$(do
  a <- reify $ mkName "C"
  runIO $ hPutStrLn stderr (show a)
  return []
  )