From 17fc62713c508c5c3242f9a51477d98592e65719 Mon Sep 17 00:00:00 2001
From: "wolfgang.thaller@gmx.net" <unknown>
Date: Sat, 25 Feb 2006 03:39:54 +0000
Subject: [PATCH] NCG: Fix Typo in Register Allocator Loop Patch

Fix previous patch "NCG: Handle loops in register allocator"
Of course, I broke it when correcting a style problem just before committing.
---
 ghc/compiler/nativeGen/RegisterAlloc.hs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/compiler/nativeGen/RegisterAlloc.hs b/ghc/compiler/nativeGen/RegisterAlloc.hs
index 669000d..7d2ab1b 100644
--- a/ghc/compiler/nativeGen/RegisterAlloc.hs
+++ b/ghc/compiler/nativeGen/RegisterAlloc.hs
@@ -341,7 +341,7 @@ computeLiveness sccs
 
 
               linearLiveness :: BlockMap RegSet -> [NatBasicBlock]
-                             -> (BlockMap RegSet, AnnBasicBlock])
+                             -> (BlockMap RegSet, [AnnBasicBlock])
               linearLiveness = mapAccumL processBlock
 
 	      processBlock blockmap input@(BasicBlock block_id instrs)
-- 
1.7.10.4