|
|
1.1 ! root 1: /* m- file for convex C1-C3. ! 2: Copyright (C) 1987, 1989 Free Software Foundation, Inc. ! 3: ! 4: This file is part of GNU Emacs. ! 5: ! 6: GNU Emacs is free software; you can redistribute it and/or modify ! 7: it under the terms of the GNU General Public License as published by ! 8: the Free Software Foundation; either version 1, or (at your option) ! 9: any later version. ! 10: ! 11: GNU Emacs is distributed in the hope that it will be useful, ! 12: but WITHOUT ANY WARRANTY; without even the implied warranty of ! 13: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ! 14: GNU General Public License for more details. ! 15: ! 16: You should have received a copy of the GNU General Public License ! 17: along with GNU Emacs; see the file COPYING. If not, write to ! 18: the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ ! 19: ! 20: ! 21: /* The following three symbols give information on ! 22: the size of various data types. */ ! 23: ! 24: #define SHORTBITS 16 /* Number of bits in a short */ ! 25: ! 26: #define INTBITS 32 /* Number of bits in an int */ ! 27: ! 28: #define LONGBITS 32 /* Number of bits in a long */ ! 29: ! 30: /* Define BIG_ENDIAN iff lowest-numbered byte in a word ! 31: is the most significant byte. */ ! 32: ! 33: #define BIG_ENDIAN ! 34: ! 35: /* Define NO_ARG_ARRAY if you cannot take the address of the first of a ! 36: * group of arguments and treat it as an array of the arguments. */ ! 37: ! 38: /* #define NO_ARG_ARRAY */ ! 39: ! 40: /* Define WORD_MACHINE if addresses and such have ! 41: * to be corrected before they can be used as byte counts. */ ! 42: ! 43: /* #define WORD_MACHINE */ ! 44: ! 45: /* Define how to take a char and sign-extend into an int. ! 46: On machines where char is signed, this is a no-op. */ ! 47: ! 48: #define SIGN_EXTEND_CHAR(c) (c) ! 49: ! 50: /* Now define a symbol for the cpu type, if your compiler ! 51: does not define it automatically. */ ! 52: ! 53: /* convex already defined... */ ! 54: ! 55: /* Use type int rather than a union, to represent Lisp_Object */ ! 56: /* This is desirable for most machines. */ ! 57: ! 58: #define NO_UNION_TYPE ! 59: ! 60: /* crt0.c should use the vax-bsd style of entry, with no dummy args. */ ! 61: ! 62: #define CRT0_DUMMIES ! 63: ! 64: /* crt0.c should define a symbol `start' and do .globl with a dot. */ ! 65: ! 66: #define DOT_GLOBAL_START ! 67: ! 68: /* Data type of load average, as read out of kmem. */ ! 69: ! 70: #define LOAD_AVE_TYPE double ! 71: ! 72: /* Convert that into an integer that is 100 for a load average of 1.0 */ ! 73: ! 74: #define LOAD_AVE_CVT(x) (int) ((x) * 100.0) ! 75: ! 76: /* Define CANNOT_DUMP on machines where unexec does not work. ! 77: Then the function dump-emacs will not be defined ! 78: and temacs will do (load "loadup") automatically unless told otherwise. */ ! 79: ! 80: /* #define CANNOT_DUMP */ ! 81: ! 82: /* Define VIRT_ADDR_VARIES if the virtual addresses of ! 83: pure and impure space as loaded can vary, and even their ! 84: relative order cannot be relied on. ! 85: ! 86: Otherwise Emacs assumes that text space precedes data space, ! 87: numerically. */ ! 88: ! 89: /* #define VIRT_ADDR_VARIES */ ! 90: ! 91: /* Define C_ALLOCA if this machine does not support a true alloca ! 92: and the one written in C should be used instead. ! 93: Define HAVE_ALLOCA to say that the system provides a properly ! 94: working alloca function and it should be used. ! 95: Define neither one if an assembler-language alloca ! 96: in the file alloca.s should be used. */ ! 97: ! 98: /* #define C_ALLOCA */ ! 99: #define HAVE_ALLOCA ! 100: ! 101: #ifdef __GNUC__ ! 102: #define alloca __builtin_alloca ! 103: #endif ! 104: ! 105: /* Define NO_REMAP if memory segmentation makes it not work well ! 106: to change the boundary between the text section and data section ! 107: when Emacs is dumped. If you define this, the preloaded Lisp ! 108: code will not be sharable; but that's better than failing completely. */ ! 109: ! 110: /* #define NO_REMAP */ ! 111: ! 112: /* Addresses on the Convex have the high bit set. */ ! 113: ! 114: #define DATA_SEG_BITS 0x80000000 ! 115: ! 116: /* Right shift is logical shift, so use this to sign-extend a lisp int. */ ! 117: ! 118: #define VSIGNBIT (1 << (VALBITS - 1)) ! 119: #define VALLBITS ((1 << VALBITS) - 1) ! 120: #define XINT(a) ((int) ((((a) & VALLBITS) ^ VSIGNBIT) - VSIGNBIT)) ! 121: ! 122: /* Convex uses a special version of unexec. */ ! 123: ! 124: #define UNEXEC unexconvex.o ! 125: ! 126: /* you gotta define 'COFF' for post 6.1 unexec. */ ! 127: ! 128: #define COFF ! 129: #define TEXT_START 0x80001000 ! 130: ! 131: /* Posix stuff for Convex OS 8.1 and up. */ ! 132: ! 133: #define C_SWITCH_MACHINE -pcc ! 134: #define LD_SWITCH_MACHINE \ ! 135: -e__start -L /usr/lib \ ! 136: '-A__iob=___ap$$iob' '-A_use_libc_sema=___ap$$use_libc_sema' ! 137: ! 138: /* Use setsid when starting up inferiors. */ ! 139: #define HAVE_SETSID ! 140: ! 141: /* Use <dirent.h>. */ ! 142: #define SYSV_SYSTEM_DIR ! 143: #define HAVE_CLOSEDIR ! 144: ! 145: #ifdef _POSIX_SOURCE ! 146: ! 147: /* These symbols have been undefined to advance the state of the art. */ ! 148: ! 149: #define S_IFMT _S_IFMT ! 150: #define S_IFDIR _S_IFDIR ! 151: ! 152: #define S_IREAD _S_IREAD ! 153: #define S_IWRITE _S_IWRITE ! 154: #define S_IEXEC _S_IEXEC ! 155: ! 156: #endif ! 157: ! 158: /* Ptys may start below ptyp0; call a routine to hunt for where. */ ! 159: ! 160: #undef FIRST_PTY_LETTER ! 161: #define FIRST_PTY_LETTER first_pty_letter() ! 162: ! 163: #if 0 ! 164: /* ! 165: * Force a K&R compilation and libraries with the Convex V 4.0 C compiler ! 166: */ ! 167: #define C_SWITCH_MACHINE -pcc ! 168: #define LIB_STANDARD -lc_old ! 169: #define LIBS_MACHINE -lC2_old ! 170: #define LD_SWITCH_MACHINE -X -NL -fn -Enoposix -A__iob=___ap\$$iob \ ! 171: -A_use_libc_sema=___ap\$$use_libc_sema -L /usr/lib ! 172: #endif
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.