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

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

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

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