|
|
1.1 ! root 1: /* m- file for vax. ! 2: Copyright (C) 1985, 1986 Free Software Foundation, Inc. ! 3: ! 4: This file is part of GNU Emacs. ! 5: ! 6: GNU Emacs is distributed in the hope that it will be useful, ! 7: but WITHOUT ANY WARRANTY. No author or distributor ! 8: accepts responsibility to anyone for the consequences of using it ! 9: or for whether it serves any particular purpose or works at all, ! 10: unless he says so in writing. Refer to the GNU Emacs General Public ! 11: License for full details. ! 12: ! 13: Everyone is granted permission to copy, modify and redistribute ! 14: GNU Emacs, but only under the conditions described in the ! 15: GNU Emacs General Public License. A copy of this license is ! 16: supposed to have been given to you along with GNU Emacs so you ! 17: can know your rights and responsibilities. It should be in a ! 18: file named COPYING. Among other things, the copyright notice ! 19: and this notice must be preserved on all copies. */ ! 20: ! 21: ! 22: /* The following three symbols give information on ! 23: the size of various data types. */ ! 24: ! 25: #define SHORTBITS 16 /* Number of bits in a short */ ! 26: ! 27: #define INTBITS 32 /* Number of bits in an int */ ! 28: ! 29: #define LONGBITS 32 /* Number of bits in a long */ ! 30: ! 31: /* Vax is not big-endian: lowest numbered byte is least significant. */ ! 32: ! 33: /* #undef BIG_ENDIAN */ ! 34: ! 35: /* Define how to take a char and sign-extend into an int. ! 36: On machines where char is signed, this is a no-op. */ ! 37: ! 38: #define SIGN_EXTEND_CHAR(c) (c) ! 39: ! 40: /* #define vax -- appears to be done automatically */ ! 41: ! 42: /* Use type int rather than a union, to represent Lisp_Object */ ! 43: ! 44: #define NO_UNION_TYPE ! 45: ! 46: /* crt0.c should use the vax-bsd style of entry, with no dummy args. */ ! 47: ! 48: #define CRT0_DUMMIES ! 49: ! 50: /* crt0.c should define a symbol `start' and do .globl with a dot. */ ! 51: ! 52: #define DOT_GLOBAL_START ! 53: ! 54: #ifdef BSD ! 55: /* USG systems I know of running on Vaxes do not actually ! 56: support the load average, so disable it for them. */ ! 57: ! 58: /* Data type of load average, as read out of kmem. */ ! 59: ! 60: #define LOAD_AVE_TYPE double ! 61: ! 62: /* Convert that into an integer that is 100 for a load average of 1.0 */ ! 63: ! 64: #define LOAD_AVE_CVT(x) ((int) ((x) * 100.0)) ! 65: ! 66: #endif /* BSD */ ! 67: ! 68: #ifdef VMS ! 69: ! 70: /* Data type of load average, as read out of driver. */ ! 71: ! 72: #define LOAD_AVE_TYPE float ! 73: ! 74: /* Convert that into an integer that is 100 for a load average of 1.0 */ ! 75: ! 76: #define LOAD_AVE_CVT(x) ((int) ((x) * 100.0)) ! 77: ! 78: #endif /* VMS */ ! 79: ! 80: /* Vax sysV has alloca in the PW library. */ ! 81: ! 82: #ifdef USG ! 83: #define LIB_STANDARD -lPW -lc ! 84: #define HAVE_ALLOCA ! 85: ! 86: /* There is some bug in unexec in for usg 5.2 on a vax ! 87: which nobody who runs such a system has yet tracked down. */ ! 88: #ifndef USG5_0 ! 89: #define NO_REMAP ! 90: #endif /* USG 5_0 */ ! 91: ! 92: #define TEXT_START 0 ! 93: #endif /* USG */ ! 94: ! 95: #ifdef BSD ! 96: #define HAVE_ALLOCA ! 97: #endif /* BSD */ ! 98: ! 99: #ifdef VMS ! 100: #define C_ALLOCA ! 101: #endif
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.