From 445839c5e7ce7f2d1c02ccf192018fda07933176 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Thu, 23 Oct 1997 18:26:26 +0000
Subject: [PATCH] [project @ 1997-10-23 18:26:26 by sof] One square bracket too
 many

---
 ghc/compiler/codeGen/CodeGen.lhs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/compiler/codeGen/CodeGen.lhs b/ghc/compiler/codeGen/CodeGen.lhs
index bd164e74951a..7f151456ef89 100644
--- a/ghc/compiler/codeGen/CodeGen.lhs
+++ b/ghc/compiler/codeGen/CodeGen.lhs
@@ -83,7 +83,7 @@ codeGen mod_name (local_CCs, extern_CCs) import_names gen_tycons tycon_specs stg
 	mkAbstractCs [
 		mkAbstractCs [mkAbstractCs (map (CCostCentreDecl True)  local_CCs),
 				   mkAbstractCs (map (CCostCentreDecl False) extern_CCs),
-				   mkCcRegister local_CCs import_names]],
+				   mkCcRegister local_CCs import_names],
 		genStaticConBits cinfo gen_tycons tycon_specs,
 		initC cinfo (cgTopBindings maybe_split stg_pgm) ]
   where
-- 
GitLab