Skip to content

Commit

Permalink
Fix warning: deriving-typeable
Browse files Browse the repository at this point in the history
  • Loading branch information
alexfmpe committed Jan 19, 2025
1 parent c6c0e5d commit bf521ee
Showing 1 changed file with 2 additions and 3 deletions.
5 changes: 2 additions & 3 deletions src/Reflex/Dom/GadtApi/WebSocket.hs
Original file line number Diff line number Diff line change
Expand Up @@ -22,7 +22,6 @@ import Data.Constraint.Extras
import Data.Aeson
import Data.Default
import qualified Data.Text as T
import Data.Typeable
import GHC.Generics
import qualified Data.Map as Map
import Data.Some
Expand All @@ -34,14 +33,14 @@ import Reflex.Dom.WebSocket

-- | A request tagged with an identifier
data TaggedRequest = TaggedRequest Int Value
deriving (Typeable, Generic)
deriving Generic

instance FromJSON TaggedRequest
instance ToJSON TaggedRequest

-- | A response tagged with an identifier matching the one in the 'TaggedRequest'. The identifier is the first argument.
data TaggedResponse = TaggedResponse Int Value
deriving (Typeable, Generic)
deriving Generic

instance FromJSON TaggedResponse
instance ToJSON TaggedResponse
Expand Down

0 comments on commit bf521ee

Please sign in to comment.