src/m/mips-siemens.h

   1 /* m- file for Mips machines.
   2    Copyright (C) 1987, 1992, 1993, 1995 Free Software Foundation, Inc.
   3
   4    This file contains some changes for our SVR4 based SINIX-Mips 5.4.
   5    I hope this is helpful to port the emacs to our RM?00 series and
   6    maybe to the DC/OSx (Mips-based) machines of Pyramid Inc.
   7      (Marco.Walther@mch.sni.de)
   8
   9 This file is part of GNU Emacs.
  10
  11 GNU Emacs is free software; you can redistribute it and/or modify
  12 it under the terms of the GNU General Public License as published by
  13 the Free Software Foundation; either version 2, or (at your option)
  14 any later version.
  15
  16 GNU Emacs is distributed in the hope that it will be useful,
  17 but WITHOUT ANY WARRANTY; without even the implied warranty of
  18 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19 GNU General Public License for more details.
  20
  21 You should have received a copy of the GNU General Public License
  22 along with GNU Emacs; see the file COPYING.  If not, write to
  23 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  24 Boston, MA 02111-1307, USA.  */
  25
  26
  27 /* The following line tells the configuration script what sort of
  28    operating system this machine is likely to run.
  29    USUAL-OPSYS="note"
  30
  31 NOTE-START
  32 Use m-mips4.h for RISCOS version 4; use s-bsd4-3.h with the BSD world.
  33 Note that the proper m- file for the Decstation is m-pmax.h.
  34 This is the m- file for SNI RM*00 machines. Use s- sinix5-4.h file!
  35 With this the file mips-siemens.h is obsolete.
  36 NOTE-END  */
  37
  38 /* Define BIG_ENDIAN iff lowest-numbered byte in a word
  39    is the most significant byte.  */
  40
  41 #define BIG_ENDIAN
  42
  43 /* Define NO_ARG_ARRAY if you cannot take the address of the first of a
  44  * group of arguments and treat it as an array of the arguments.  */
  45
  46 #define NO_ARG_ARRAY
  47
  48 /* Define WORD_MACHINE if addresses and such have
  49  * to be corrected before they can be used as byte counts.  */
  50
  51 #undef WORD_MACHINE
  52
  53 /* Define how to take a char and sign-extend into an int.
  54    On machines where char is signed, this is a no-op.  */
  55
  56 #define SIGN_EXTEND_CHAR(c) ((signed char)(c))
  57
  58 /* Now define a symbol for the cpu type, if your compiler
  59    does not define it automatically:
  60    Ones defined so far include vax, m68000, ns16000, pyramid,
  61    orion, tahoe, APOLLO and many others */
  62 #ifndef mips
  63 #       define mips
  64 #endif
  65
  66 /* Use type int rather than a union, to represent Lisp_Object */
  67 /* This is desirable for most machines.  */
  68
  69 #define NO_UNION_TYPE
  70
  71 /* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend
  72    the 24-bit bit field into an int.  In other words, if bit fields
  73    are always unsigned.
  74
  75    If you use NO_UNION_TYPE, this flag does not matter.  */
  76
  77 #define EXPLICIT_SIGN_EXTEND
  78
  79 /* Data type of load average, as read out of kmem.  */
  80
  81 #define LOAD_AVE_TYPE long
  82
  83 /* Convert that into an integer that is 100 for a load average of 1.0  */
  84
  85 #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / 256.0)
  86
  87 /* CDC EP/IX 1.4.3 uses /unix */
  88
  89 #undef KERNEL_FILE
  90 #define KERNEL_FILE "/unix"
  91
  92 /* Define CANNOT_DUMP on machines where unexec does not work.
  93    Then the function dump-emacs will not be defined
  94    and temacs will do (load "loadup") automatically unless told otherwise.  */
  95
  96 #undef CANNOT_DUMP
  97
  98 /* Define VIRT_ADDR_VARIES if the virtual addresses of
  99    pure and impure space as loaded can vary, and even their
 100    relative order cannot be relied on.
 101
 102    Otherwise Emacs assumes that text space precedes data space,
 103    numerically.  */
 104
 105 /* #define VIRT_ADDR_VARIES */
 106
 107 /* Define C_ALLOCA if this machine does not support a true alloca
 108    and the one written in C should be used instead.
 109    Define HAVE_ALLOCA to say that the system provides a properly
 110    working alloca function and it should be used.
 111    Define neither one if an assembler-language alloca
 112    in the file alloca.s should be used.  */
 113
 114 #ifdef __GNUC__
 115 #define HAVE_ALLOCA
 116 #else
 117 #define C_ALLOCA
 118 #endif
 119
 120 /* Define NO_REMAP if memory segmentation makes it not work well
 121    to change the boundary between the text section and data section
 122    when Emacs is dumped.  If you define this, the preloaded Lisp
 123    code will not be sharable; but that's better than failing completely.  */
 124
 125 #define NO_REMAP
 126
 127 /* Describe layout of the address space in an executing process.  */
 128 /* MARCO ???
 129 */
 130 #define TEXT_START 0x400000
 131 /*
 132 #define DATA_START 0x10000000
 133 #define DATA_SEG_BITS   0x10000000
 134 */
 135 #ifdef UNEXEC
 136 #undef UNEXEC
 137 #endif
 138 #define UNEXEC unexsni.o
 139
 140 #undef ORDINARY_LINK
 141
 142 #undef LIBS_DEBUG
 143
 144 /* Alter some of the options used when linking.  */
 145
 146 #define LIBS_MACHINE -lmld
 147 #define START_FILES pre-crt0.o /usr/ccs/lib/crt1.o /usr/ccs/lib/crti.o /usr/ccs/lib/values-Xt.o
 148
 149 #ifdef LIB_STANDARD
 150 #undef LIB_STANDARD
 151 #endif
 152 #define LIB_STANDARD -lc /usr/ccs/lib/crtn.o
 153
 154 #ifdef __GNUC__
 155 #define C_DEBUG_SWITCH
 156 #define LD_SWITCH_MACHINE
 157 #else
 158 #define C_DEBUG_SWITCH -DSYSV
 159 #define C_OPTIMIZE_SWITCH -DSYSV
 160 #define LD_SWITCH_MACHINE
 161 #endif
 162
 163 #if defined(HAVE_X_WINDOWS) && defined(HAVE_X11)
 164 #define HAVE_VFORK              /* Graciously provided by libX.a */
 165 #endif
 166
 167 \f
 168 /* The standard definitions of these macros would work ok,
 169    but these are faster because the constants are short.  */
 170
 171 #define XUINT(a) (((unsigned)(a) << (BITS_PER_INT-VALBITS)) >> (BITS_PER_INT-VALBITS))
 172
 173 #define XSET(var, type, ptr)                                            \
 174   ((var) =                                                              \
 175    ((int)(type) << VALBITS)                                             \
 176    + (((unsigned) (ptr) << (BITS_PER_INT-VALBITS)) >> (BITS_PER_INT-VALBITS)))
 177
 178 #define XSETINT(a, b)  XSET(a, XTYPE(a), b)
 179 #define XSETUINT(a, b) XSET(a, XTYPE(a), b)
 180 #define XSETPNTR(a, b) XSET(a, XTYPE(a), b)
 181
 182 #define XUNMARK(a)                                                      \
 183   ((a) =                                                                \
 184    (((unsigned)(a) << (BITS_PER_INT-GCTYPEBITS-VALBITS))                \
 185     >> (BITS_PER_INT-GCTYPEBITS-VALBITS)))
 186