-/* 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 <schoepf@uni-mainz.de>] 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 <terra@diku.dk>] 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 <schoepf@uni-mainz.de> 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 <alloca.h>
-
-/* 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 <string.h>
-#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 <schoepf@uni-mainz.de>] 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 <terra@diku.dk>] 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) */
HCoop / bpt / emacs.git / blobdiff