summaryrefslogtreecommitdiff
path: root/utils/check-exact/cases/LayoutIn3b.hs
blob: 32bc294ae4aea377e596f516a5887b918fb3de19 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
module LayoutIn3b where

--Layout rule applies after 'where','let','do' and 'of'

--In this Example: rename 'x' after 'let'  to 'anotherX'.

foo x = let x = 12 in (             x            ) where   y = 2
                                                           --there is a comment.
                                                           w = x
                                                             where
                                                               x = let y = 5 in y + 3