[bpt/emacs.git] / src / m / ia64.h

/* machine description file for the IA-64 architecture.
   Copyright (C) 2000, 2002, 2003  Free Software Foundation, Inc.
     Contributed by David Mosberger <davidm@hpl.hp.com>

This file is part of GNU Emacs.

GNU Emacs is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2, or (at your option)
any later version.

GNU Emacs is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with GNU Emacs; see the file COPYING.  If not, write to
the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
Boston, MA 02111-1307, USA.  */

#define BITS_PER_LONG		64
#define BITS_PER_EMACS_INT	64

/* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word
   is the most significant byte.  */

#undef WORDS_BIG_ENDIAN

/* Define NO_ARG_ARRAY if you cannot take the address of the first of a
   group of arguments and treat it as an array of the arguments.  */

#define NO_ARG_ARRAY

/* Define WORD_MACHINE if addresses and such have
   to be corrected before they can be used as byte counts.  */

/* #define WORD_MACHINE */

/* Now define a symbol for the cpu type, if your compiler
   does not define it automatically:
   Ones defined so far include vax, m68000, ns16000, pyramid,
   orion, tahoe, APOLLO and many others */

/* __ia64__ defined automatically */


/* Use type EMACS_INT rather than a union, to represent Lisp_Object */
/* This is desirable for most machines.  */

#define NO_UNION_TYPE

/* Define the type to use.  */
#define EMACS_INT		long
#define EMACS_UINT		unsigned long
#define SPECIAL_EMACS_INT

/* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend
   the 24-bit bit field into an int.  In other words, if bit fields
   are always unsigned.

   If you use NO_UNION_TYPE, this flag does not matter.  */

#define EXPLICIT_SIGN_EXTEND

/* Data type of load average, as read out of kmem.  */

#define LOAD_AVE_TYPE		long

/* Convert that into an integer that is 100 for a load average of 1.0  */

#define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE)

/* Define CANNOT_DUMP on machines where unexec does not work.
   Then the function dump-emacs will not be defined
   and temacs will do (load "loadup") automatically unless told otherwise.  */
#if 0
#define CANNOT_DUMP
#endif

/* Define VIRT_ADDR_VARIES if the virtual addresses of
   pure and impure space as loaded can vary, and even their
   relative order cannot be relied on.

   Otherwise Emacs assumes that text space precedes data space,
   numerically.  */

/* #define VIRT_ADDR_VARIES */

/* Define the following if GNU malloc and the relocating allocator do
   not work together with X.  */

/* #define SYSTEM_MALLOC */

/* Define NO_REMAP if memory segmentation makes it not work well
   to change the boundary between the text section and data section
   when Emacs is dumped.  If you define this, the preloaded Lisp
   code will not be sharable; but that's better than failing completely.  */

/* #define NO_REMAP */

/* Some really obscure 4.2-based systems (like Sequent DYNIX) do not
   support asynchronous I/O (using SIGIO) on sockets, even though it
   works fine on tty's.  If you have one of these systems, define the
   following, and then use it in config.h (or elsewhere) to decide
   when (not) to use SIGIO.

   You'd think this would go in an operating-system description file,
   but since it only occurs on some, but not all, BSD systems, the
   reasonable place to select for it is in the machine description
   file.  */

/* #define NO_SOCK_SIGIO */

#ifdef __ELF__
#undef UNEXEC
#define UNEXEC unexelf.o
#endif

#define PNTR_COMPARISON_TYPE unsigned long

/* On the 64 bit architecture, we can use 60 bits for addresses */

#define VALBITS         60

/* Define XINT and XUINT so that they can take arguments of type int */

#define XINT(a)  (((long) (a) << (BITS_PER_LONG - VALBITS)) >> (BITS_PER_LONG - VALBITS))
#define XUINT(a) ((long) (a) & VALMASK)

#ifndef NOT_C_CODE

#ifdef REL_ALLOC
#ifndef _MALLOC_INTERNAL
/* "char *" because ralloc.c defines it that way.  gmalloc.c thinks it
   is allowed to prototype these as "void *" so we don't prototype in
   that case.  You're right: it stinks!  */
extern char *r_alloc (), *r_re_alloc ();
extern void r_alloc_free ();
#endif /* not _MALLOC_INTERNAL */
#endif /* REL_ALLOC */

#endif /* not NOT_C_CODE */

#define DATA_SEG_BITS	0x6000000000000000

#define HAVE_TEXT_START

/* arch-tag: 9b8e9fb2-2e49-4c22-b68f-11a488e77c66
   (do not change this comment) */
