mirror of
https://github.com/koalaman/shellcheck
synced 2025-08-14 18:48:16 -07:00
Plug space leaks when processing multiple files
This commit is contained in:
parent
a30ac402eb
commit
3ce310e939
4 changed files with 7 additions and 4 deletions
|
@ -225,7 +225,7 @@ runFormatter sys format options files = do
|
|||
f :: Status -> FilePath -> IO Status
|
||||
f status file = do
|
||||
newStatus <- process file `catch` handler file
|
||||
return $ status `mappend` newStatus
|
||||
return $! status `mappend` newStatus
|
||||
handler :: FilePath -> IOException -> IO Status
|
||||
handler file e = reportFailure file (show e)
|
||||
reportFailure file str = do
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue