From 2111fbcd87caec8e05250df399a6d63420807e71 Mon Sep 17 00:00:00 2001
From: "benl@ouroborus.net" <unknown>
Date: Wed, 23 Jun 2010 09:58:13 +0000
Subject: [PATCH] NCG: Fix off-by-one error in realRegSqueeze

---
 compiler/nativeGen/X86/Regs.hs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/nativeGen/X86/Regs.hs b/compiler/nativeGen/X86/Regs.hs
index b9a23a6..943a7a3 100644
--- a/compiler/nativeGen/X86/Regs.hs
+++ b/compiler/nativeGen/X86/Regs.hs
@@ -111,7 +111,7 @@ realRegSqueeze cls rr
 	RcDouble
 	 -> case rr of
 	 	RealRegSingle regNo
-			| regNo >= firstfake && regNo < lastfake -> _ILIT(1)
+			| regNo >= firstfake && regNo <= lastfake -> _ILIT(1)
 			| otherwise	-> _ILIT(0)
 			
 		RealRegPair{}		-> _ILIT(0)
-- 
1.7.10.4