diff --git a/examples/let.html b/examples/let.html index d7e38a9..62dfe97 100644 --- a/examples/let.html +++ b/examples/let.html @@ -4,3 +4,6 @@

1 5

+

+ 4 11 +

diff --git a/examples/let.slab b/examples/let.slab index 1c54ca2..086495d 100644 --- a/examples/let.slab +++ b/examples/let.slab @@ -13,3 +13,9 @@ let f = 1 g = 2 + 3 p #(f) #(g) + +let + h = 4 + i + = 5 + 6 +p #(h) #(i) diff --git a/src/Slab/Parse.hs b/src/Slab/Parse.hs index 102c8b1..5e5b4f8 100644 --- a/src/Slab/Parse.hs +++ b/src/Slab/Parse.hs @@ -622,6 +622,7 @@ parserLet = parserAssignVar :: Parser (L.IndentOpt Parser Block Block) parserAssignVar = do _ <- lexeme (string "let") + scn blockIndent <- getSourcePos pairs <- some $ do initialIndent <- getSourcePos