testsuite/tests/th/TH_reifyMkName.hs


1
2
3
4
5
6
7
8
9
10
11
12
13
14

-- Trac #2339

module Foo where

import System.IO
import Language.Haskell.TH

type C = Int

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