From: sewardj <unknown>
Date: Tue, 1 Feb 2000 16:08:17 +0000 (+0000)
Subject: [project @ 2000-02-01 16:08:17 by sewardj]
X-Git-Tag: Approximately_9120_patches~5163
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=d70de6f98f9d833adf4c8d68afc17bd1e6493545;p=ghc-hetmet.git

[project @ 2000-02-01 16:08:17 by sewardj]
Export findReservedRegs for all architectures.
---

diff --git a/ghc/compiler/nativeGen/RegAllocInfo.lhs b/ghc/compiler/nativeGen/RegAllocInfo.lhs
index 620d503..53d651e 100644
--- a/ghc/compiler/nativeGen/RegAllocInfo.lhs
+++ b/ghc/compiler/nativeGen/RegAllocInfo.lhs
@@ -35,7 +35,7 @@ module RegAllocInfo (
 	patchRegs,
 	regLiveness,
 	spillReg,
-	IF_ARCH_i386(findReservedRegs COMMA,)
+	findReservedRegs,
 
 	RegSet,
 	elementOfRegSet,