Commit 0b8b7379 authored by simonpj's avatar simonpj
Browse files

Test for T2339

parent 649b68fd
-- Trac #2339
module Foo where
import Language.Haskell.TH
type C = Int
$(do
a <- reify $ mkName "C"
report False $ show a
return []
)
TH_reifyMkName.hs:9:2: TyConI (TySynD Foo.C [] (ConT GHC.Base.Int))
Loading package ghc-prim ... linking ... done.
Loading package integer ... linking ... done.
Loading package base ... linking ... done.
Loading package array-0.1 ... linking ... done.
Loading package containers-0.1 ... linking ... done.
Loading package packedstring-0.1 ... linking ... done.
Loading package pretty-1.0 ... linking ... done.
Loading package template-haskell ... linking ... done.
......@@ -40,6 +40,7 @@ test('TH_reifyDecl2', normal, compile, ['-v0'])
test('TH_reifyType1', normal, compile, [''])
test('TH_reifyType2', normal, compile, [''])
test('TH_reifyMkName', normal, compile, [''])
test('TH_spliceDecl1', normal, compile, ['-v0'])
test('TH_spliceDecl2', normal, compile, ['-v0'])
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment