|
|
1.1 ! root 1: /* m- file for Iris-4D machines. Use with s-irix3-3.h. ! 2: Copyright (C) 1987 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: #undef 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) ((signed char)(c)) ! 49: ! 50: /* Now define a symbol for the cpu type, if your compiler ! 51: does not define it automatically: ! 52: Ones defined so far include vax, m68000, ns16000, pyramid, ! 53: orion, tahoe, APOLLO and many others */ ! 54: ! 55: #ifndef mips ! 56: #define mips ! 57: #endif ! 58: ! 59: #ifndef IRIS_4D ! 60: #define IRIS_4D ! 61: #endif ! 62: ! 63: /* Use type int rather than a union, to represent Lisp_Object */ ! 64: /* This is desirable for most machines. */ ! 65: ! 66: #define NO_UNION_TYPE ! 67: ! 68: /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend ! 69: the 24-bit bit field into an int. In other words, if bit fields ! 70: are always unsigned. ! 71: ! 72: If you use NO_UNION_TYPE, this flag does not matter. */ ! 73: ! 74: #define EXPLICIT_SIGN_EXTEND ! 75: ! 76: /* Data type of load average, as read out of kmem. */ ! 77: ! 78: #define LOAD_AVE_TYPE long /* This doesn't quite work on the 4D */ ! 79: ! 80: /* Convert that into an integer that is 100 for a load average of 1.0 */ ! 81: ! 82: #define LOAD_AVE_CVT(x) (int)(((double)(x)*100)/1024.0) ! 83: ! 84: #undef KERNEL_FILE ! 85: #define KERNEL_FILE "/unix" ! 86: ! 87: /* Define CANNOT_DUMP on machines where unexec does not work. ! 88: Then the function dump-emacs will not be defined ! 89: and temacs will do (load "loadup") automatically unless told otherwise. */ ! 90: ! 91: #undef CANNOT_DUMP ! 92: ! 93: /* Define VIRT_ADDR_VARIES if the virtual addresses of ! 94: pure and impure space as loaded can vary, and even their ! 95: relative order cannot be relied on. ! 96: ! 97: Otherwise Emacs assumes that text space precedes data space, ! 98: numerically. */ ! 99: ! 100: /* #define VIRT_ADDR_VARIES */ ! 101: ! 102: /* Define C_ALLOCA if this machine does not support a true alloca ! 103: and the one written in C should be used instead. ! 104: Define HAVE_ALLOCA to say that the system provides a properly ! 105: working alloca function and it should be used. ! 106: Define neither one if an assembler-language alloca ! 107: in the file alloca.s should be used. */ ! 108: ! 109: #define C_ALLOCA ! 110: /* #define HAVE_ALLOCA */ ! 111: ! 112: /* Define NO_REMAP if memory segmentation makes it not work well ! 113: to change the boundary between the text section and data section ! 114: when Emacs is dumped. If you define this, the preloaded Lisp ! 115: code will not be sharable; but that's better than failing completely. */ ! 116: ! 117: #define NO_REMAP ! 118: ! 119: /* This machine requires completely different unexec code ! 120: which lives in a separate file. Specify the file name. */ ! 121: ! 122: #define UNEXEC unexmips.o ! 123: ! 124: #define TEXT_START 0x400000 ! 125: ! 126: /* ! 127: * DATA_SEG_BITS forces that bit to be or'd in with any pointers which ! 128: * are trying to access pure strings (as gnu-emacs only allows 24 bits ! 129: * for the value field of a LISP_OBJECT). ! 130: */ ! 131: ! 132: #define DATA_START 0x10000000 ! 133: #define DATA_SEG_BITS 0x10000000 ! 134: ! 135: #undef LIBS_MACHINE ! 136: /* -lsun in case using Yellow Pages for passwords. */ ! 137: #define LIBS_MACHINE -lsun -lmld ! 138: #define LIBS_DEBUG ! 139: ! 140: /* Define this if you have a fairly recent system, ! 141: in which crt1.o and crt1.n should be used. */ ! 142: #define HAVE_CRTN ! 143: ! 144: #ifdef HAVE_CRTN ! 145: /* Must define START-FILES so that the linker can find /usr/lib/crt0.o. */ ! 146: #define START_FILES pre-crt0.o /usr/lib/crt1.o ! 147: #define LIB_STANDARD -lbsd -lc /usr/lib/crtn.o ! 148: #else ! 149: #define START_FILES pre-crt0.o /usr/lib/crt0.o ! 150: /* The entry-point label (start of text segment) is `start', not `__start'. */ ! 151: #define DEFAULT_ENTRY_ADDRESS start ! 152: #define LIB_STANDARD -lbsd -lc ! 153: #endif ! 154: ! 155: /* Use terminfo instead of termcap. */ ! 156: ! 157: #define TERMINFO ! 158: ! 159: /* Letter to use in finding device name of first pty, ! 160: if system supports pty's. 'a' means it is /dev/ptya0 */ ! 161: ! 162: #undef FIRST_PTY_LETTER ! 163: #define FIRST_PTY_LETTER 'q' ! 164: ! 165: /* Define STACK_DIRECTION for alloca.c */ ! 166: ! 167: #define STACK_DIRECTION -1 ! 168: ! 169: /* The standard definitions of these macros would work ok, ! 170: but these are faster because the constants are short. */ ! 171: ! 172: #define XUINT(a) (((unsigned)(a) << (INTBITS-VALBITS)) >> INTBITS-VALBITS) ! 173: ! 174: #define XSET(var, type, ptr) \ ! 175: ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << (INTBITS-VALBITS)) >> (INTBITS-VALBITS))) ! 176: ! 177: #define XSETINT(a, b) XSET(a, XTYPE(a), b) ! 178: #define XSETUINT(a, b) XSET(a, XTYPE(a), b) ! 179: #define XSETPNTR(a, b) XSET(a, XTYPE(a), b) ! 180: ! 181: #define XMARKBIT(a) ((a) < 0) ! 182: #define XSETMARKBIT(a,b) ((a) = ((a) & ~MARKBIT) | ((b) ? MARKBIT : 0)) ! 183: #define XUNMARK(a) ((a) = (((unsigned)(a) << (INTBITS-GCTYPEBITS-VALBITS)) >> (INTBITS-GCTYPEBITS-VALBITS))) ! 184: ! 185: #if 0 /* This was a mistake. It is needed only on irix 4.0, ! 186: but s-irix4-0.h already does it. */ ! 187: /* Turn off some "helpful" error checks for type mismatches ! 188: that we can't fix without breaking other machines. */ ! 189: #define C_SWITCH_MACHINE -cckr ! 190: #endif
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.