|
|
1.1 ! root 1: /* m- file for Silicon Graphics Iris 2500 Turbos; ! 2: also possibly for non-turbo Irises with system release 2.5. ! 3: Copyright (C) 1985, 1986 Free Software Foundation, Inc. ! 4: ! 5: This file is part of GNU Emacs. ! 6: ! 7: GNU Emacs is free software; you can redistribute it and/or modify ! 8: it under the terms of the GNU General Public License as published by ! 9: the Free Software Foundation; either version 1, or (at your option) ! 10: any later version. ! 11: ! 12: GNU Emacs is distributed in the hope that it will be useful, ! 13: but WITHOUT ANY WARRANTY; without even the implied warranty of ! 14: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ! 15: GNU General Public License for more details. ! 16: ! 17: You should have received a copy of the GNU General Public License ! 18: along with GNU Emacs; see the file COPYING. If not, write to ! 19: the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ ! 20: ! 21: ! 22: #if 0 ! 23: Message-Id: <[email protected]> ! 24: Subject: gnu emacs 18.41 on iris [23].5 machines ! 25: Date: 04 May 87 23:53:11 PDT (Mon) ! 26: From: [email protected] ! 27: ! 28: Aside from the SIGIOT, I know of only one bug, a real strange one: ! 29: I wrote a utimes interface, which copies elements from timevals ! 30: to utimbufs. This code is known good. The problem is that in ! 31: emacs, the utime doesn't seem to take effect (i.e. doesn't change the ! 32: dates at all) unless I call report_file_error *after* the utime returns! ! 33: ! 34: if (utime (name, &utb) < 0) ! 35: return; ! 36: else ! 37: /* XXX XXX XXX */ ! 38: /* For some reason, if this is taken out, then the utime above breaks! */ ! 39: /* (i.e. it doesn't set the time. This just makes no sense... */ ! 40: /* Eric - May 4, 1987 */ ! 41: report_file_error ("Worked just find\n", Qnil); ! 42: ! 43: Without any sort of debugger that works on emacs (I know... but I don't have ! 44: *time* right now to start with gdb), it was quite time consuming to track ! 45: it down to this. ! 46: ! 47: But since this code is only used for an optional 4th argument to one command ! 48: (copy-file), it would say that it is non-critical... ! 49: #endif /* 0 */ ! 50: ! 51: /* The following three symbols give information on ! 52: the size of various data types. */ ! 53: ! 54: #define SHORTBITS 16 /* Number of bits in a short */ ! 55: ! 56: #define INTBITS 32 /* Number of bits in an int */ ! 57: ! 58: #define LONGBITS 32 /* Number of bits in a long */ ! 59: ! 60: /* Define BIG_ENDIAN iff lowest-numbered byte in a word ! 61: is the most significant byte. */ ! 62: ! 63: #define BIG_ENDIAN ! 64: ! 65: /* Define NO_ARG_ARRAY if you cannot take the address of the first of a ! 66: * group of arguments and treat it as an array of the arguments. */ ! 67: ! 68: /* #define NO_ARG_ARRAY */ ! 69: ! 70: /* Define WORD_MACHINE if addresses and such have ! 71: * to be corrected before they can be used as byte counts. */ ! 72: ! 73: /* #define WORD_MACHINE */ ! 74: ! 75: /* Define how to take a char and sign-extend into an int. ! 76: On machines where char is signed, this is a no-op. */ ! 77: ! 78: #define SIGN_EXTEND_CHAR(c) (c) ! 79: ! 80: /* Now define a symbol for the cpu type, if your compiler ! 81: does not define it automatically: ! 82: Ones defined so far include vax, m68000, ns16000, pyramid, ! 83: orion, tahoe, APOLLO and many others */ ! 84: ! 85: #ifndef m68000 ! 86: #define m68000 ! 87: #endif ! 88: ! 89: /* Use type int rather than a union, to represent Lisp_Object */ ! 90: /* This is desirable for most machines. */ ! 91: ! 92: #define NO_UNION_TYPE ! 93: ! 94: /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend ! 95: the 24-bit bit field into an int. In other words, if bit fields ! 96: are always unsigned. ! 97: ! 98: If you use NO_UNION_TYPE, this flag does not matter. */ ! 99: ! 100: #define EXPLICIT_SIGN_EXTEND ! 101: ! 102: /* Data type of load average, as read out of kmem. */ ! 103: ! 104: #define LOAD_AVE_TYPE long ! 105: ! 106: /* Convert that into an integer that is 100 for a load average of 1.0 */ ! 107: ! 108: #define FSCALE 1.0 ! 109: #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE) ! 110: ! 111: /* Define CANNOT_DUMP on machines where unexec does not work. ! 112: Then the function dump-emacs will not be defined ! 113: and temacs will do (load "loadup") automatically unless told otherwise. */ ! 114: ! 115: /* #define CANNOT_DUMP */ ! 116: ! 117: /* Define VIRT_ADDR_VARIES if the virtual addresses of ! 118: pure and impure space as loaded can vary, and even their ! 119: relative order cannot be relied on. ! 120: ! 121: Otherwise Emacs assumes that text space precedes data space, ! 122: numerically. */ ! 123: ! 124: /* #define VIRT_ADDR_VARIES */ ! 125: ! 126: /* Define C_ALLOCA if this machine does not support a true alloca ! 127: and the one written in C should be used instead. ! 128: Define HAVE_ALLOCA to say that the system provides a properly ! 129: working alloca function and it should be used. ! 130: Define neither one if an assembler-language alloca ! 131: in the file alloca.s should be used. */ ! 132: ! 133: /* #define C_ALLOCA */ ! 134: #define HAVE_ALLOCA ! 135: ! 136: /* Define NO_REMAP if memory segmentation makes it not work well ! 137: to change the boundary between the text section and data section ! 138: when Emacs is dumped. If you define this, the preloaded Lisp ! 139: code will not be sharable; but that's better than failing completely. */ ! 140: ! 141: /* #define NO_REMAP */ ! 142: ! 143: /* There is an inconsistency between the sgi assembler, linker which barfs ! 144: on these. */ ! 145: ! 146: #define internal_with_output_to_temp_buffer stupid_long_name1 ! 147: #define Finsert_abbrev_table_description stupid_long_name2
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.