Workaround for #340

2014-09-12 03:48:22 +02:00
parent b9890a90ed
commit 1c8d1edb4d
7 changed files with 56 additions and 5 deletions
--- a/test/data/pattern-synonyms/A.hs
+++ b/test/data/pattern-synonyms/A.hs
@@ -0,0 +1,6 @@
+{-# LANGUAGE PatternSynonyms #-}
+module A where
+
+data SomeType a b = SomeType (a,b)
+
+pattern MyPat x y <- SomeType (x,y)