summaryrefslogtreecommitdiff
path: root/compiler/vectorise
diff options
context:
space:
mode:
authorManuel M T Chakravarty <chak@cse.unsw.edu.au>2013-02-06 14:07:44 +1100
committerManuel M T Chakravarty <chak@cse.unsw.edu.au>2013-02-06 14:07:44 +1100
commit9a9a2a72612cb404eb8396d7eb5ea6a09bd2addb (patch)
treefe94c913ce39398723db7705c470fce8480d6dc2 /compiler/vectorise
parentf933d96e03dfe0473beee1bb538ab741e1ad24cf (diff)
downloadhaskell-9a9a2a72612cb404eb8396d7eb5ea6a09bd2addb.tar.gz
Warning police
Diffstat (limited to 'compiler/vectorise')
-rw-r--r--compiler/vectorise/Vectorise/Exp.hs3
-rw-r--r--compiler/vectorise/Vectorise/Type/Env.hs2
2 files changed, 0 insertions, 5 deletions
diff --git a/compiler/vectorise/Vectorise/Exp.hs b/compiler/vectorise/Vectorise/Exp.hs
index 34e22f502b..706fc85166 100644
--- a/compiler/vectorise/Vectorise/Exp.hs
+++ b/compiler/vectorise/Vectorise/Exp.hs
@@ -49,9 +49,6 @@ import MonadUtils
import Control.Monad
import Data.Maybe
import Data.List
-import TcRnMonad (goptM)
-import DynFlags
-import Util
-- Main entry point to vectorise expressions -----------------------------------
diff --git a/compiler/vectorise/Vectorise/Type/Env.hs b/compiler/vectorise/Vectorise/Type/Env.hs
index ac4c6846d3..0ae0f936b3 100644
--- a/compiler/vectorise/Vectorise/Type/Env.hs
+++ b/compiler/vectorise/Vectorise/Type/Env.hs
@@ -317,8 +317,6 @@ vectTypeEnv tycons vectTypeDecls vectClassDecls
, fam_insts, binds)
}
where
- fst3 (a, _, _) = a
-
addParallelTyConAndCons tycon
= do
{ addGlobalParallelTyCon tycon