diff --git a/ghc/compiler/profiling/SCCfinal.lhs b/ghc/compiler/profiling/SCCfinal.lhs
index c848f5f02b6a9f4b05d87bb2b3d401829de8c8d4..52d9f8d7c9a9505cfb3958e58ca9377eaeb09c88 100644
--- a/ghc/compiler/profiling/SCCfinal.lhs
+++ b/ghc/compiler/profiling/SCCfinal.lhs
@@ -37,9 +37,8 @@ import SrcLoc		( noSrcLoc )
 import Type		( splitSigmaTy, splitFunTy_maybe )
 import UniqSupply	( getUnique, splitUniqSupply, UniqSupply )
 import Unique           ( Unique )
-import Util		( removeDups, assertPanic )
+import Util		( removeDups, assertPanic, trace )
 import Outputable	
-import GlaExts		( trace )
 
 infixr 9 `thenMM`, `thenMM_`
 \end{code}