diff --git a/compiler/codeGen/StgCmmMonad.hs b/compiler/codeGen/StgCmmMonad.hs
index c0cd88277d17..3f361e3f518e 100644
--- a/compiler/codeGen/StgCmmMonad.hs
+++ b/compiler/codeGen/StgCmmMonad.hs
@@ -76,7 +76,6 @@ import Outputable
 import Control.Monad
 import Data.List
 import Prelude hiding( sequence, succ )
-import qualified Prelude( sequence )
 
 infixr 9 `thenC`        -- Right-associative!
 infixr 9 `thenFC`