diff --git a/lib/Hikaru/Types.hs b/lib/Hikaru/Types.hs index dfa9d36b28783cf7ee2533ceb37128218bbb59a9..7f26f1287b6a954935896f0a63409894a5f8cbb2 100644 --- a/lib/Hikaru/Types.hs +++ b/lib/Hikaru/Types.hs @@ -114,10 +114,6 @@ where _else -> Nothing {-# INLINE fromParam #-} - instance FromParam String where - fromParam = Just . unpack - {-# INLINE fromParam #-} - instance FromParam Text where fromParam = Just . id {-# INLINE fromParam #-} @@ -213,10 +209,6 @@ where toParam char = pack [char] {-# INLINE toParam #-} - instance ToParam String where - toParam = pack - {-# INLINE toParam #-} - instance ToParam Text where toParam = id {-# INLINE toParam #-}