31e3c0b500
- Remove some CPP needed only because of GHC 7.4 (which is not supported now, yey) - Move CPP for GHC 8 to Gap module
8 lines
122 B
Haskell
8 lines
122 B
Haskell
{-# LANGUAGE PatternSynonyms #-}
|
|
|
|
module A where
|
|
|
|
data SomeType a b = SomeType (a,b)
|
|
|
|
pattern MyPat x y <- SomeType (x,y)
|