Skip to content

Commit

Permalink
Merge pull request #233 from ysangkok/janus/fix-ghc92
Browse files Browse the repository at this point in the history
Remove auto-derivable Typeable instances
  • Loading branch information
swamp-agr committed Feb 3, 2022
2 parents 4d04a83 + 4555032 commit 965fa21
Showing 1 changed file with 0 additions and 6 deletions.
6 changes: 0 additions & 6 deletions src/Data/Swagger/Internal.hs
Original file line number Diff line number Diff line change
Expand Up @@ -372,7 +372,6 @@ data SwaggerItems (t :: SwaggerKind *) where

deriving instance Eq (SwaggerItems t)
deriving instance Show (SwaggerItems t)
--deriving instance Typeable (SwaggerItems t)

swaggerItemsPrimitiveConstr :: Constr
swaggerItemsPrimitiveConstr = mkConstr swaggerItemsDataType "SwaggerItemsPrimitive" [] Prefix
Expand Down Expand Up @@ -427,11 +426,6 @@ data SwaggerKind (t :: *)
= SwaggerKindNormal t
| SwaggerKindParamOtherSchema
| SwaggerKindSchema
deriving (Typeable)

deriving instance Typeable 'SwaggerKindNormal
deriving instance Typeable 'SwaggerKindParamOtherSchema
deriving instance Typeable 'SwaggerKindSchema

type family SwaggerKindType (k :: SwaggerKind *) :: *
type instance SwaggerKindType ('SwaggerKindNormal t) = t
Expand Down

0 comments on commit 965fa21

Please sign in to comment.