X-Git-Url: http://git.hcoop.net/bpt/emacs.git/blobdiff_plain/7aaa6e47a5defd4b684807c6f079bd2d7b1699de..364c38d3af67e2b56a90a6547ec9f773967bf1df:/src/m/alpha.h diff --git a/src/m/alpha.h b/src/m/alpha.h dissimilarity index 66% index 606b7aab46..aff6182270 100644 --- a/src/m/alpha.h +++ b/src/m/alpha.h @@ -1,284 +1,154 @@ -/* machine description file For the alpha chip. - Copyright (C) 1994 Free Software Foundation, Inc. - -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 1, 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. */ - - -/* The following line tells the configuration script what sort of - operating system this machine is likely to run. - USUAL-OPSYS="note" - -NOTE-START -Use -opsystem=osf1 -NOTE-END - -*/ - -#define BITS_PER_LONG 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 */ - -/* __alpha 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. */ - -/* #define CANNOT_DUMP */ - -/* 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 C_ALLOCA if this machine does not support a true alloca - and the one written in C should be used instead. - Define HAVE_ALLOCA to say that the system provides a properly - working alloca function and it should be used. - Define neither one if an assembler-language alloca - in the file alloca.s should be used. */ - -#define HAVE_ALLOCA - -/* GNU malloc and the relocating allocator do not work together - with X. [Who wrote that?] */ - -/* May 1995: reportedly [Rainer Schoepf ] both the - system and the gnu malloc system work with "alpha-dec-osf3.0" and - "alpha-dec-osf3.2". */ - -/* May 1995: it seems to me [Morten Welinder ] that both - mallocs work with "alpha-dec-osf2.0", but I daren't break anything - right now. Feel free to play if you want. */ - -/* #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 */ - - -/* Describe layout of the address space in an executing process. */ - -#define TEXT_START 0x120000000 -#define DATA_START 0x140000000 - -/* This is necessary for mem-limits.h, so that start_of_data gives - the correct value */ - -#define DATA_SEG_BITS 0x140000000 - -#ifdef OSF1 -#define ORDINARY_LINK - -/* Some systems seem to have this, others don't. */ -#ifdef HAVE_LIBDNET -#define LIBS_MACHINE -ldnet -#else -#define LIBS_MACHINE -ldnet_stub -#endif -#endif /* OSF1 */ - -#if 0 /* Rainer Schoepf says this loses with X11R6 - since it has only shared libraries. */ -#ifndef __GNUC__ -/* This apparently is for the system ld as opposed to Gnu ld. */ -#ifdef OSF1 -#define LD_SWITCH_MACHINE -non_shared -#endif -#endif -#endif /* 0 */ - -#ifdef OSF1 -#define LIBS_DEBUG -#define START_FILES pre-crt0.o -#endif - -#ifdef LINUX -/* This controls a conditional in main. */ -#define LINUX_SBRK_BUG -#endif - -/* The program to be used for unexec. */ - -#define UNEXEC unexalpha.o - - -#define PNTR_COMPARISON_TYPE unsigned long - -/* On the 64 bit architecture, we can use 60 bits for addresses */ - -#define VALBITS 60 - - -/* This definition of MARKBIT is necessary because of the comparison of - ARRAY_MARK_FLAG and MARKBIT in an #if in lisp.h, which cpp doesn't like. */ - -#define MARKBIT 0x8000000000000000L - - -/* 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) - -/* Define XPNTR to avoid or'ing with DATA_SEG_BITS */ - -#define XPNTR(a) XUINT (a) - -/* Declare malloc and realloc in a way that is clean. - But not in makefiles! */ - -#ifndef NOT_C_CODE -/* We need these because pointers are larger than the default ints. */ -#include - -/* Hack alert! For reasons unknown to mankind the string.h file insists - on defining bcopy etc. as taking char pointers as arguments. With - Emacs this produces an endless amount of warning which are harmless, - but tends to flood the real errors. This hack works around this problem - by not prototyping. */ -#define bcopy string_h_bcopy -#define bzero string_h_bzero -#define bcmp string_h_bcmp -#include -#undef bcopy -#undef bzero -#undef bcmp - -/* We need to prototype these for the lib-src programs even if we don't - use the system malloc for the Emacs proper. */ -#ifdef _MALLOC_INTERNAL -/* These declarations are designed to match the ones in gmalloc.c. */ -#if defined (__STDC__) && __STDC__ -extern void *malloc (), *realloc (), *calloc (); -#else -extern char *malloc (), *realloc (), *calloc (); -#endif -#else /* not _MALLOC_INTERNAL */ -extern void *malloc (), *realloc (), *calloc (); -#endif /* not _MALLOC_INTERNAL */ - - -extern long *xmalloc (), *xrealloc (); - -#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 */ - -#ifdef OSF1 -#define PTY_ITERATION for (i = 0; i < 1; i++) /* ick */ -#define PTY_NAME_SPRINTF /* none */ -#define PTY_TTY_NAME_SPRINTF /* none */ -#define PTY_OPEN \ - do \ - { \ - int dummy; \ - SIGMASKTYPE mask; \ - mask = sigblockx (SIGCHLD); \ - if (-1 == openpty (&fd, &dummy, pty_name, 0, 0)) \ - fd = -1; \ - sigsetmask (mask); \ - close (dummy); \ - } \ - while (0) -#endif - -#ifdef linux -#define COFF -/* Linux/Alpha doesn't like it if termio.h and termios.h get included - simultaneously. */ -#define NO_TERMIO - -#define TEXT_END ({ extern int _etext; &_etext; }) -#define DATA_END ({ extern int _EDATA; &_EDATA; }) -#endif +/* machine description file For the alpha chip. + Copyright (C) 1994, 1997, 1999, 2002 Free Software Foundation, Inc. + +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 1, 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., 51 Franklin Street, Fifth Floor, +Boston, MA 02110-1301, USA. */ + + +/* The following line tells the configuration script what sort of + operating system this machine is likely to run. + USUAL-OPSYS="note" + +NOTE-START +Use -opsystem=osf1 +NOTE-END + +*/ + +#ifndef _LP64 +#define _LP64 /* This doesn't appear to be necessary + on OSF 4/5 -- fx. */ +#endif + +/* 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 + +/* 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 */ + +/* __alpha 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 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) + +/* GNU malloc and the relocating allocator do not work together + with X. [Who wrote that?] */ + +/* May 1995: reportedly [Rainer Schoepf ] both the + system and the gnu malloc system work with "alpha-dec-osf3.0" and + "alpha-dec-osf3.2". */ + +/* May 1995: it seems to me [Morten Welinder ] that both + mallocs work with "alpha-dec-osf2.0", but I daren't break anything + right now. Feel free to play if you want. */ + +/* #define SYSTEM_MALLOC */ + +#ifdef __ELF__ +/* With ELF, make sure that all common symbols get allocated to in the + data section. Otherwise, the dump of temacs may miss variables in + the shared library that have been initialized. For example, with + GNU libc, __malloc_initialized would normally be resolved to the + shared library's .bss section, which is fatal. */ +# ifdef __GNUC__ +# define C_SWITCH_MACHINE -fno-common +# else +# error What gives? Fix me if DEC Unix supports ELF now. +# endif +#endif + +#if defined(__OpenBSD__) +#define ORDINARY_LINK +#endif + +#ifdef __ELF__ +#undef UNEXEC +#define UNEXEC unexelf.o +#ifndef LINUX +#define DATA_START 0x140000000 +#endif +#endif + +#ifndef __ELF__ + +/* Describe layout of the address space in an executing process. */ + +#define TEXT_START 0x120000000 +#define DATA_START 0x140000000 + +/* The program to be used for unexec. */ + +#define UNEXEC unexalpha.o + +#endif /* notdef __ELF__ */ + +#if defined (LINUX) && __GNU_LIBRARY__ - 0 < 6 +/* This controls a conditional in main. */ +#define LINUX_SBRK_BUG +#endif + +/* On the Alpha it's best to avoid including TERMIO since struct + termio and struct termios are mutually incompatible. */ +#define NO_TERMIO + +#if defined (LINUX) || defined (__NetBSD__) || defined (__OpenBSD__) +# define TEXT_END ({ extern int _etext; &_etext; }) +# ifndef __ELF__ +# define COFF +# define DATA_END ({ extern int _EDATA; &_EDATA; }) +# endif /* notdef __ELF__ */ +#endif + +#if (defined (__NetBSD__) || defined (__OpenBSD__)) && defined (__ELF__) +#define HAVE_TEXT_START +#endif + +/* Many Alpha implementations (e.g. gas 2.8) can't handle DBL_MIN: + they generate code that uses a signaling NaN instead of DBL_MIN. + Define DBL_MIN_REPLACEMENT to be the next value larger than DBL_MIN: + this avoids the assembler bug. */ +#define DBL_MIN_REPLACEMENT 2.2250738585072019e-308 + +/* arch-tag: 978cb578-1e25-4a60-819b-adae0972aa78 + (do not change this comment) */