diff options
| author | Ian Lynagh <igloo@earth.li> | 2009-11-25 18:24:21 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2009-11-25 18:24:21 +0000 |
| commit | 259cb7dd6b4e9bc7ac6ec4a8ae15947d7fb9b10e (patch) | |
| tree | ff3228611735521e72a263a311e485644761c48d /compiler/parser/Lexer.x | |
| parent | de865a1c13352b239bcbad64a3b70e66a9bcba86 (diff) | |
| download | haskell-259cb7dd6b4e9bc7ac6ec4a8ae15947d7fb9b10e.tar.gz | |
Add unboxed parentheses to the alternative layout rule
Diffstat (limited to 'compiler/parser/Lexer.x')
| -rw-r--r-- | compiler/parser/Lexer.x | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/compiler/parser/Lexer.x b/compiler/parser/Lexer.x index fbc4821f16..2c98f22725 100644 --- a/compiler/parser/Lexer.x +++ b/compiler/parser/Lexer.x @@ -2070,6 +2070,8 @@ isALRopen ITif = True isALRopen IToparen = True isALRopen ITobrack = True isALRopen ITocurly = True +-- GHC Extensions: +isALRopen IToubxparen = True isALRopen _ = False isALRclose :: Token -> Bool @@ -2078,11 +2080,15 @@ isALRclose ITthen = True isALRclose ITcparen = True isALRclose ITcbrack = True isALRclose ITccurly = True +-- GHC Extensions: +isALRclose ITcubxparen = True isALRclose _ = False containsCommas :: Token -> Bool containsCommas IToparen = True containsCommas ITobrack = True +-- GHC Extensions: +containsCommas IToubxparen = True containsCommas _ = False topNoLayoutContainsCommas :: [ALRContext] -> Bool |