生成 Data.Aeson.Value 的快速方法

{-# LANGUAGE OverloadedStrings #-}
module Main where

import Data.Aeson

main::IO ()
main = do
  let example = Data.Aeson.object [ "key" .= (5 :: Integer), "somethingElse" .= (2 :: Integer) ] :: Value
  print . encode $ example