The strict-base-types package

[Tags: bsd3, library]

It is common knowledge that lazy datastructures can lead to space-leaks. This problem is particularly prominent, when using lazy datastructures to store the state of a long-running application in memory. The easiest solution to this problem is to use fully strict types to store such state values. By "fully strict types" we mean types for whose values it holds that, if they are in weak-head normal form, then they are also in normal form. Intuitively, this means that values of fully strict types cannot contain unevaluated thunks.

To define a fully strict datatype, one typically uses the following recipe.

1. Make all fields of every constructor strict; i.e., add a bang to all fields.

2. Use only strict types for the fields of the constructors.

The second requirement is problematic as it rules out the use of the standard Haskell Maybe, Either, and pair types. This library solves this problem by providing strict variants of these types and their corresponding standard support functions and type-class instances.

Note that this library does currently not provide fully strict lists. They can be added if they are really required. However, in many cases one probably wants to use unboxed or strict boxed vectors from the vector library ( instead of strict lists. Moreover, instead of Strings one probably wants to use strict Text values from the text library (

This library comes with batteries included; i.e., missing instances for type-classes from the deepseq, binary, aeson, QuickCheck, and lens packages are included. Of particluar interest is the Strict type-class provided by the lens library ( It is used in the following example to simplify the modification of strict fields.

 (-# LANGUAGE TemplateHaskell #-)   -- replace with curly braces,
 (-# LANGUAGE OverloadedStrings #-) -- the Haddock prologues are a P.I.T.A!

 import           Control.Lens ( (.=), Strict(strict), from, Iso', makeLenses)
 import           Control.Monad.State.Strict (State)
 import qualified Data.Map                   as M
 import qualified Data.Maybe.Strict          as S
 import qualified Data.Text                  as T

 -- | An example of a state record as it could be used in a (very minimal)
 -- role-playing game.
 data GameState = GameState
     ( _gsCooldown :: !(S.Maybe Int)
     , _gsHealth   :: !Int
     )  -- replace with curly braces, *grmbl*

 makeLenses ''GameState

 -- The isomorphism, which converts a strict field to its lazy variant
 lazy :: Strict lazy strict => Iso' strict lazy
 lazy = from strict

 type Game = State GameState

 cast :: T.Text -> Game ()
 cast spell =
     gsCooldown.lazy .= M.lookup spell spellDuration
     -- ... implement remainder of spell-casting ...
     spellDuration = M.fromList [("fireball", 5)]

See for a gentle introduction to lenses and state manipulation.

Note that this package uses the types provided by the strict package (, but organizes them a bit differently. More precisely, the strict-base-types package


Versions0.1, 0.2, 0.2.1, 0.2.2, 0.2.3, 0.3.0, 0.4.0
Change logNone available
Dependenciesaeson (>=0.6), base (>=4.5 && <5), bifunctors (<5.1), binary (>=0.5), deepseq (>=1.3), ghc-prim, lens (>=3.9 && <4.0), QuickCheck (>=2), strict (==0.3.*) [details]
Copyright(c) 2006-2008 by Roman Leshchinskiy (c) 2013 by Simon Meier
AuthorRoman Leshchinskiy <>, Simon Meier <>
MaintainerSimon Meier <>
Home page
Source repositoryhead: git clone
UploadedSat May 11 14:08:38 UTC 2013 by SimonMeier
UpdatedTue Nov 24 22:39:40 UTC 2015 by phadej to revision 2
DistributionsNixOS:0.3.0, Stackage:0.4.0
Downloads1204 total (48 in last 30 days)
0 []
StatusDocs uploaded by user
Build status unknown [no reports yet]




Maintainers' corner

For package maintainers and hackage trustees