gistfile1.hs

objToArray :: Value -> Array
objToArray obj@(Object v) = V.singleton obj

--I need a value of type Value for further processing. How can I make the result Array into a Value type?


-- Definitions of types from source of Data.Aeson.Types

-- | A JSON \"object\" (key\/value map).
type Object = HashMap Text Value

-- | A JSON \"array\" (sequence).
type Array = Vector Value

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