Commits

Bryan O'Sullivan committed 3f10409 Merge

Merge

  • Participants
  • Parent commits 9491919, c44f7be

Comments (0)

Files changed (1)

Data/Aeson/Types/Internal.hs

 type Array = Vector Value
 
 -- | A JSON value represented as a Haskell value.
-data Value = Object Object
-           | Array Array
-           | String Text
-           | Number Number
+data Value = Object !Object
+           | Array !Array
+           | String !Text
+           | Number !Number
            | Bool !Bool
            | Null
              deriving (Eq, Show, Typeable, Data)