summaryrefslogtreecommitdiff
path: root/testsuite/tests/parser/should_fail/ParserNoBinaryLiterals2.hs
blob: 6c48c20746b01b4de68a4ccb29c33300245cb67e (plain)
1
2
3
4
5
6
7
8
9
10
{-# LANGUAGE Haskell2010 #-}
{-# LANGUAGE MagicHash #-}

module ParserNoBinaryLiterals2 where

import GHC.Types

f :: Word -> ()
f (W# 0b0##) = ()
f _          = ()