src/s/irix6-5.h

   1 /* Definitions file for GNU Emacs running on Silicon Graphics Irix system 6.5.
   2
   3 Copyright (C) 1999-2012  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 SETUP_SLAVE_PTY
  30 #undef SETUP_SLAVE_PTY
  31 #endif
  32
  33 /* thomas@mathematik.uni-bremen.de says this is needed.  */
  34 /* Make process_send_signal work by "typing" a signal character on the pty.  */
  35 #define SIGNALS_VIA_CHARACTERS
  36
  37 /* Letter to use in finding device name of first pty,
  38    if system supports pty's.  'a' means it is /dev/ptya0  */
  39 #undef FIRST_PTY_LETTER
  40 #define FIRST_PTY_LETTER 'q'
  41
  42 /* No need to use sprintf to get the tty name--we get that from _getpty.  */
  43 #define PTY_TTY_NAME_SPRINTF
  44 /* No need to get the pty name at all.  */
  45 #ifdef PTY_NAME_SPRINTF
  46 #undef PTY_NAME_SPRINTF
  47 #endif
  48 #define PTY_NAME_SPRINTF
  49 #ifdef emacs
  50 char *_getpty();
  51 #endif
  52 /* We need only try once to open a pty.  */
  53 #define PTY_ITERATION
  54 /* Here is how to do it.  */
  55 #define PTY_OPEN                                            \
  56 {                                                           \
  57   struct sigaction ocstat, cstat;                           \
  58   struct stat stb;                                          \
  59   char * name;                                              \
  60   sigemptyset(&cstat.sa_mask);                              \
  61   cstat.sa_handler = SIG_DFL;                               \
  62   cstat.sa_flags = 0;                                       \
  63   sigaction(SIGCLD, &cstat, &ocstat);                       \
  64   name = _getpty (&fd, O_RDWR | O_NDELAY, 0600, 0);         \
  65   sigaction(SIGCLD, &ocstat, (struct sigaction *)0);        \
  66   if (name == 0)                                            \
  67     return -1;                                              \
  68   if (fd < 0)                                               \
  69     return -1;                                              \
  70   if (fstat (fd, &stb) < 0)                                 \
  71     return -1;                                              \
  72   strcpy (pty_name, name);                                  \
  73 }
  74
  75 /* Ulimit(UL_GMEMLIM) is busted...  */
  76 #define ULIMIT_BREAK_VALUE 0x14000000
  77
  78 /* Tell process_send_signal to use VSUSP instead of VSWTCH.  */
  79 #define PREFER_VSUSP
  80
  81 #define NARROWPROTO 1
  82
  83 #undef SA_RESTART
  84
  85 #undef TIOCSIGSEND              /* defined in usg5-4-common.h */
  86
  87 /* Tested on Irix 6.5.  SCM worked on earlier versions.  */
  88 #define GC_SETJMP_WORKS 1
  89
  90
  91 /* DATA_SEG_BITS forces extra bits to be or'd in with any pointers which
  92    were stored in a Lisp_Object (as Emacs uses fewer than 32 bits for
  93    the value field of a LISP_OBJECT).  */
  94 #define DATA_START 0x10000000
  95 #define DATA_SEG_BITS   0x10000000