@@ -439,7 +439,7 @@ data CollectionFormat t where
439 -- Corresponds to multiple parameter instances
439 -- Corresponds to multiple parameter instances
440 -- instead of multiple values for a single instance @foo=bar&foo=baz@.
440 -- instead of multiple values for a single instance @foo=bar&foo=baz@.
441 -- This is valid only for parameters in @'ParamQuery'@ or @'ParamFormData'@.
441 -- This is valid only for parameters in @'ParamQuery'@ or @'ParamFormData'@.
442− CollectionMulti :: CollectionFormat Param
442+ CollectionMulti :: CollectionFormat ParamOtherSchema
444deriving instance Eq (CollectionFormat t)
444deriving instance Eq (CollectionFormat t)
445deriving instance Show (CollectionFormat t)
445deriving instance Show (CollectionFormat t)
@@ -460,7 +460,7 @@ instance {-# OVERLAPPABLE #-} Data t => Data (CollectionFormat t) where
460 toConstr = collectionFormatConstr
460 toConstr = collectionFormatConstr
461 dataTypeOf _ = collectionFormatDataType
461 dataTypeOf _ = collectionFormatDataType
463−deriving instance {-# OVERLAPPING #-} Data (CollectionFormat Param)
463+deriving instance {-# OVERLAPPING #-} Data (CollectionFormat ParamOtherSchema)
465type ParamName = Text
465type ParamName = Text
@@ -1144,7 +1144,7 @@ instance {-# OVERLAPPABLE #-} FromJSON (SwaggerType t) where
1144instance {-# OVERLAPPABLE #-} FromJSON (CollectionFormat t) where
1144instance {-# OVERLAPPABLE #-} FromJSON (CollectionFormat t) where
1145 parseJSON = parseOneOf [CollectionCSV, CollectionSSV, CollectionTSV, CollectionPipes]
1145 parseJSON = parseOneOf [CollectionCSV, CollectionSSV, CollectionTSV, CollectionPipes]
1147−instance FromJSON (CollectionFormat Param) where
1147+instance FromJSON (CollectionFormat ParamOtherSchema) where
1148 parseJSON = parseOneOf [CollectionCSV, CollectionSSV, CollectionTSV, CollectionPipes, CollectionMulti]
1148 parseJSON = parseOneOf [CollectionCSV, CollectionSSV, CollectionTSV, CollectionPipes, CollectionMulti]
1150-- NOTE: The constraints @FromJSON (SwaggerType t)@ and
1150-- NOTE: The constraints @FromJSON (SwaggerType t)@ and