From: sof <unknown>
Date: Sun, 22 Feb 1998 17:42:13 +0000 (+0000)
Subject: [project @ 1998-02-22 17:42:13 by sof]
X-Git-Tag: Approx_2487_patches~932
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=eb01806f503b310e69689e29ac8c390387aa2dc0;p=ghc-hetmet.git

[project @ 1998-02-22 17:42:13 by sof]
Added missing close parens
---

diff --git a/ghc/compiler/specialise/Specialise.lhs b/ghc/compiler/specialise/Specialise.lhs
index 19f3cf9..4768164 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