diff --git a/ghc/compiler/specialise/Specialise.lhs b/ghc/compiler/specialise/Specialise.lhs
index 19f3cf998dfc814cbe633c9033bc13b18af6b14b..476816471dafbc3b6a78ce82bc6da2d24059c191 100644
--- a/ghc/compiler/specialise/Specialise.lhs
+++ b/ghc/compiler/specialise/Specialise.lhs
@@ -977,7 +977,7 @@ dumpUDs :: [CoreBinder]
 	-> (UsageDetails, CoreExpr)
 
 dumpUDs bndrs uds@(MkUDs {fvs = orig_fvs, dictBinds = orig_dbs, calls = orig_calls}) body
-  = ASSERT( isEmptyTyVarSet (tyvar_set `intersectTyVarSets` ftvs)
+  = ASSERT( isEmptyTyVarSet (tyvar_set `intersectTyVarSets` ftvs))
 	-- The tyvars shouldn't be free in any of the usage details
 	-- If it was, then we should have found a dictionary lambda first