X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FMachRegs.h;h=c54de67e98b33540432db2dc8fb27dcf1c0c505a;hb=182b16bccea2eab1a8af93a6246db3d391e436c7;hp=0c25a61e14b748967feb013e0306069c3168e3b5;hpb=7dc97354e24071c4ece647b918cd5eb1d0cd85ed;p=ghc-hetmet.git

diff --git a/ghc/includes/MachRegs.h b/ghc/includes/MachRegs.h
index 0c25a61..c54de67 100644
--- a/ghc/includes/MachRegs.h
+++ b/ghc/includes/MachRegs.h
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: MachRegs.h,v 1.14 2003/08/29 16:00:26 simonmar Exp $
+ * $Id: MachRegs.h,v 1.15 2003/12/10 11:35:25 wolfgang Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -409,6 +409,8 @@
 #define REG_R7    	r20
 #define REG_R8    	r21
 
+#ifdef darwin_TARGET_OS
+
 #define REG_F1		f14
 #define REG_F2		f15
 #define REG_F3		f16
@@ -417,6 +419,18 @@
 #define REG_D1		f18
 #define REG_D2		f19
 
+#else
+
+#define REG_F1		fr14
+#define REG_F2		fr15
+#define REG_F3		fr16
+#define REG_F4		fr17
+
+#define REG_D1		fr18
+#define REG_D2		fr19
+
+#endif
+
 #define REG_Sp    	r22
 #define REG_SpLim    	r24