Merge from emacs-23; up to 2010-05-26T14:19:15Z!monnier@iro.umontreal.ca.
[bpt/emacs.git] / src / s / irix6-5.h
1 /* Definitions file for GNU Emacs running on Silicon Graphics Irix system 6.5.
2
3 Copyright (C) 1999-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
21 #define IRIX6_5 /* used in m/iris4d */
22 #include "usg5-4-common.h"
23
24 #undef _longjmp /* use system versions, not conservative aliases */
25 #undef _setjmp
26
27 #define SETPGRP_RELEASES_CTTY
28
29 #ifdef SYSTEM_TYPE
30 #undef SYSTEM_TYPE
31 #endif
32 #define SYSTEM_TYPE "irix"
33
34 #ifdef SETUP_SLAVE_PTY
35 #undef SETUP_SLAVE_PTY
36 #endif
37
38 /* thomas@mathematik.uni-bremen.de says this is needed. */
39 /* Make process_send_signal work by "typing" a signal character on the pty. */
40 #define SIGNALS_VIA_CHARACTERS
41
42 /* Letter to use in finding device name of first pty,
43 if system supports pty's. 'a' means it is /dev/ptya0 */
44 #undef FIRST_PTY_LETTER
45 #define FIRST_PTY_LETTER 'q'
46
47 /* No need to use sprintf to get the tty name--we get that from _getpty. */
48 #define PTY_TTY_NAME_SPRINTF
49 /* No need to get the pty name at all. */
50 #ifdef PTY_NAME_SPRINTF
51 #undef PTY_NAME_SPRINTF
52 #endif
53 #define PTY_NAME_SPRINTF
54 #ifdef emacs
55 char *_getpty();
56 #endif
57 /* We need only try once to open a pty. */
58 #define PTY_ITERATION
59 /* Here is how to do it. */
60 #define PTY_OPEN \
61 { \
62 struct sigaction ocstat, cstat; \
63 char * name; \
64 sigemptyset(&cstat.sa_mask); \
65 cstat.sa_handler = SIG_DFL; \
66 cstat.sa_flags = 0; \
67 sigaction(SIGCLD, &cstat, &ocstat); \
68 name = _getpty (&fd, O_RDWR | O_NDELAY, 0600, 0); \
69 sigaction(SIGCLD, &ocstat, (struct sigaction *)0); \
70 if (name == 0) \
71 return -1; \
72 if (fd < 0) \
73 return -1; \
74 if (fstat (fd, &stb) < 0) \
75 return -1; \
76 strcpy (pty_name, name); \
77 }
78
79 /* Ulimit(UL_GMEMLIM) is busted... */
80 #define ULIMIT_BREAK_VALUE 0x14000000
81
82 /* Tell process_send_signal to use VSUSP instead of VSWTCH. */
83 #define PREFER_VSUSP
84
85 #define NARROWPROTO 1
86
87 #if _MIPS_SZLONG == 64 /* -mabi=64 (gcc) or -64 (MIPSpro) */
88 #define _LP64 /* lisp.h takes care of the rest */
89 #endif /* _MIPS_SZLONG */
90
91 #undef SA_RESTART
92
93 #undef TIOCSIGSEND /* defined in usg5-4-common.h */
94
95 /* Tested on Irix 6.5. SCM worked on earlier versions. */
96 #define GC_SETJMP_WORKS 1
97 #define GC_MARK_STACK GC_MAKE_GCPROS_NOOPS
98
99