From: Ian Lynagh <igloo@earth.li>
Date: Wed, 4 Oct 2006 12:58:57 +0000 (+0000)
Subject: Fix unregisterised alpha builds
X-Git-Tag: 2006-10-22~68
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=87c36991c22f208623c96506c64c6c163361e45b

Fix unregisterised alpha builds
---

diff --git a/rts/StgCRun.c b/rts/StgCRun.c
index 302e910..9d80bdb 100644
--- a/rts/StgCRun.c
+++ b/rts/StgCRun.c
@@ -50,6 +50,7 @@
  * in libc.a clobbers $s6.
  */
 #include "ghcconfig.h"
+#ifndef USE_MINIINTERPRETER
 #ifdef alpha_HOST_ARCH
 #define alpha_EXTRA_CAREFUL
 register long   fake_ra __asm__("$26");
@@ -60,6 +61,7 @@ register double fake_f8 __asm__("$f8");
 register double fake_f9 __asm__("$f9");
 #endif
 #endif
+#endif
 
 /* include Stg.h first because we want real machine regs in here: we
  * have to get the value of R1 back from Stg land to C land intact.