From 4684f7171ca9c84d96dce484c8c37c85c77942c0 Mon Sep 17 00:00:00 2001
From: simonpj <unknown>
Date: Wed, 21 Dec 2005 11:43:29 +0000
Subject: [PATCH] [project @ 2005-12-21 11:43:29 by simonpj] Missing Show
 instance for FreeRegs on PowerPC

---
 ghc/compiler/nativeGen/RegisterAlloc.hs |    1 +
 1 file changed, 1 insertion(+)

diff --git a/ghc/compiler/nativeGen/RegisterAlloc.hs b/ghc/compiler/nativeGen/RegisterAlloc.hs
index a82c9fb..8040602 100644
--- a/ghc/compiler/nativeGen/RegisterAlloc.hs
+++ b/ghc/compiler/nativeGen/RegisterAlloc.hs
@@ -156,6 +156,7 @@ allocateReg f r = filter (/= r) f
 -- 32-bit words).
 
 data FreeRegs = FreeRegs !Word32 !Word32
+	      deriving( Show )	-- The Show is used in an ASSERT
 
 noFreeRegs :: FreeRegs
 noFreeRegs = FreeRegs 0 0
-- 
1.7.10.4