我有以下问题,我有一个带有可选键的 JSON 格式,我需要从我的 haskell 代码中生成这些键。
让我们举个例子
{-# LANGUAGE DeriveGeneric #-}
import GHC.Generics
import Data.Aeson
data Person = {
name :: String,
shoeSize :: Maybe Int,
favoriteColor :: Maybe String,
favoriteFood :: Maybe StringC
} deriving (show, eq, generic)
instance ToJSON Person -- Generic instance
现在,如果我尝试对没有鞋码的人进行编码,我仍然会将键“shoeSize”设置为 null,Aeson 使键在编码中可选的方法是什么
编辑,编码示例
encode $ Person "windwarrior" Nothing "green" Nothing
应该导致
{"name":"windwarrior", "favoriteColor":"green"}