Skip to content

Commit cc5348c

Browse files
committed
Fix warnings
1 parent 6afa4c2 commit cc5348c

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

src/Streamly/Coreutils/StringQ.hs

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -22,7 +22,7 @@ import Control.Applicative (Alternative(..))
2222
import Control.Monad.Catch (MonadCatch)
2323
import Control.Monad.IO.Class (liftIO, MonadIO)
2424
import Data.Char (chr)
25-
import Data.Data (Data, Typeable)
25+
import Data.Data (Data)
2626
import Data.Default.Class (Default(..))
2727
import Language.Haskell.TH (Exp, Q, Pat)
2828
import Language.Haskell.TH.Quote (QuasiQuoter(..), dataToExpQ, dataToPatQ)
@@ -61,20 +61,20 @@ data Permissions = Permissions
6161
{ readable :: Bool
6262
, writable :: Bool
6363
, executable :: Bool
64-
} deriving (Eq, Ord, Read, Show, Typeable, Data)
64+
} deriving (Eq, Ord, Read, Show, Data)
6565

6666
data UserType =
6767
Owner
6868
| Group
6969
| Others
7070
| All
71-
deriving (Eq, Ord, Read, Show, Typeable, Data)
71+
deriving (Eq, Ord, Read, Show, Data)
7272

7373
data UserTypePerm =
7474
UserTypePerm
7575
{ utype :: UserType
7676
, permssions :: Permissions
77-
} deriving (Eq, Ord, Read, Show, Typeable, Data)
77+
} deriving (Eq, Ord, Read, Show, Data)
7878

7979
instance Default Permissions where
8080
def = Permissions

0 commit comments

Comments
 (0)