summaryrefslogtreecommitdiff
path: root/tests/examples/ghc88/T13087.hs
blob: 44ec08641340a23c87422e45613677b9535d49fb (plain)
1
2
3
4
5
6
7
8
9
{-# LANGUAGE AlternativeLayoutRule #-}
{-# LANGUAGE LambdaCase            #-}

isOne :: Int -> Bool
isOne = \case 1 -> True
              _ -> False

main = return ()