diff --git a/ghc/compiler/codeGen/CgBindery.lhs b/ghc/compiler/codeGen/CgBindery.lhs
index f21d393b8326e4ad134ccba807c637074bb8f7b3..9e3040b0b17a8e8ef53a04bbafe73e64a04e1b33 100644
--- a/ghc/compiler/codeGen/CgBindery.lhs
+++ b/ghc/compiler/codeGen/CgBindery.lhs
@@ -44,7 +44,9 @@ import Literal		( Literal )
 import Maybes		( catMaybes )
 import Name		( isLocallyDefined, isWiredInName,
 			  Name{-instance NamedThing-}, NamedThing(..) )
+#ifdef DEBUG
 import PprAbsC		( pprAmode )
+#endif
 import PrimRep          ( PrimRep )
 import StgSyn		( StgArg, StgLiveVars, GenStgArg(..) )
 import Unique           ( Unique, Uniquable(..) )