git.iko.soy/typeable/aeson
on master help sign in
Merge pull request #40 from basvandijk/strict

Strict Value fields

commitdc9bcb7262c1ae438b9f0bbd78437208ffda5051 authorBryan O'Sullivan <bos@serpentine.com> dateThu 17 Nov 2011, 11:01 (15 years ago) parent78ad6e623163a1
1 file changed+4−4
compare with master
unifiedsplit
Data/Aeson/Types/Internal.hs+4−4
Data/Aeson/Types/Internal.hs+4−4
@@ -157,10 +157,10 @@ type Object = Map Text Value
157157type Array = Vector Value
158158
159159-- | A JSON value represented as a Haskell value.
160−data Value = Object Object
161− | Array Array
162− | String Text
163− | Number Number
160+data Value = Object !Object
161+ | Array !Array
162+ | String !Text
163+ | Number !Number
164164 | Bool !Bool
165165 | Null
166166 deriving (Eq, Show, Typeable, Data)