1 2 3 4 5 6 7 8 9 10 11 12
module TH_reifyDecl2 where import Language.Haskell.TH import System.IO $( do x <- reify ''Maybe runIO $ hPutStrLn stderr $ pprint x return [] )