hexagoxel
/
brittany
1
0
Fork 0
Code Issues 117 Pull Requests 5 Packages Projects Releases 5 Wiki Activity

Fix matching of `LastStmt`

pull/357/head
Taylor Fausak 2021-11-02 02:16:49 +00:00 committed by GitHub
parent 515595b432
commit 0f035faf3c
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Language/Haskell/Brittany/Internal/Layouters/Stmt.hs
View File

@ -34,7 +34,7 @@ layoutStmt lstmt@(L _ stmt) = do
indentAmount :: Int <- indentAmount :: Int <-
mAsk <&> _conf_layout .> _lconfig_indentAmount .> confUnpack mAsk <&> _conf_layout .> _lconfig_indentAmount .> confUnpack
docWrapNode lstmt $ case stmt of docWrapNode lstmt $ case stmt of
LastStmt _ body (Just False) _ -> do LastStmt _ body Nothing _ -> do
layoutExpr body layoutExpr body
BindStmt _ lPat expr -> do BindStmt _ lPat expr -> do
patDoc <- fmap return $ colsWrapPat =<< layoutPat lPat patDoc <- fmap return $ colsWrapPat =<< layoutPat lPat