diff options
author | stuebinm | 2022-02-17 00:41:36 +0100 |
---|---|---|
committer | stuebinm | 2022-02-17 00:41:36 +0100 |
commit | faa244e1a7e760be88054a5f15b3e115ad8e32e5 (patch) | |
tree | 34cec7b74b49284f446aaf3073a551306d8ca5be /lib/CheckMap.hs | |
parent | 487e06bf875ba8a835399b26095c756899b1209f (diff) |
sprinkle some NFData everywhere
(also some evaluateNF, leading to slightly less memory usage)
Diffstat (limited to 'lib/CheckMap.hs')
-rw-r--r-- | lib/CheckMap.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/CheckMap.hs b/lib/CheckMap.hs index cfa4b6e..9dd0530 100644 --- a/lib/CheckMap.hs +++ b/lib/CheckMap.hs @@ -21,6 +21,7 @@ import GHC.Generics (Generic) import Badges (Badge) +import Control.DeepSeq (NFData) import LintConfig (LintConfig') import LintWriter (LintResult, invertLintResult, resultToAdjusted, resultToBadges, @@ -55,7 +56,7 @@ data MapResult = MapResult -- ^ badges that can be found on this map , mapresultGeneral :: [Hint] -- ^ general-purpose lints that didn't fit anywhere else - } deriving (Generic) + } deriving (Generic, NFData) instance ToJSON MapResult where toJSON res = A.object |