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

module ParserNoBinaryLiterals3 where

import GHC.Types

f :: Int -> ()
f (I# 0b0#) = ()
f _         = ()