projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
[project @ 2005-01-28 12:55:17 by simonmar]
[ghc-hetmet.git]
/
ghc
/
includes
/
Stg.h
diff --git
a/ghc/includes/Stg.h
b/ghc/includes/Stg.h
index
924610c
..
1189b0e
100644
(file)
--- a/
ghc/includes/Stg.h
+++ b/
ghc/includes/Stg.h
@@
-1,5
+1,5
@@
/* -----------------------------------------------------------------------------
/* -----------------------------------------------------------------------------
- * $Id: Stg.h,v 1.64 2004/09/02 12:45:25 simonmar Exp $
+ * $Id: Stg.h,v 1.66 2005/01/28 12:55:52 simonmar Exp $
*
* (c) The GHC Team, 1998-2004
*
*
* (c) The GHC Team, 1998-2004
*
@@
-35,9
+35,7
@@
#endif
#if IN_STG_CODE == 0
#endif
#if IN_STG_CODE == 0
-# ifndef NO_REGS
-# define NO_REGS /* don't define fixed registers */
-# endif
+# define NO_GLOBAL_REG_DECLS /* don't define fixed registers */
#endif
/* Configuration */
#endif
/* Configuration */
@@
-197,7
+195,7
@@
INLINE_HEADER StgDouble PK_DBL (W_ p_src[]) { return *(StgDou
* independently - unfortunately this code isn't writable in C, we
* have to use inline assembler.
*/
* independently - unfortunately this code isn't writable in C, we
* have to use inline assembler.
*/
-#if sparc_TARGET_ARCH
+#if sparc_HOST_ARCH
#define ASSIGN_DBL(dst0,src) \
{ StgPtr dst = (StgPtr)(dst0); \
#define ASSIGN_DBL(dst0,src) \
{ StgPtr dst = (StgPtr)(dst0); \
@@
-212,7
+210,7
@@
INLINE_HEADER StgDouble PK_DBL (W_ p_src[]) { return *(StgDou
"m" (((P_)(src))[0]), "m" (((P_)(src))[1])); d; \
} )
"m" (((P_)(src))[0]), "m" (((P_)(src))[1])); d; \
} )
-#else /* ! sparc_TARGET_ARCH */
+#else /* ! sparc_HOST_ARCH */
INLINE_HEADER void ASSIGN_DBL (W_ [], StgDouble);
INLINE_HEADER StgDouble PK_DBL (W_ []);
INLINE_HEADER void ASSIGN_DBL (W_ [], StgDouble);
INLINE_HEADER StgDouble PK_DBL (W_ []);
@@
-251,7
+249,7
@@
INLINE_HEADER StgDouble PK_DBL(W_ p_src[])
return(y.d);
}
return(y.d);
}
-#endif /* ! sparc_TARGET_ARCH */
+#endif /* ! sparc_HOST_ARCH */
#endif /* ALIGNMENT_DOUBLE > ALIGNMENT_UNSIGNED_INT */
#endif /* ALIGNMENT_DOUBLE > ALIGNMENT_UNSIGNED_INT */