ghc-exactprint-0.5.3.1: tests/examples/ghc80/pmc002.hs
{-# OPTIONS_GHC -fwarn-incomplete-patterns -fwarn-overlapping-patterns #-}
module PMC002 where
f :: [a] -> Bool
f [] = True
f x | (_:_) <- x = False -- exhaustive
{-# OPTIONS_GHC -fwarn-incomplete-patterns -fwarn-overlapping-patterns #-}
module PMC002 where
f :: [a] -> Bool
f [] = True
f x | (_:_) <- x = False -- exhaustive