χλ
Size: a a a
χλ
χλ
JS
.:
MK
λ> decode @Foo "{\"foo\": \"hello\", \"bar\": \"lol\"}"
Just (Foo {foo = "hello", bar = Just "lol"})
λ> decode @Foo "{\"foo\": \"hello\"}"
Just (Foo {foo = "hello", bar = Nothing})
MK
MK
data Foo = Foo { foo :: String, bar :: Maybe String } deriving (Eq, Show)
deriveJSON defaultOptions { omitNothingFields = True } ''Foo
YP
JS
data Test = Test {mint :: Maybe Integer, mstr :: Maybe String}
deriving (Show)
deriveFromJSON defaultOptions ''Test
>>> eitherDecode @Test "{}"
<<< Right (Test {mint = Nothing, mstr = Nothing})
NI
JS
MK
MK
YP
data Test = Test {mint :: Maybe Integer, mstr :: Maybe String}
deriving (Show)
deriveFromJSON defaultOptions ''Test
>>> eitherDecode @Test "{}"
<<< Right (Test {mint = Nothing, mstr = Nothing})
JS
.:
DI
АГ
JS
EP