haskell-src-exts-1.24.0: tests/examples/PatSynFix.hs

{-# LANGUAGE PatternSynonyms #-}
pattern A <- (True, True) where A = (not $ False && True, True)
exp = not $ False && True