Testsuite: pass '-s --no-print-directory' to MAKE
[ghc.git] / testsuite / tests / module / mod169.hs
1 -- !!! Non-clashing local binding and occurrence.
2 module M where
3
4 m :: Int
5 m = let length _ = 5 in length []