1 2 3 4 5 6 7 8
{-# OPTIONS_GHC -Wpattern-signature-binds -Werror #-} module WPatternSigBinds where f (x :: a) = x g (x :: a) (y :: b) = x h (x :: a) (y :: b c d) = x