summaryrefslogtreecommitdiff
path: root/testsuite/tests/layout/layout005.hs
blob: df687956652b0fc25f677f4afde1c8e2970c442e (plain)
1
2
3
4
5
6
7
8
9
10

module M where

-- GHC's Lexer.x had a piece of code like this

f = if True then do
        case () of
            () -> ()
            else ()