[bpt/emacs.git] / src / m / iris4d.h

/* machine description file for Iris-4D machines.  Use with s/irix*.h.
   Copyright (C) 1987, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
                 2008, 2009, 2010  Free Software Foundation, Inc.

This file is part of GNU Emacs.

GNU Emacs is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.

GNU Emacs is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.  */


/* Define WORDS_BIG_ENDIAN if lowest-numbered byte in a word
   is the most significant byte.  */

#define WORDS_BIG_ENDIAN

/* Define NO_ARG_ARRAY if you cannot take the address of the first of a
 * group of arguments and treat it as an array of the arguments.  */

#define NO_ARG_ARRAY

/* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend
   the bit field into an int.  In other words, if bit fields
   are always unsigned.

   This flag only matters if you use USE_LISP_UNION_TYPE.  */

#define EXPLICIT_SIGN_EXTEND

/* This machine requires completely different unexec code
   which lives in a separate file.  Specify the file name.  */

#undef UNEXEC
#define UNEXEC unexelf.o

#define TEXT_START 0x400000

/*
 * DATA_SEG_BITS forces extra bits to be or'd in with any pointers which
 * were stored in a Lisp_Object (as Emacs uses fewer than 32 bits for
 * the value field of a LISP_OBJECT).
 */

#define DATA_START 0x10000000
#define DATA_SEG_BITS	0x10000000

#undef LIBS_MACHINE
#define LIBS_MACHINE
#define LIBS_DEBUG
\f
/* Use terminfo instead of termcap.  */

#define TERMINFO

/* Letter to use in finding device name of first pty,
  if system supports pty's.  'a' means it is /dev/ptya0  */

#undef FIRST_PTY_LETTER
#define FIRST_PTY_LETTER 'q'
\f
#if _MIPS_SZLONG != 64
/* fixme: should there be 64-bit definitions?  (The ones below aren't OK.)  */

/* The standard definitions of these macros would work ok,
   but these are faster because the constants are short.  */

#define XUINT(a) (((unsigned)(a) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS)

#define XSET(var, type, ptr) \
   ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS))
#endif /* _LP64 */

/* arch-tag: fff5e139-9ae0-465d-afec-837c41ea0aa6
   (do not change this comment) */
Commit	Line	Data
5c3c0887	1	/* machine description file for Iris-4D machines. Use with s/irix*.h.
eb3d11ef	2	Copyright (C) 1987, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
114f9c96	3	2008, 2009, 2010 Free Software Foundation, Inc.
20c428fd JB	4
	5	This file is part of GNU Emacs.
	6
eb3d11ef	7	GNU Emacs is free software: you can redistribute it and/or modify
20c428fd	8	it under the terms of the GNU General Public License as published by
eb3d11ef GM	9	the Free Software Foundation, either version 3 of the License, or
eb3d11ef GM	10	(at your option) any later version.
20c428fd JB	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
eb3d11ef	18	along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
20c428fd JB	19
20c428fd JB	20
22e9fe24	21	/* Define WORDS_BIG_ENDIAN if lowest-numbered byte in a word
74d3f806 KH	22	is the most significant byte. */
	23
	24	#define WORDS_BIG_ENDIAN
	25
20c428fd JB	26	/* Define NO_ARG_ARRAY if you cannot take the address of the first of a
	27	* group of arguments and treat it as an array of the arguments. */
	28
	29	#define NO_ARG_ARRAY
	30
20c428fd	31	/* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend
aa24c41b	32	the bit field into an int. In other words, if bit fields
20c428fd JB	33	are always unsigned.
20c428fd JB	34
6e5cb96f	35	This flag only matters if you use USE_LISP_UNION_TYPE. */
20c428fd JB	36
	37	#define EXPLICIT_SIGN_EXTEND
	38
20c428fd JB	39	/* This machine requires completely different unexec code
	40	which lives in a separate file. Specify the file name. */
	41
b2fe4ec6	42	#undef UNEXEC
2bf57b13	43	#define UNEXEC unexelf.o
20c428fd JB	44
	45	#define TEXT_START 0x400000
	46
	47	/*
aa24c41b KH	48	* DATA_SEG_BITS forces extra bits to be or'd in with any pointers which
	49	* were stored in a Lisp_Object (as Emacs uses fewer than 32 bits for
	50	* the value field of a LISP_OBJECT).
20c428fd JB	51	*/
	52
	53	#define DATA_START 0x10000000
	54	#define DATA_SEG_BITS 0x10000000
	55
	56	#undef LIBS_MACHINE
42f30377	57	#define LIBS_MACHINE
20c428fd	58	#define LIBS_DEBUG
20c428fd JB	59	\f
	60	/* Use terminfo instead of termcap. */
	61
	62	#define TERMINFO
	63
20c428fd JB	64	/* Letter to use in finding device name of first pty,
	65	if system supports pty's. 'a' means it is /dev/ptya0 */
	66
	67	#undef FIRST_PTY_LETTER
	68	#define FIRST_PTY_LETTER 'q'
20c428fd	69	\f
149f3ffd	70	#if _MIPS_SZLONG != 64
723f3a23	71	/* fixme: should there be 64-bit definitions? (The ones below aren't OK.) */
149f3ffd	72
20c428fd JB	73	/* The standard definitions of these macros would work ok,
	74	but these are faster because the constants are short. */
	75
5964b664	76	#define XUINT(a) (((unsigned)(a) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS)
20c428fd JB	77
20c428fd JB	78	#define XSET(var, type, ptr) \
5964b664	79	((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS))
a6616745	80	#endif /* _LP64 */
23b0668c	81
ab5796a9 MB	82	/* arch-tag: fff5e139-9ae0-465d-afec-837c41ea0aa6
ab5796a9 MB	83	(do not change this comment) */