[commit: ghc] wip/angerman/llvmng: cleanup (8090e90)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/angerman/llvmng
Link       : http://ghc.haskell.org/trac/ghc/changeset/8090e909234353f97fdbf315e2abc95b6cae758e/ghc

>---------------------------------------------------------------

commit 8090e909234353f97fdbf315e2abc95b6cae758e
Author: Moritz Angermann <moritz.angermann at gmail.com>
Date:   Sat Nov 11 14:06:22 2017 +0800

    cleanup


>---------------------------------------------------------------

8090e909234353f97fdbf315e2abc95b6cae758e
 compiler/llvmGen-ng/Data/BitCode/LLVM/Gen.hs       | 2 +-
 compiler/llvmGen-ng/Data/BitCode/LLVM/Gen/Monad.hs | 3 ---
 2 files changed, 1 insertion(+), 4 deletions(-)

diff --git a/compiler/llvmGen-ng/Data/BitCode/LLVM/Gen.hs b/compiler/llvmGen-ng/Data/BitCode/LLVM/Gen.hs
index 2cf5eec..ec5eb3f 100644
--- a/compiler/llvmGen-ng/Data/BitCode/LLVM/Gen.hs
+++ b/compiler/llvmGen-ng/Data/BitCode/LLVM/Gen.hs
@@ -1,4 +1,4 @@
-{-# OPTIONS_GHC -fprof-auto #-}
+{-# OPTIONS_GHC -fprof-auto -Wno-type-defaults -Wno-unused-matches -Wno-unused-local-binds -Wno-overlapping-patterns -Wno-incomplete-patterns -Wno-unused-do-bind -Wno-missing-signatures #-}
 {-# LANGUAGE CPP, GADTs, GeneralizedNewtypeDeriving, RecursiveDo, LambdaCase, FlexibleInstances, FlexibleContexts, StandaloneDeriving, BangPatterns, TupleSections #-}
 module Data.BitCode.LLVM.Gen where
 
diff --git a/compiler/llvmGen-ng/Data/BitCode/LLVM/Gen/Monad.hs b/compiler/llvmGen-ng/Data/BitCode/LLVM/Gen/Monad.hs
index 880eda4..e82b049 100644
--- a/compiler/llvmGen-ng/Data/BitCode/LLVM/Gen/Monad.hs
+++ b/compiler/llvmGen-ng/Data/BitCode/LLVM/Gen/Monad.hs
@@ -5,16 +5,13 @@ import GhcPrelude
 
 import DynFlags
 import qualified Stream
-import Control.Monad (ap)
 
 import Outputable as Outp
 
-import EDSL.Monad
 import ErrUtils
 
 import Control.Monad.IO.Class
 import Control.Monad.Trans.State
-import Data.Functor.Identity
 import Control.Monad.Trans.Class
 import Control.Monad.Fix (MonadFix(..))