Commit	Line	Data
f4988be7	1	/* machine description file for the IA-64 architecture.
4698665f	2	Copyright (C) 2000, 2002, 2003 Free Software Foundation, Inc.
f4988be7 GM	3	Contributed by David Mosberger <davidm@hpl.hp.com>
	4
	5	This file is part of GNU Emacs.
	6
	7	GNU Emacs is free software; you can redistribute it and/or modify
	8	it under the terms of the GNU General Public License as published by
4698665f	9	the Free Software Foundation; either version 2, or (at your option)
f4988be7 GM	10	any later version.
	11
	12	GNU Emacs is distributed in the hope that it will be useful,
	13	but WITHOUT ANY WARRANTY; without even the implied warranty of
	14	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	15	GNU General Public License for more details.
	16
	17	You should have received a copy of the GNU General Public License
	18	along with GNU Emacs; see the file COPYING. If not, write to
	19	the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
	20	Boston, MA 02111-1307, USA. */
	21
	22	#define BITS_PER_LONG 64
	23	#define BITS_PER_EMACS_INT 64
	24
	25	/* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word
	26	is the most significant byte. */
	27
	28	#undef WORDS_BIG_ENDIAN
	29
	30	/* Define NO_ARG_ARRAY if you cannot take the address of the first of a
	31	group of arguments and treat it as an array of the arguments. */
	32
	33	#define NO_ARG_ARRAY
	34
	35	/* Define WORD_MACHINE if addresses and such have
	36	to be corrected before they can be used as byte counts. */
	37
	38	/* #define WORD_MACHINE */
	39
	40	/* Now define a symbol for the cpu type, if your compiler
	41	does not define it automatically:
	42	Ones defined so far include vax, m68000, ns16000, pyramid,
	43	orion, tahoe, APOLLO and many others */
	44
	45	/* __ia64__ defined automatically */
	46
	47
	48	/* Use type EMACS_INT rather than a union, to represent Lisp_Object */
	49	/* This is desirable for most machines. */
	50
	51	#define NO_UNION_TYPE
	52
	53	/* Define the type to use. */
	54	#define EMACS_INT long
	55	#define EMACS_UINT unsigned long
	56	#define SPECIAL_EMACS_INT
	57
	58	/* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend
	59	the 24-bit bit field into an int. In other words, if bit fields
	60	are always unsigned.
	61
	62	If you use NO_UNION_TYPE, this flag does not matter. */
	63
	64	#define EXPLICIT_SIGN_EXTEND
	65
	66	/* Data type of load average, as read out of kmem. */
	67
	68	#define LOAD_AVE_TYPE long
	69
	70	/* Convert that into an integer that is 100 for a load average of 1.0 */
	71
	72	#define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE)
	73
74	/* Define CANNOT_DUMP on machines where unexec does not work.
75	Then the function dump-emacs will not be defined
76	and temacs will do (load "loadup") automatically unless told otherwise. */
77	#if 0
78	#define CANNOT_DUMP
79	#endif
80
81	/* Define VIRT_ADDR_VARIES if the virtual addresses of
82	pure and impure space as loaded can vary, and even their
83	relative order cannot be relied on.
84
85	Otherwise Emacs assumes that text space precedes data space,
86	numerically. */
87
88	/* #define VIRT_ADDR_VARIES */
89
f4988be7 GM	90	/* Define the following if GNU malloc and the relocating allocator do
	91	not work together with X. */
	92
	93	/* #define SYSTEM_MALLOC */
	94
	95	/* Define NO_REMAP if memory segmentation makes it not work well
	96	to change the boundary between the text section and data section
	97	when Emacs is dumped. If you define this, the preloaded Lisp
	98	code will not be sharable; but that's better than failing completely. */
	99
	100	/* #define NO_REMAP */
	101
	102	/* Some really obscure 4.2-based systems (like Sequent DYNIX) do not
	103	support asynchronous I/O (using SIGIO) on sockets, even though it
	104	works fine on tty's. If you have one of these systems, define the
	105	following, and then use it in config.h (or elsewhere) to decide
	106	when (not) to use SIGIO.
	107
	108	You'd think this would go in an operating-system description file,
	109	but since it only occurs on some, but not all, BSD systems, the
	110	reasonable place to select for it is in the machine description
	111	file. */
	112
	113	/* #define NO_SOCK_SIGIO */
	114
	115	#ifdef __ELF__
	116	#undef UNEXEC
	117	#define UNEXEC unexelf.o
	118	#endif
	119
	120	#define PNTR_COMPARISON_TYPE unsigned long
	121
	122	/* On the 64 bit architecture, we can use 60 bits for addresses */
	123
	124	#define VALBITS 60
	125
f4988be7 GM	126	/* Define XINT and XUINT so that they can take arguments of type int */
	127
	128	#define XINT(a) (((long) (a) << (BITS_PER_LONG - VALBITS)) >> (BITS_PER_LONG - VALBITS))
	129	#define XUINT(a) ((long) (a) & VALMASK)
	130
be4ee72f AS	131	#ifndef NOT_C_CODE
be4ee72f AS	132
f4988be7 GM	133	#ifdef REL_ALLOC
	134	#ifndef _MALLOC_INTERNAL
	135	/* "char *" because ralloc.c defines it that way. gmalloc.c thinks it
	136	is allowed to prototype these as "void *" so we don't prototype in
	137	that case. You're right: it stinks! */
	138	extern char r_alloc (), r_re_alloc ();
	139	extern void r_alloc_free ();
	140	#endif /* not _MALLOC_INTERNAL */
	141	#endif /* REL_ALLOC */
	142
	143	#endif /* not NOT_C_CODE */
	144
	145	#define DATA_SEG_BITS 0x6000000000000000
	146
	147	#define HAVE_TEXT_START
ab5796a9 MB	148
	149	/* arch-tag: 9b8e9fb2-2e49-4c22-b68f-11a488e77c66
	150	(do not change this comment) */