Note about strictness annotations

2014-04-10 20:36:46 +03:00 · 2014-04-10 20:36:46 +03:00 · 7133f75bf3
commit 7133f75bf3
parent b67d225f56
1 changed files with 3 additions and 0 deletions
--- a/yesod-core/Yesod/Core/Types.hs
+++ b/yesod-core/Yesod/Core/Types.hs
@ -313,6 +313,9 @@ data Header =
    | Header ByteString ByteString
    deriving (Eq, Show)

+-- FIXME In the next major version bump, let's just add strictness annotations
+-- to Header (and probably everywhere else). We can also add strictness
+-- annotations to SetCookie in the cookie package.
 instance NFData Header where
    rnf (AddCookie x) = rnf x
    rnf (DeleteCookie x y) = rnf x `seq` rnf y