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

   1 /* machine description file for Iris-4D machines.  Use with s/iris[45]-*.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 2, 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 /* Now define a symbol for the cpu type, if your compiler
  46    does not define it automatically:
  47    Ones defined so far include vax, m68000, ns16000, pyramid,
  48    orion, tahoe, APOLLO and many others */
  49
  50 #ifndef mips
  51 #define mips
  52 #endif
  53
  54 #ifndef IRIS_4D
  55 #define IRIS_4D
  56 #endif
  57
  58 /* Use type int rather than a union, to represent Lisp_Object */
  59 /* This is desirable for most machines.  */
  60
  61 #define NO_UNION_TYPE
  62
  63 /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend
  64    the 24-bit bit field into an int.  In other words, if bit fields
  65    are always unsigned.
  66
  67    If you use NO_UNION_TYPE, this flag does not matter.  */
  68
  69 #define EXPLICIT_SIGN_EXTEND
  70
  71 /* jg@genmagic.genmagic.com (John Giannandrea) says this is unnecessary.  */
  72 #if 0
  73 /* Data type of load average, as read out of kmem.  */
  74
  75 #define LOAD_AVE_TYPE long      /* This doesn't quite work on the 4D */
  76
  77 /* Convert that into an integer that is 100 for a load average of 1.0  */
  78
  79 #define LOAD_AVE_CVT(x) (int)(((double)(x)*100)/1024.0)
  80
  81 /* s-iris3-6.h uses /vmunix */
  82
  83 #undef KERNEL_FILE
  84 #define KERNEL_FILE "/unix"
  85 #endif
  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 */  /* Sjoerd.Mullender@cwi.nl says no need.  */
 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 #ifdef USG5_4
 123 #undef UNEXEC
 124 #define UNEXEC unexelfsgi.o
 125 #else
 126 #define UNEXEC unexmips.o
 127 #endif
 128
 129 #define TEXT_START 0x400000
 130
 131 /*
 132  * DATA_SEG_BITS forces that bit to be or'd in with any pointers which
 133  * are trying to access pure strings (as gnu-emacs only allows 24 bits
 134  * for the value field of a LISP_OBJECT).
 135  */
 136
 137 #define DATA_START 0x10000000
 138 #define DATA_SEG_BITS   0x10000000
 139
 140 #undef LIBS_MACHINE
 141 /* -lsun in case using Yellow Pages for passwords.  */
 142 #define LIBS_MACHINE -lsun -lmld
 143 #define LIBS_DEBUG
 144
 145 /* Define this if you have a fairly recent system,
 146    in which crt1.o and crt1.n should be used.  */
 147 #define HAVE_CRTN
 148
 149 /* When you *do* link with -lbsd, you *still* get System V getpgrp, unless:
 150    you define _BSD_COMPAT, -or- you call `BSDgetpgrp' explicitly.
 151    Emacs does the latter.  */
 152
 153 #ifndef USG5_4
 154 #ifdef HAVE_CRTN
 155 /* Must define START-FILES so that the linker can find /usr/lib/crt0.o.  */
 156 #define START_FILES pre-crt0.o /usr/lib/crt1.o
 157 #define LIB_STANDARD -lc /usr/lib/crtn.o
 158 #else
 159 #define START_FILES pre-crt0.o /usr/lib/crt0.o
 160 /* The entry-point label (start of text segment) is `start', not `__start'.  */
 161 #define DEFAULT_ENTRY_ADDRESS start
 162 #define LIB_STANDARD -lc
 163 #endif
 164 #endif
 165 \f
 166 /* Use terminfo instead of termcap.  */
 167
 168 #define TERMINFO
 169
 170 /* Letter to use in finding device name of first pty,
 171   if system supports pty's.  'a' means it is /dev/ptya0  */
 172
 173 #undef FIRST_PTY_LETTER
 174 #define FIRST_PTY_LETTER 'q'
 175
 176 /* Define STACK_DIRECTION for alloca.c */
 177
 178 #define STACK_DIRECTION -1
 179 \f
 180 /* The standard definitions of these macros would work ok,
 181    but these are faster because the constants are short.  */
 182
 183 #define XUINT(a) (((unsigned)(a) << INTBITS-VALBITS) >> INTBITS-VALBITS)
 184
 185 #define XSET(var, type, ptr) \
 186    ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << INTBITS-VALBITS) >> INTBITS-VALBITS))
 187
 188 #define XSETINT(a, b)  XSET(a, XTYPE(a), b)
 189 #define XSETUINT(a, b) XSET(a, XTYPE(a), b)
 190 #define XSETPNTR(a, b) XSET(a, XTYPE(a), b)
 191
 192 #define XMARKBIT(a) ((a) < 0)
 193 #define XSETMARKBIT(a,b) ((a) = ((a) & ~MARKBIT) | ((b) ? MARKBIT : 0))
 194 #define XUNMARK(a) ((a) = (((unsigned)(a) << INTBITS-GCTYPEBITS-VALBITS) >> INTBITS-GCTYPEBITS-VALBITS))
 195
 196 #ifndef __GNUC__
 197 /* Turn off some "helpful" error checks for type mismatches
 198    that we can't fix without breaking other machines.  */
 199 #define C_SWITCH_MACHINE -cckr
 200 #endif