Merge from mainline.
[bpt/emacs.git] / src / m / ibms390x.h
CommitLineData
cb4bfcb5 1/* Machine description file for IBM S390 in 64-bit mode
6a321bbc 2
73b0cd50 3Copyright (C) 2002-2011 Free Software Foundation, Inc.
3e5b698e
RS
4
5This file is part of GNU Emacs.
6
eb3d11ef 7GNU Emacs is free software: you can redistribute it and/or modify
3e5b698e 8it under the terms of the GNU General Public License as published by
eb3d11ef
GM
9the Free Software Foundation, either version 3 of the License, or
10(at your option) any later version.
3e5b698e
RS
11
12GNU Emacs is distributed in the hope that it will be useful,
13but WITHOUT ANY WARRANTY; without even the implied warranty of
14MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15GNU General Public License for more details.
16
17You should have received a copy of the GNU General Public License
eb3d11ef 18along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
3e5b698e 19
cb4bfcb5 20#include "ibms390.h"
3e5b698e 21
3e5b698e
RS
22#define BITS_PER_LONG 64
23#define BITS_PER_EMACS_INT 64
24
3e5b698e
RS
25/* Define the type to use. */
26#define EMACS_INT long
5fdb398c 27#define pEd "ld"
3e5b698e 28#define EMACS_UINT unsigned long
3e5b698e 29
3e5b698e 30/* On the 64 bit architecture, we can use 60 bits for addresses */
3e5b698e
RS
31#define VALBITS 60
32
3e5b698e 33/* Define XPNTR to avoid or'ing with DATA_SEG_BITS */
3e5b698e 34#define XPNTR(a) XUINT (a)