summaryrefslogtreecommitdiff
path: root/testsuite/tests/th/T5737.hs
diff options
context:
space:
mode:
authorSimon Peyton Jones <simonpj@microsoft.com>2012-05-11 22:18:06 +0100
committerSimon Peyton Jones <simonpj@microsoft.com>2012-05-11 22:18:06 +0100
commit50b41cfead4899ef026d8005a17405b0f4344d21 (patch)
tree76998e621ce55c233f94c3eccdcb2dcf148ad96d /testsuite/tests/th/T5737.hs
parent3970d9a52e36f6d2d0ef9755dce5532530b6e01d (diff)
downloadhaskell-50b41cfead4899ef026d8005a17405b0f4344d21.tar.gz
Test Trac #5737
Diffstat (limited to 'testsuite/tests/th/T5737.hs')
-rw-r--r--testsuite/tests/th/T5737.hs5
1 files changed, 5 insertions, 0 deletions
diff --git a/testsuite/tests/th/T5737.hs b/testsuite/tests/th/T5737.hs
new file mode 100644
index 0000000000..1458c78517
--- /dev/null
+++ b/testsuite/tests/th/T5737.hs
@@ -0,0 +1,5 @@
+{-# LANGUAGE TemplateHaskell #-}
+module T5737 where
+
+import Language.Haskell.TH
+makeAlpha n = [d| data Alpha = Alpha $(conT n) deriving (Show, Read) |]