X-Git-Url: http://git.hcoop.net/bpt/emacs.git/blobdiff_plain/62d9f4b03f51b27b7838a69cc127f431d8737903..ab5796a9f97180707734a81320e3eb81937281fe:/src/m/alpha.h diff --git a/src/m/alpha.h b/src/m/alpha.h index d62b9872de..3e1d378b29 100644 --- a/src/m/alpha.h +++ b/src/m/alpha.h @@ -1,5 +1,5 @@ /* machine description file For the alpha chip. - Copyright (C) 1994 Free Software Foundation, Inc. + Copyright (C) 1994, 1997, 1999, 2002 Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -19,7 +19,7 @@ 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 +/* The following line tells the configuration script what sort of operating system this machine is likely to run. USUAL-OPSYS="note" @@ -29,8 +29,10 @@ NOTE-END */ -#define BITS_PER_LONG 64 -#define BITS_PER_EMACS_INT 64 +#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. */ @@ -42,11 +44,6 @@ NOTE-END #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, @@ -57,14 +54,8 @@ NOTE-END /* 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. @@ -81,30 +72,6 @@ NOTE-END #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?] */ @@ -118,28 +85,6 @@ NOTE-END /* #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__ /* With ELF, make sure that all common symbols get allocated to in the data section. Otherwise, the dump of temacs may miss variables in @@ -153,13 +98,16 @@ NOTE-END # endif #endif -#if defined(__NetBSD__) || defined(__OpenBSD__) +#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__ @@ -169,141 +117,17 @@ NOTE-END #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 - /* The program to be used for unexec. */ #define UNEXEC unexalpha.o #endif /* notdef __ELF__ */ -#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 - #if defined (LINUX) && __GNU_LIBRARY__ - 0 < 6 /* This controls a conditional in main. */ #define LINUX_SBRK_BUG #endif - -#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. */ -#if !defined(__NetBSD__) && !defined(__OpenBSD__) -#include -#else -#include -#endif - -/* 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 = sigblock (sigmask (SIGCHLD)); \ - if (-1 == openpty (&fd, &dummy, pty_name, 0, 0)) \ - fd = -1; \ - sigsetmask (mask); \ - close (dummy); \ - } \ - while (0) -#endif - /* On the Alpha it's best to avoid including TERMIO since struct termio and struct termios are mutually incompatible. */ #define NO_TERMIO @@ -319,3 +143,12 @@ extern void r_alloc_free (); #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) */