src/m/ibms390x.h

   1 /* Machine description file for IBM S390 in 64-bit mode
   2
   3 Copyright (C) 2002-2011  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 3 of the License, or
  10 (at your option) 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.  If not, see <http://www.gnu.org/licenses/>.  */
  19
  20 #include "ibms390.h"
  21
  22 #define BITS_PER_LONG 64
  23 #define BITS_PER_EMACS_INT 64
  24
  25 /* Define the type to use.  */
  26 #define EMACS_INT long
  27 #define pI "l"
  28 #define EMACS_UINT unsigned long
  29
  30 /* On the 64 bit architecture, we can use 60 bits for addresses */
  31 #define VALBITS         60
  32
  33 /* Define XPNTR to avoid or'ing with DATA_SEG_BITS */
  34 #define XPNTR(a) XUINT (a)