1 2 3 4 5 6
{-# LANGUAGE Haskell2010 #-} module ParserNoBinaryLiterals1 where f :: Int -> () f 0b0 = () f _ = ()