Skip to content
Snippets Groups Projects
Commit f9c693bf authored by stuebinm's avatar stuebinm
Browse files

why oh why does the prelude contain unsafe functions

some parts of haskell are really, really old …
parent 61e66f41
No related branches found
No related tags found
No related merge requests found
Pipeline #8704 passed
...@@ -72,7 +72,7 @@ resultIsFatal config res = ...@@ -72,7 +72,7 @@ resultIsFatal config res =
-- note that it really does go through all lints, so don't -- note that it really does go through all lints, so don't
-- call it too often -- call it too often
maximumLintLevel :: DirResult -> Level maximumLintLevel :: DirResult -> Level
maximumLintLevel = maximum maximumLintLevel = (\t -> if null t then Info else maximum t)
. map hintLevel . map hintLevel
. concatMap (keys . mapresultLayer) . concatMap (keys . mapresultLayer)
. elems . elems
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment