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