Remove unnecessary template haskell usage

This commit is contained in:
Correl Roush 2022-03-23 19:38:48 -04:00
parent b460218251
commit 89e3322670

View file

@ -2,7 +2,6 @@
{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE TypeOperators #-}
module Lib
@ -44,7 +43,9 @@ data Prices = Prices
}
deriving (Eq, Show, Generic, Typeable)
$(deriveJSON defaultOptions ''Prices)
instance FromJSON Prices
instance ToJSON Prices
instance ToSchema Prices
@ -60,7 +61,9 @@ data Card = Card
}
deriving (Eq, Show, Generic, Typeable)
$(deriveJSON defaultOptions ''Card)
instance FromJSON Card
instance ToJSON Card
instance ToSchema Card