fay-0.24.2.0: tests/PrefixOpPat.hs

module PrefixOpPat where

f ((:) x y) = x

main :: Fay ()
main = do
  print $ f [1,2]