ghc-exactprint-0.5.1.0: tests/examples/ghc8/export-ps-rec-sel.hs
{-# LANGUAGE PatternSynonyms #-}
module Foo( R(P,x)) where
data Q = Q Int
data R = R
pattern P{x} = Q x
{-# LANGUAGE PatternSynonyms #-}
module Foo( R(P,x)) where
data Q = Q Int
data R = R
pattern P{x} = Q x