version 1.15, 2003/03/09 15:16:58
|
version 1.21, 2007/12/31 18:40:25
|
Line 1
|
Line 1
|
/* DEC Alpha |
/* DEC Alpha |
|
|
Copyright (C) 1995,1996,1997,1998,2000,2003 Free Software Foundation, Inc. |
Copyright (C) 1995,1996,1997,1998,2000,2003,2005,2007 Free Software Foundation, Inc. |
|
|
This file is part of Gforth. |
This file is part of Gforth. |
|
|
Gforth is free software; you can redistribute it and/or |
Gforth is free software; you can redistribute it and/or |
modify it under the terms of the GNU General Public License |
modify it under the terms of the GNU General Public License |
as published by the Free Software Foundation; either version 2 |
as published by the Free Software Foundation, either version 3 |
of the License, or (at your option) any later version. |
of the License, or (at your option) any later version. |
|
|
This program is distributed in the hope that it will be useful, |
This program is distributed in the hope that it will be useful, |
Line 15
|
Line 15
|
GNU General Public License for more details. |
GNU General Public License for more details. |
|
|
You should have received a copy of the GNU General Public License |
You should have received a copy of the GNU General Public License |
along with this program; if not, write to the Free Software |
along with this program; if not, see http://www.gnu.org/licenses/. |
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA. |
|
*/ |
*/ |
|
|
/* Be careful: long long on Alpha are 64 bit :-(( */ |
|
|
|
#ifndef THREADING_SCHEME |
|
#define THREADING_SCHEME 5 |
|
#endif |
|
|
|
#if !defined(USE_TOS) && !defined(USE_NO_TOS) |
#if !defined(USE_TOS) && !defined(USE_NO_TOS) |
#define USE_TOS |
#define USE_TOS |
#endif |
#endif |
Line 33
|
Line 26
|
|
|
#include "../generic/machine.h" |
#include "../generic/machine.h" |
|
|
|
/* code padding */ |
|
#define CODE_ALIGNMENT 16 |
|
#define CODE_PADDING {0x1f, 0x04, 0xff, 0x47, 0x00, 0x00, 0xfe, 0x2f, \ |
|
0x1f, 0x04, 0xff, 0x47, 0x00, 0x00, 0xfe, 0x2f} |
|
#define MAX_PADDING 12 |
|
|
#ifdef FORCE_REG |
#ifdef FORCE_REG |
/* $9-$14 are callee-saved, $1-$8 and $22-$25 are caller-saved */ |
/* $9-$14 are callee-saved, $1-$8 and $22-$25 are caller-saved */ |
#define IPREG asm("$10") |
#define IPREG asm("$10") |