Remove Data.Argonaut.Encode.Generic.Rep.EncodeRepFields (#29)

* Remove Data.Argonaut.Encode.Generic.Rep.EncodeRepFields

* Update changelog

Author: kl0tl

CHANGELOG.md

@@ -6,6 +6,8 @@ Notable changes to this project are documented in this file. The format is based
 
 Breaking changes (😱!!!):
 
+- Removed vestigial `EncodeRepFields` class and its remaining instance for  `Data.Generic.Rep.Product`.
+
 New features:
 
 Bugfixes:

src/Data/Argonaut/Encode/Generic/Rep.purs

@@ -1,12 +1,10 @@
 module Data.Argonaut.Encode.Generic.Rep (
   class EncodeRep,
   class EncodeRepArgs,
-  class EncodeRepFields,
   class EncodeLiteral,
   encodeRep,
   encodeRepWith,
   encodeRepArgs,
-  encodeRepFields,
   genericEncodeJson,
   genericEncodeJsonWith,
   encodeLiteralSum,
@@ -65,14 +63,6 @@ instance encodeRepArgsProduct :: (EncodeRepArgs a, EncodeRepArgs b) => EncodeRep
 instance encodeRepArgsArgument :: (EncodeJson a) => EncodeRepArgs (Rep.Argument a) where
   encodeRepArgs (Rep.Argument a) = [encodeJson a]
 
-class EncodeRepFields r where
-  encodeRepFields :: r -> FO.Object Json
-
-instance encodeRepFieldsProduct :: (EncodeRepFields a, EncodeRepFields b) => EncodeRepFields (Rep.Product a b) where
-  encodeRepFields (Rep.Product a b) =
-    FO.union (encodeRepFields a) (encodeRepFields b)
-
-
 -- | Encode any `Generic` data structure into `Json`.
 genericEncodeJson :: forall a r. Rep.Generic a r => EncodeRep r => a -> Json
 genericEncodeJson = genericEncodeJsonWith defaultEncoding