我想作以下測試通過: it "can rewrite a field from an object" $ do
let _42 = 42 :: Int
nested = object [ "foo" .= _42, "baz" .= object [ "bar" .= _42 ] ]
]
rewrite "bar" nested `sh
我正在嘗試爲FromJSON typeclass寫一個不知何故的通用實例。這個想法是在解析JSON時使用數據類型名稱。我認爲這是GHC應該能夠做到的事情,但到目前爲止,我的嘗試失敗了。最簡單的版本,使用Typeable typeclass如下。 data GetResponse a = GetResponse { getCode :: Int, getItem :: a } deriving (S
我有很多字段的數據類型,如果不是由JSON配置文件手動指定,應隨機設置。我正在使用Aeson來解析配置文件。做這個的最好方式是什麼? 目前,我設置的值等於一些不可能的值,然後再檢查所述值進行編輯。 data Example = Example { a :: Int, b :: Int }
default = Example 1 2
instance FromJSON Example where
望着servantexample的一部分,我看到: {-# LANGUAGE DataKinds #-}
{-# LANGUAGE DeriveGeneriC#-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE MultiParamTypeClasses