From: simonmar <unknown>
Date: Mon, 22 Oct 2001 09:05:26 +0000 (+0000)
Subject: [project @ 2001-10-22 09:05:26 by simonmar]
X-Git-Tag: Approximately_9120_patches~768
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=b01bb1ca7903c64668c541146a9d85d0b8e2e26f;p=ghc-hetmet.git

[project @ 2001-10-22 09:05:26 by simonmar]
import CLabe (isAsmTemp) for sparc/alpha (I guess someone removed the
import after a warning from -fwarn-unused-imports, so I've put the
import inside the relevant #ifdef this time).
---

diff --git a/ghc/compiler/nativeGen/MachCode.lhs b/ghc/compiler/nativeGen/MachCode.lhs
index 1bed8e0..b96f7e6 100644
--- a/ghc/compiler/nativeGen/MachCode.lhs
+++ b/ghc/compiler/nativeGen/MachCode.lhs
@@ -21,6 +21,9 @@ import OrdList		( OrdList, nilOL, isNilOL, unitOL, appOL, toOL,
 import AbsCUtils	( magicIdPrimRep )
 import ForeignCall	( CCallConv(..) )
 import CLabel		( CLabel, labelDynamic )
+#if sparc_TARGET_ARCH || alpha_TARGET_ARCH
+import CLabel 		( isAsmTemp )
+#endif
 import Maybes		( maybeToBool )
 import PrimRep		( isFloatingRep, PrimRep(..) )
 import PrimOp		( PrimOp(..) )