encode all nullary constructors as objects for sumTypeJSON options

This commit is contained in:
Evgeny Poberezkin
2022-02-25 18:50:04 +00:00
parent 7d1fdadef0
commit d1e6147adf
+2
View File
@@ -109,6 +109,7 @@ taggedObjectJSON tagModifier =
J.defaultOptions
{ J.sumEncoding = J.TaggedObject "type" "data",
J.constructorTagModifier = tagModifier,
J.allNullaryToStringTag = False,
J.nullaryToObject = True,
J.omitNothingFields = True
}
@@ -118,6 +119,7 @@ singleFieldJSON tagModifier =
J.defaultOptions
{ J.sumEncoding = J.ObjectWithSingleField,
J.constructorTagModifier = tagModifier,
J.allNullaryToStringTag = False,
J.nullaryToObject = True,
J.omitNothingFields = True
}