1 files changed, 13 insertions, 0 deletions
diff --git a/testsuite/tests/quasiquotation/T4150A.hs b/testsuite/tests/quasiquotation/T4150A.hs
new file mode 100644
index 0000000000..25ee003fee
--- /dev/null
+++ b/testsuite/tests/quasiquotation/T4150A.hs
@@ -0,0 +1,13 @@
+
+module T4150A where
+
+import Language.Haskell.TH
+import Language.Haskell.TH.Quote
+
+multiLineStr :: QuasiQuoter
+multiLineStr = QuasiQuoter {
+                   quoteExp  = stringE,
+                   quotePat  = error "XXX",
+                   quoteType = error "XXX",
+                   quoteDec  = error "XXX"
+               }