Use GHC.TypeLits rather than TypeNats

This commit is contained in:
Nathan van Doorn 2020-06-13 15:50:12 +01:00
parent 6889d053c7
commit ff9da1cde4

View file

@ -4,7 +4,7 @@
module Servant.API.Status where
import Network.HTTP.Types.Status
import GHC.TypeNats
import GHC.TypeLits
-- | Witness that a type-level natural number corresponds to a HTTP status code
class KnownNat n => KnownStatus n where