view src/s/irix4-0.h @ 6756:8086a2590e2f

* etags.c (outf, outfiledir): renamed to tagf, tagfiledir. (PF_funcs, Asm_funcs, L_funcs, PAS_funcs, TEX_funcs, Scheme_funcs, prolog_funcs): renamed to Fortran_functions, Asm_labels, Lisp_functions, Pascal_functions, Scheme_functions, TeX_functions, Prolog_functions. (inf): no more a global variable. (C_entries): take 2nd parameter `inf' instead of using the global one. (find_entries): added the cp1 var for optimisation. (find_entries): added more suffixes for assembler files. (Asm_funcs): Now finds labels even without an ending colon.

#include "irix3-3.h"

#define USG5_3
#define IRIX4

#define HAVE_ALLOCA
#ifndef NOT_C_CODE
#include <alloca.h>
#endif

#undef IRIS_UTIME
#undef NEED_SIOCTL

/* Make process_send_signal work by "typing" a signal character on the pty.  */
#define SIGNALS_VIA_CHARACTERS

/* use K&R C */
#ifndef __GNUC__
#define C_SWITCH_MACHINE -cckr
#endif

/* SGI has all the fancy wait stuff, but we can't include sys/wait.h
   because it defines BIG_ENDIAN and LITTLE_ENDIAN (ugh!.)  Instead
   we'll just define WNOHANG right here.
   (An implicit decl is good enough for wait3.)  */

#define WNOHANG		0x1

/* No need to use sprintf to get the tty name--we get that from _getpty.  */
#undef PTY_TTY_NAME_SPRINTF
#define PTY_TTY_NAME_SPRINTF
/* No need to get the pty name at all.  */
#define PTY_NAME_SPRINTF
/* We need only try once to open a pty.  */
#define PTY_ITERATION
/* Here is how to do it.  */
/* It is necessary to prevent SIGCHLD signals within _getpty.
   So we block them. */
#define PTY_OPEN						\
{								\
  int mask = sigblock (sigmask (SIGCHLD));			\
  char *name = _getpty (&fd, O_RDWR | O_NDELAY, 0600, 0);	\
  sigsetmask(mask);						\
  if (name == 0)						\
    return -1;							\
  if (fd < 0)							\
    return -1;							\
  if (fstat (fd, &stb) < 0)					\
    return -1;							\
  strcpy (pty_name, name);					\
}

/* [e-mail] reports `struct exception' is not defined
   on this system, so inhibit use of matherr.  */
#define NO_MATHERR