git.iko.soy/typeable/req
on master help sign in
Stop manually deriving `Typeable`
0746e37Mark Karpov
Network/HTTP/Req.hs+3−4
compare with master
unifiedsplit
@@ -716,7 +716,6 @@ data HttpConfig = HttpConfig
716 -- @since 3.6.0
716 -- @since 3.6.0
717 httpConfigBodyPreviewLength :: forall a. (Num a) => a
717 httpConfigBodyPreviewLength :: forall a. (Num a) => a
718 }
718 }
719− deriving (Typeable)
720
719
721-- | The default value of 'HttpConfig'.
720-- | The default value of 'HttpConfig'.
722--
721--
@@ -1025,7 +1024,7 @@ instance (HttpMethod method) => RequestComponent (Tagged "method" method) where
1025-- > -- https://%D1%8E%D0%BD%D0%B8%D0%BA%D0%BE%D0%B4.%D1%80%D1%84
1024-- > -- https://%D1%8E%D0%BD%D0%B8%D0%BA%D0%BE%D0%B4.%D1%80%D1%84
1026data Url (scheme :: Scheme) = Url Scheme (NonEmpty Text)
1025data Url (scheme :: Scheme) = Url Scheme (NonEmpty Text)
1027 -- NOTE The second value is the path segments in reversed order.
1026 -- NOTE The second value is the path segments in reversed order.
1028− deriving (Eq, Ord, Show, Data, Typeable, Generic)
1027+ deriving (Eq, Ord, Show, Data, Generic)
1029
1028
1030type role Url nominal
1029type role Url nominal
1031
1030
@@ -2012,7 +2011,7 @@ data HttpException
2012 | -- | A wrapper with Aeson-produced 'String' describing why decoding
2011 | -- | A wrapper with Aeson-produced 'String' describing why decoding
2013 -- failed
2012 -- failed
2014 JsonHttpException String
2013 JsonHttpException String
2015− deriving (Show, Typeable, Generic)
2014+ deriving (Show, Generic)
2016
2015
2017instance Exception HttpException
2016instance Exception HttpException
2018
2017
@@ -2049,4 +2048,4 @@ data Scheme
2049 Http
2048 Http
2050 | -- | HTTPS
2049 | -- | HTTPS
2051 Https
2050 Https
2052− deriving (Eq, Ord, Show, Data, Typeable, Generic, TH.Lift)
2051+ deriving (Eq, Ord, Show, Data, Generic, TH.Lift)