我想作以下测试通过: 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