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

{-# LANGUAGE ViewPatterns #-}
f (id -> Just _) "" = ""

g (id -> True) = False