git.chise.org Git - chise/xemacs-chise.git.1/blob - src/m/pfa50.h

   1 /* Machine description file for PFU A-series.
   2    Copyright (C) 1988 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 XEmacs; see the file COPYING.  If not, write to
  18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  19 Boston, MA 02111-1307, USA.  */
  20
  21 /* Synched up with: FSF 19.31. */
  22
  23 /* Say this machine is a 68000 */
  24
  25 #define m68000
  26 #define mc68000 1
  27
  28 /* XINT must explicitly sign-extend */
  29
  30 #define EXPLICIT_SIGN_EXTEND
  31
  32 /* Define NO_REMAP if memory segmentation makes it not work well
  33    to change the boundary between the text section and data section
  34    when Emacs is dumped.  If you define this, the preloaded Lisp
  35    code will not be sharable; but that's better than failing completely.  */
  36
  37 #define NO_REMAP
  38
  39 /* Define TEXT_START_ADDR if your linker don't set execute point to _start.
  40    If it needed, temacs always CORE-DUMP.       */
  41
  42 #define TEXT_START_ADDR __start
  43
  44 /* Define START_FILES if your machine used _start.
  45  */
  46
  47 #define START_FILES "crt0.o"
  48
  49 /* Define LD_SWITCH_MACHINE if your linker needs it.
  50  */
  51
  52 #define LD_SWITCH_MACHINE "-e __start"
  53
  54 #if     pfa50 || pfa70
  55
  56 /* On A-50/60/70/80, data space has high order byte use. */
  57 #define VALBITS 26
  58 #define VALMASK (((1<<VALBITS) - 1) | 0x60000000)
  59 /* XEmacs: markbit is between type bits and value bits */
  60 /* #define XTYPE(a) ((enum Lisp_Type) (((a) >> VALBITS) & GCTYPEMASK)) */
  61 #define XTYPE(a) ((enum Lisp_Type) (((a) >> ((VALBITS) + 1)) & GCTYPEMASK))
  62
  63 #endif /* pfa50, pfa70 */
  64
  65 /* SX/A has alloca in the PW library.  */
  66
  67 #define LIB_STANDARD "-lPW -lc"
  68 #define HAVE_ALLOCA
  69
  70 /* SX/A uses terminfo and lib/curses   */
  71
  72 #define TERMINFO
  73
  74 #define HAVE_PTYS
  75
  76 /* SX/A use SystemV style getdents/readdir. */
  77
  78 #define NO_SIOCTL_H
  79
  80 #define BROKEN_SIGIO