haskell-tools-builtin-refactorings-1.0.0.0: test/ExtensionOrganizerTest/PatternSynonymsTest/BiDirectional.hs

{-# LANGUAGE PatternSynonyms #-}

module BiDirectional where

pattern X :: a -> [a] {-* PatternSynonyms *-}
pattern X a = [a]     {-* PatternSynonyms *-}