code.delx.au - gnu-emacs/blob - src/m/irist.h

   1 /* machine description 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 /* The following line tells the configuration script what sort of
  23    operating system this machine is likely to run.
  24    USUAL-OPSYS="note"
  25 NOTE-START
  26 Version 18 said to work; use -opsystem=irist3-5 for system version 2.5
  27 and -opsystem=iris3-6 for system versions 3.6 and up.
  28 NOTE-END */
  29
  30 #if 0
  31   Message-Id: <8705050653.AA20004@orville.arpa>
  32   Subject: gnu emacs 18.41 on iris [23].5 machines
  33   Date: 04 May 87 23:53:11 PDT (Mon)
  34   From: raible@orville.arpa
  35
  36   Aside from the SIGIOT, I know of only one bug, a real strange one:
  37   I wrote a utimes interface, which copies elements from timevals
  38   to utimbufs. This code is known good.  The problem is that in
  39   emacs, the utime doesn't seem to take effect (i.e. doesn't change the
  40   dates at all) unless I call report_file_error *after* the utime returns!
  41
  42     if (utime (name, &utb) < 0)
  43       return;
  44     else
  45       /* XXX XXX XXX */
  46       /* For some reason, if this is taken out, then the utime above breaks! */
  47       /* (i.e. it doesn't set the time. This just makes no sense... */
  48       /* Eric - May 4, 1987 */
  49       report_file_error ("Worked just find\n", Qnil);
  50
  51   Without any sort of debugger that works on emacs (I know... but I don't have
  52   *time* right now to start with gdb), it was quite time consuming to track
  53   it down to this.
  54
  55   But since this code is only used for an optional 4th argument to one command
  56   (copy-file), it would say that it is non-critical...
  57 #endif /* 0 */
  58
  59 /* The following three symbols give information on
  60  the size of various data types.  */
  61
  62 #define SHORTBITS 16            /* Number of bits in a short */
  63
  64 #define INTBITS 32              /* Number of bits in an int */
  65
  66 #define LONGBITS 32             /* Number of bits in a long */
  67
  68 /* Define BIG_ENDIAN iff lowest-numbered byte in a word
  69    is the most significant byte.  */
  70
  71 #define BIG_ENDIAN
  72
  73 /* Define NO_ARG_ARRAY if you cannot take the address of the first of a
  74  * group of arguments and treat it as an array of the arguments.  */
  75
  76 /* #define NO_ARG_ARRAY */
  77
  78 /* Define WORD_MACHINE if addresses and such have
  79  * to be corrected before they can be used as byte counts.  */
  80
  81 /* #define WORD_MACHINE */
  82
  83 /* Now define a symbol for the cpu type, if your compiler
  84    does not define it automatically:
  85    Ones defined so far include vax, m68000, ns16000, pyramid,
  86    orion, tahoe, APOLLO and many others */
  87
  88 #ifndef m68000
  89 #define m68000
  90 #endif
  91
  92 /* Use type int rather than a union, to represent Lisp_Object */
  93 /* This is desirable for most machines.  */
  94
  95 #define NO_UNION_TYPE
  96
  97 /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend
  98    the 24-bit bit field into an int.  In other words, if bit fields
  99    are always unsigned.
 100
 101    If you use NO_UNION_TYPE, this flag does not matter.  */
 102
 103 #define EXPLICIT_SIGN_EXTEND
 104
 105 /* Data type of load average, as read out of kmem.  */
 106
 107 #define LOAD_AVE_TYPE long
 108
 109 /* Convert that into an integer that is 100 for a load average of 1.0  */
 110
 111 #define FSCALE 1.0
 112 #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE)
 113
 114 /* Define CANNOT_DUMP on machines where unexec does not work.
 115    Then the function dump-emacs will not be defined
 116    and temacs will do (load "loadup") automatically unless told otherwise.  */
 117
 118 /* #define CANNOT_DUMP */
 119
 120 /* Define VIRT_ADDR_VARIES if the virtual addresses of
 121    pure and impure space as loaded can vary, and even their
 122    relative order cannot be relied on.
 123
 124    Otherwise Emacs assumes that text space precedes data space,
 125    numerically.  */
 126
 127 /* #define VIRT_ADDR_VARIES */
 128
 129 /* Define C_ALLOCA if this machine does not support a true alloca
 130    and the one written in C should be used instead.
 131    Define HAVE_ALLOCA to say that the system provides a properly
 132    working alloca function and it should be used.
 133    Define neither one if an assembler-language alloca
 134    in the file alloca.s should be used.  */
 135
 136 /* #define C_ALLOCA */
 137 #define HAVE_ALLOCA
 138
 139 /* Define NO_REMAP if memory segmentation makes it not work well
 140    to change the boundary between the text section and data section
 141    when Emacs is dumped.  If you define this, the preloaded Lisp
 142    code will not be sharable; but that's better than failing completely.  */
 143
 144 /* #define NO_REMAP */
 145
 146 /* There is an inconsistency between the sgi assembler, linker which barfs
 147    on these. */
 148
 149 #define internal_with_output_to_temp_buffer     stupid_long_name1
 150 #define Finsert_abbrev_table_description        stupid_long_name2