Commit 6a9485d7 authored by igloo's avatar igloo
Browse files

[project @ 2003-09-21 13:22:01 by igloo]

Alpha fixes.
parent 963cece5
/* -----------------------------------------------------------------------------
* $Id: Stg.h,v 1.55 2003/08/22 22:24:16 sof Exp $
* $Id: Stg.h,v 1.56 2003/09/21 13:22:01 igloo Exp $
*
* (c) The GHC Team, 1998-1999
*
......@@ -36,6 +36,10 @@
/* Configuration */
#include "config.h"
/* This needs to be up near the top as the register line on alpha needs
* to be before all procedures */
#include "TailCalls.h"
#if __GNUC__ >= 3
/* Assume that a flexible array member at the end of a struct
* can be defined thus: T arr[]; */
......@@ -183,7 +187,6 @@ typedef StgWord64 LW_;
#include "SMP.h"
#include "MachRegs.h"
#include "Regs.h"
#include "TailCalls.h"
#include "Block.h"
/* RTS public interface */
......
/* -----------------------------------------------------------------------------
* $Id: TailCalls.h,v 1.13 2003/08/29 16:00:26 simonmar Exp $
* $Id: TailCalls.h,v 1.14 2003/09/21 13:22:02 igloo Exp $
*
* (c) The GHC Team, 1998-1999
*
......@@ -98,7 +98,9 @@ extern void __DISCARD__(void);
#ifdef alpha_TARGET_ARCH
#ifdef IN_STG_CODE
register void *_procedure __asm__("$27");
#endif
#define JMP_(cont) \
do { _procedure = (void *)(cont); \
......
......@@ -73,7 +73,11 @@ static unsigned char __obscure_ccall_ret_code [] =
#if defined(alpha_TARGET_ARCH)
/* To get the definition of PAL_imb: */
#include <machine/pal.h>
# if defined(linux_TARGET_OS)
# include <asm/pal.h>
# else
# include <machine/pal.h>
# endif
#endif
#if defined(ia64_TARGET_ARCH)
......
/* -----------------------------------------------------------------------------
* $Id: Signals.c,v 1.37 2003/04/01 15:05:22 sof Exp $
* $Id: Signals.c,v 1.38 2003/09/21 13:22:03 igloo Exp $
*
* (c) The GHC Team, 1998-1999
*
......@@ -19,7 +19,11 @@
#include "StablePriv.h"
#ifdef alpha_TARGET_ARCH
# include <machine/fpu.h>
# if defined(linux_TARGET_OS)
# include <asm/fpu.h>
# else
# include <machine/fpu.h>
# endif
#endif
#ifdef HAVE_UNISTD_H
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment