summaryrefslogtreecommitdiff
path: root/testsuite/tests/ghc-api/exactprint/LayoutIn1.hs
blob: 3ea1f8402cd67b84a89f037e54925b69b4e4a899 (plain)
1
2
3
4
5
6
7
8
9
module LayoutIn1 where

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

--In this Example: rename 'sq' to 'square'.

sumSquares x y= sq x + sq y where sq x= x^pow
  --There is a comment.
                                  pow=2