From 2eb22e730f7075a6fa761b0ad7cfd8557da80584 Mon Sep 17 00:00:00 2001 From: Lennart Spitzner Date: Wed, 10 Oct 2018 21:26:55 +0200 Subject: [PATCH] Add tests for empty lines around where --- src-literatetests/10-tests.blt | 35 ++++++++++++++++++++++++++++++++++ 1 file changed, 35 insertions(+) diff --git a/src-literatetests/10-tests.blt b/src-literatetests/10-tests.blt index 83dfc61..15a021e 100644 --- a/src-literatetests/10-tests.blt +++ b/src-literatetests/10-tests.blt @@ -1106,3 +1106,38 @@ instance MyClass Int where -- ^ Interesting field , intData2 :: Int } + + +############################################################################### +############################################################################### +############################################################################### +#group whitespace-newlines +############################################################################### +############################################################################### +############################################################################### + +#test module-import-newlines + +module Main where + +import Prelude + +firstDecl = True + +#test function-where-newlines + +func = do + + -- complex first step + aaa + + -- complex second step + bbb + + where + + helper :: Helper + helper = helpful + + other :: Other + other = True