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

   1 /* machine description file for HLH Orion 1/05 (Clipper).
   2    Copyright (C) 1985 Free Software Foundation, Inc.
   3    Lee McLoughlin <lmjm%doc.imperial.ac.uk@nss.cs.ucl.ac.uk>
   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 2, 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, Inc., 51 Franklin Street, Fifth Floor,
  20 Boston, MA 02110-1301, USA.  */
  21
  22
  23 /* The following line tells the configuration script what sort of
  24    operating system this machine is likely to run.
  25    USUAL-OPSYS="bsd4-2"  */
  26
  27 /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word
  28    is the most significant byte.  */
  29
  30 #undef WORDS_BIG_ENDIAN
  31
  32 /* Define NO_ARG_ARRAY if you cannot take the address of the first of a
  33  * group of arguments and treat it as an array of the arguments.  */
  34
  35 #define NO_ARG_ARRAY
  36
  37 /* Define WORD_MACHINE if addresses and such have
  38  * to be corrected before they can be used as byte counts.  */
  39
  40 /* Use type int rather than a union, to represent Lisp_Object */
  41 /* This is desirable for most machines.  */
  42
  43 #define NO_UNION_TYPE
  44
  45 /* Data type of load average, as read out of kmem.  */
  46 /* This used to be `double'.  */
  47
  48 #define LOAD_AVE_TYPE long
  49
  50 /* Convert that into an integer that is 100 for a load average of 1.0  */
  51
  52 /* This used to be 1.0.  */
  53 #ifndef FSCALE
  54 #define FSCALE 256
  55 #endif
  56 #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE)
  57
  58 /* HLH have a SIGWINCH defined (but unimplemented) so we need a sigmask */
  59 #ifndef sigmask
  60 #define sigmask(m) (1 << ((m) - 1))
  61 #endif
  62
  63 /* Here is where programs actually start running */
  64 #define TEXT_START 0x8000
  65 #define LD_TEXT_START_ADDR 8000
  66
  67 /* Arguments to ignore before argc in crt0.c.  */
  68 #define DUMMIES dummy1, dummy2,
  69
  70 /* arch-tag: 32fed6e3-8cae-4882-b327-a68c2af6db7a
  71    (do not change this comment) */