conversion-case-insensitive-1.0.0.0: library/Conversion/CaseInsensitive.hs

{-# LANGUAGE CPP #-}
module Conversion.CaseInsensitive where

import Conversion
import Data.CaseInsensitive


instance Conversion (CI a) a where
  {-# INLINE convert #-}
  convert = original

instance FoldCase a => Conversion a (CI a) where
  {-# INLINE convert #-}
  convert = mk