ghc-exactprint-0.5.0.0: tests/examples/ghc8/multi-export.hs
{-# LANGUAGE PatternSynonyms #-}
module Foo (A(B, C)) where
data A a = A
pattern B :: A Int
pattern B = A
pattern C :: A String
pattern C = A
{-# LANGUAGE PatternSynonyms #-}
module Foo (A(B, C)) where
data A a = A
pattern B :: A Int
pattern B = A
pattern C :: A String
pattern C = A