From: igloo <unknown>
Date: Wed, 28 Jan 2004 17:26:48 +0000 (+0000)
Subject: [project @ 2004-01-28 17:26:48 by igloo]
X-Git-Tag: Approx_11550_changesets_converted~112
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=b0d844cf3400e9487d6c8327446e86fbaa10cd6f

[project @ 2004-01-28 17:26:48 by igloo]
Import getPrimRepSize, isFloatingRep, typePrimRep for alpha.
---

diff --git a/ghc/compiler/typecheck/TcForeign.lhs b/ghc/compiler/typecheck/TcForeign.lhs
index e18a485..d13b4bb 100644
--- a/ghc/compiler/typecheck/TcForeign.lhs
+++ b/ghc/compiler/typecheck/TcForeign.lhs
@@ -28,6 +28,10 @@ import TcExpr		( tcCheckSigma )
 
 import ErrUtils		( Message )
 import Id		( Id, mkLocalId, mkExportedLocalId )
+#if alpha_TARGET_ARCH
+import PrimRep		( getPrimRepSize, isFloatingRep )
+import Type		( typePrimRep )
+#endif
 import OccName		( mkForeignExportOcc )
 import Name		( Name, NamedThing(..), mkExternalName )
 import TcType		( Type, tcSplitFunTys, tcSplitTyConApp_maybe,