AlternativeLayoutRule breaks LambdaCase
{-# LANGUAGE AlternativeLayoutRule #-}
{-# LANGUAGE LambdaCase #-}
isOne :: Int -> Bool
isOne = \case 1 -> True
_ -> False
main = return ()
$ ghc test-case
[1 of 1] Compiling Main ( test-case.hs, test-case.o )
test-case.hs:5:15: error: parse error on input ‘1’
It compiles fine without the AlternativeLayoutRule extension.
Trac metadata
Trac field | Value |
---|---|
Version | 8.0.1 |
Type | Bug |
TypeOfFailure | OtherFailure |
Priority | normal |
Resolution | Unresolved |
Component | Compiler (Parser) |
Test case | |
Differential revisions | |
BlockedBy | |
Related | |
Blocking | |
CC | |
Operating system | |
Architecture |