Attachment #109829: files/emacs-18.59-gcc4.patch for bug #44766

2004-03-09  Ulrich Mueller  <ulm@kph.uni-mainz.de>

2004-03-09  Ulrich Mueller  <ulm@kph.uni-mainz.de>

	* malloc.c (DONT_DEFINE_SIGNAL): Defined.

	* malloc.c (DONT_DEFINE_SIGNAL): Defined.

	  mark_object (&ptr->contents[i]);

	  mark_object (&ptr->contents[i]);

      }

      }

      break;

      break;

    case Lisp_Symbol:

    case Lisp_Symbol:

      {

      {

	}

	}

  }

  }

  /* Free all unmarked vectors */

  /* Free all unmarked vectors */

  {

  {

    return XBUFFER (buffer)->number;

    return XBUFFER (buffer)->number;

  }

  }

 */

 */

DEFUN ("buffer-file-name", Fbuffer_file_name, Sbuffer_file_name, 0, 1, 0,

DEFUN ("buffer-file-name", Fbuffer_file_name, Sbuffer_file_name, 0, 1, 0,

  "Return name of file BUFFER is visiting, or NIL if none.\n\

  "Return name of file BUFFER is visiting, or NIL if none.\n\

#ifdef subprocesses

#ifdef subprocesses

  kill_buffer_processes (buf);

  kill_buffer_processes (buf);

  tem = Vinhibit_quit;

  tem = Vinhibit_quit;

  Vinhibit_quit = Qt;

  Vinhibit_quit = Qt;

/* This must precede sys/signal.h on certain machines.  */

/* This must precede sys/signal.h on certain machines.  */

#include <sys/types.h>

#include <sys/types.h>

#include <signal.h>

#include <signal.h>

#include "config.h"

#include "config.h"

    {

    {

#ifndef subprocesses

#ifndef subprocesses

      wait_without_blocking ();

      wait_without_blocking ();

      return Qnil;

      return Qnil;

    }

    }

#ifdef vipc

#ifdef vipc

  something missing here;

  something missing here;

  /* execvp does not accept an environment arg so the only way

  /* execvp does not accept an environment arg so the only way

     to pass this environment is to set environ.  Our caller

     to pass this environment is to set environ.  Our caller

{

{

#ifndef COMPILER_REGISTER_BUG

#ifndef COMPILER_REGISTER_BUG

  register

  register

    struct window *w = XWINDOW (selected_window);

    struct window *w = XWINDOW (selected_window);

#ifndef COMPILER_REGISTER_BUG

#ifndef COMPILER_REGISTER_BUG

  register

  register

    int hpos = cursor_hpos;

    int hpos = cursor_hpos;

#ifndef COMPILER_REGISTER_BUG

#ifndef COMPILER_REGISTER_BUG

  register

  register

    int vpos = cursor_vpos;

    int vpos = cursor_vpos;

  /* Give up if about to continue line */

  /* Give up if about to continue line */

#include <stdio.h>

#include <stdio.h>

#include <ctype.h>

#include <ctype.h>

doprnt (buffer, bufsize, format, nargs, args)

doprnt (buffer, bufsize, format, nargs, args)

     char *buffer;

     char *buffer;

    return Qnil;

    return Qnil;

  return build_string (val);

  return build_string (val);

}

}

void

void

syms_of_editfns ()

syms_of_editfns ()

#ifdef HIGHPRI

#ifdef HIGHPRI

  setpriority (PRIO_PROCESS, getpid (), HIGHPRI);

  setpriority (PRIO_PROCESS, getpid (), HIGHPRI);

  setuid (getuid ());

  setuid (getuid ());

  inhibit_window_system = 0;

  inhibit_window_system = 0;

#endif

#endif

#ifdef SIGXFSZ

#ifdef SIGXFSZ

      signal (SIGXFSZ, fatal_error_signal);

      signal (SIGXFSZ, fatal_error_signal);

#ifdef AIX

#ifdef AIX

      /* This used to run fatal_error_signal,

      /* This used to run fatal_error_signal,

      syms_of_alloc ();

      syms_of_alloc ();

#ifdef MAINTAIN_ENVIRONMENT

#ifdef MAINTAIN_ENVIRONMENT

      syms_of_environ ();

      syms_of_environ ();

      syms_of_read ();

      syms_of_read ();

      syms_of_print ();

      syms_of_print ();

      syms_of_eval ();

      syms_of_eval ();

#define sighold(SIG)     ONLY_USED_IN_BSD_4_1

#define sighold(SIG)     ONLY_USED_IN_BSD_4_1

#define sigrelse(SIG)    ONLY_USED_IN_BSD_4_1

#define sigrelse(SIG)    ONLY_USED_IN_BSD_4_1

int sys_sigpause (sigset_t new_mask);

int sys_sigpause (sigset_t new_mask);

sigset_t sys_sigblock (sigset_t new_mask);

sigset_t sys_sigblock (sigset_t new_mask);

sigset_t sys_sigunblock (sigset_t new_mask);

sigset_t sys_sigunblock (sigset_t new_mask);

	  if (o == target + 1 && o[-1] == '/' && o[0] == '/')

	  if (o == target + 1 && o[-1] == '/' && o[0] == '/')

	    ++o;

	    ++o;

	  else

	  else

	  if (o == target && *o == '/')

	  if (o == target && *o == '/')

	    ++o;

	    ++o;

	  p += 3;

	  p += 3;

  (arg)

  (arg)

     Lisp_Object arg;

     Lisp_Object arg;

{

{

  extern long time ();

  extern long time ();

  if (EQ (arg, Qt))

  if (EQ (arg, Qt))

extern void debugger ();

extern void debugger ();

extern long *xmalloc (), *xrealloc ();

extern long *xmalloc (), *xrealloc ();

#ifdef MAINTAIN_ENVIRONMENT

#ifdef MAINTAIN_ENVIRONMENT

     Lisp_Object stream;

     Lisp_Object stream;

{

{

  fclose (*(FILE **) XSTRING (stream));

  fclose (*(FILE **) XSTRING (stream));

  if (--load_in_progress < 0) load_in_progress = 0;

  if (--load_in_progress < 0) load_in_progress = 0;

  return Qnil;

  return Qnil;

}

}

  return Qnil;

  return Qnil;

}

}

DEFUN ("read", Fread, Sread, 0, 1, 0,

DEFUN ("read", Fread, Sread, 0, 1, 0,

  "Read one Lisp expression as text from STREAM, return as Lisp object.\n\

  "Read one Lisp expression as text from STREAM, return as Lisp object.\n\

  sym = intern (string);

  sym = intern (string);

  XSET (XSYMBOL (sym)->function, Lisp_Subr, sname);

  XSET (XSYMBOL (sym)->function, Lisp_Subr, sname);

}

}

/* New replacement for DefIntVar; it ignores the doc string argument

/* New replacement for DefIntVar; it ignores the doc string argument

   on the assumption that make-docfile will handle that.  */

   on the assumption that make-docfile will handle that.  */

    abort ();

    abort ();

}

}

init_read ()

init_read ()

{

{

static void getpool ();

static void getpool ();

/* Cause reinitialization based on job parameters;

/* Cause reinitialization based on job parameters;

  also declare where the end of pure storage is. */

  also declare where the end of pure storage is. */

void

void

    }

    }

}

}

malloc (n)		/* get a block */

malloc (n)		/* get a block */

     unsigned n;

     unsigned n;

{

{

  return (char *) p + ((sizeof *p + 7) & ~7);

  return (char *) p + ((sizeof *p + 7) & ~7);

}

}

free (mem)

free (mem)

{

{

  register struct mhead *p;

  register struct mhead *p;

  {

  {

    if (p -> mh_alloc != ISALLOC)

    if (p -> mh_alloc != ISALLOC)

      abort ();

      abort ();

    if (p -> mh_alloc != ISALLOC)

    if (p -> mh_alloc != ISALLOC)

      {

      {

	if (p -> mh_alloc == ISFREE)

	if (p -> mh_alloc == ISFREE)

  }

  }

}

}

realloc (mem, n)

realloc (mem, n)

     register unsigned n;

     register unsigned n;

{

{

  register struct mhead *p;

  register struct mhead *p;

/* This is in case something linked with Emacs calls calloc.  */

/* This is in case something linked with Emacs calls calloc.  */

calloc (num, size)

calloc (num, size)

     unsigned num, size;

     unsigned num, size;

{

{

/* This is in case something linked with Emacs calls cfree.  */

/* This is in case something linked with Emacs calls cfree.  */

cfree (mem)

cfree (mem)

{

{

  return free (mem);

  return free (mem);

}

}

#ifndef HPUX

#ifndef HPUX

/* This runs into trouble with getpagesize on HPUX.

/* This runs into trouble with getpagesize on HPUX.

   Patching out seems cleaner than the ugly fix needed.  */

   Patching out seems cleaner than the ugly fix needed.  */

{

{

  return memalign (getpagesize (), size);

  return memalign (getpagesize (), size);

}

}

  XSETINT (to, XINT (to) + XINT (from));

  XSETINT (to, XINT (to) + XINT (from));

  return Fsubstring (string, from, to);

  return Fsubstring (string, from, to);

}

}

DEFUN ("insert-string", Finsert_string, Sinsert_string, 0, MANY, 0,

DEFUN ("insert-string", Finsert_string, Sinsert_string, 0, MANY, 0,

  "Mocklisp-compatibility insert function.\n\

  "Mocklisp-compatibility insert function.\n\

Like the function `insert' except that any argument that is a number\n\

Like the function `insert' except that any argument that is a number\n\

  while (1)

  while (1)

    {

    {

      /* Continue if successeful.  */

      /* Continue if successeful.  */

      if (value != -1)

      if (value != -1)

	break;

	break;

  int xerrno;

  int xerrno;

  Lisp_Object proc;

  Lisp_Object proc;

#ifdef HAVE_TIMEVAL

#ifdef HAVE_TIMEVAL

#else

#else

  long timeout, end_time, temp;

  long timeout, end_time, temp;

#endif /* not HAVE_TIMEVAL */

#endif /* not HAVE_TIMEVAL */

#ifndef NFAILURES

#ifndef NFAILURES

#define NFAILURES 80

#define NFAILURES 80

/* width of a byte in bits */

/* width of a byte in bits */

	      PATFETCH (c);

	      PATFETCH (c);

	      PATPUSH (syntax_spec_code[c]);

	      PATPUSH (syntax_spec_code[c]);

	      break;

	      break;

	    case 'w':

	    case 'w':

	      laststart = b;

	      laststart = b;

	    if (SYNTAX (j) != (enum syntaxcode) k)

	    if (SYNTAX (j) != (enum syntaxcode) k)

	      fastmap[j] = 1;

	      fastmap[j] = 1;

	  break;

	  break;

	case charset:

	case charset:

	  for (j = *p++ * BYTEWIDTH - 1; j >= 0; j--)

	  for (j = *p++ * BYTEWIDTH - 1; j >= 0; j--)

	  PREFETCH;

	  PREFETCH;

	  if (SYNTAX (*d++) != 0) goto fail;

	  if (SYNTAX (*d++) != 0) goto fail;

	  break;

	  break;

	case begbuf:

	case begbuf:

	  if (d == string1)	/* Note, d cannot equal string2 */

	  if (d == string1)	/* Note, d cannot equal string2 */

  exit (1);

  exit (1);

}

}

/* Special hacks needed to make Emacs run on this system.  */

/* Special hacks needed to make Emacs run on this system.  */

/* On USG systems the system calls are interruptable by signals

/* On USG systems the system calls are interruptable by signals

 that the user program has elected to catch.  Thus the system call

 that the user program has elected to catch.  Thus the system call

 must be retried in these cases.  To handle this without massive

 must be retried in these cases.  To handle this without massive

#define MAXNAMLEN NAME_MAX	/* missing SYSV-ism */

#define MAXNAMLEN NAME_MAX	/* missing SYSV-ism */

#endif

#endif

#define SIGSYS SIGUNUSED	/* rename to harmless work-alike */

#define SIGSYS SIGUNUSED	/* rename to harmless work-alike */

#define VSWTCH VSWTC		/* mis-spelling in termios.h? */

#define VSWTCH VSWTC		/* mis-spelling in termios.h? */

#define C_COMPILER gcc

#define C_COMPILER gcc

#define C_DEBUG_SWITCH -g

#define C_DEBUG_SWITCH -g

#define OLDXMENU_OPTIONS CFLAGS=-O2 EXTRA=insque.o

#define OLDXMENU_OPTIONS CFLAGS=-O2 EXTRA=insque.o

#define START_FILES pre-crt0.o /usr/lib/crt1.o /usr/lib/crti.o

#define START_FILES pre-crt0.o /usr/lib/crt1.o /usr/lib/crti.o

#define LIBS_DEBUG		/* override in config.h to include -lg */

#define LIBS_DEBUG		/* override in config.h to include -lg */

#endif

#endif

}

}

signal_handler_t

signal_handler_t

sys_signal (int signal_number, signal_handler_t action)

sys_signal (int signal_number, signal_handler_t action)

{

{

#else

#else

  sigemptyset (&new_action.sa_mask);

  sigemptyset (&new_action.sa_mask);

  new_action.sa_handler = action;

  new_action.sa_handler = action;

  sigaction (signal_number, &new_action, &old_action);

  sigaction (signal_number, &new_action, &old_action);

  return (old_action.sa_handler);

  return (old_action.sa_handler);

#endif /* DGUX */

#endif /* DGUX */

along with GNU Emacs; see the file COPYING.  If not, write to

along with GNU Emacs; see the file COPYING.  If not, write to

the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */

the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */

/* Define these variables that serve as global parameters to termcap,

/* Define these variables that serve as global parameters to termcap,

   so that we do not need to conditionalize the places in Emacs

   so that we do not need to conditionalize the places in Emacs

   that set them.  */

   that set them.  */

		rawshift = (((unsigned) (XINT (shift_mask))) & 15) << 11;

		rawshift = (((unsigned) (XINT (shift_mask))) & 15) << 11;

		XRebindCode (rawkey, rawshift, rawstring, strsize);

		XRebindCode (rawkey, rawshift, rawstring, strsize);

	}

	}

	return Qnil;

	return Qnil;

}

}

			XRebindCode (rawkey, i << 11, rawstring, strsize);

			XRebindCode (rawkey, i << 11, rawstring, strsize);

		}

		}

	}

	}

	return Qnil;

	return Qnil;

}

}

XExitWithCoreDump ()

XExitWithCoreDump ()

{

{

  defsubr (&Sx_set_font);

  defsubr (&Sx_set_font);

#ifdef notdef

#ifdef notdef

  defsubr (&Sx_set_icon);

  defsubr (&Sx_set_icon);

  defsubr (&Scoordinates_in_window_p);

  defsubr (&Scoordinates_in_window_p);

  defsubr (&Sx_mouse_events);

  defsubr (&Sx_mouse_events);

  defsubr (&Sx_proc_mouse_event);

  defsubr (&Sx_proc_mouse_event);

#ifdef notdef

#ifdef notdef

  defsubr (&Sx_rebind_key);

  defsubr (&Sx_rebind_key);

  defsubr (&Sx_rebind_keys);

  defsubr (&Sx_rebind_keys);

  defsubr (&Sx_debug);

  defsubr (&Sx_debug);

}

}

	  strcpy(mapping_buf,"\016");

	  strcpy(mapping_buf,"\016");

	  nbytes = 1;

	  nbytes = 1;

	  break;

	  break;

	}

	}

#ifndef AIX

#ifndef AIX

      }

      }

	extern char *getenv ();

	extern char *getenv ();

	extern XTinterrupt_signal ();

	extern XTinterrupt_signal ();

	extern Lisp_Object Vxterm, Vxterm1, Qt;

	extern Lisp_Object Vxterm, Vxterm1, Qt;

	extern int XIgnoreError();

	extern int XIgnoreError();

	int  ix;

	int  ix;

  Lisp_Object root_window;

  Lisp_Object root_window;

#ifndef COMPILER_REGISTER_BUG

#ifndef COMPILER_REGISTER_BUG

  register

  register

    struct window *mini_w;

    struct window *mini_w;

  this_line_bufpos = 0;

  this_line_bufpos = 0;

1998-05-30  Noah Friedman  <friedman@splode.com>

1998-05-30  Noah Friedman  <friedman@splode.com>

	* env.c (main): Declare sys_errlist if linux + glibc2.

	* env.c (main): Declare sys_errlist if linux + glibc2.

#include <stdio.h>

#include <stdio.h>

main (argc, argv)

main (argc, argv)

     int argc;

     int argc;

    ;

    ;

}

}

xmalloc (size)

xmalloc (size)

     int size;

     int size;

{

{

  if (!result)

  if (!result)

    fatal ("virtual memory exhausted", 0);

    fatal ("virtual memory exhausted", 0);

  return result;

  return result;

}

}

xrealloc (ptr, size)

xrealloc (ptr, size)

     char *ptr;

     char *ptr;

     int size;

     int size;

{

{

  if (!result)

  if (!result)

    fatal ("virtual memory exhausted");

    fatal ("virtual memory exhausted");

  return result;

  return result;

#undef close

#undef close

#endif

#endif

#include <stdio.h>

#include <stdio.h>

main (argc, argv)

main (argc, argv)

  exit (1);

  exit (1);

}

}

/* BSD code is very different from SYSV IPC code */

/* BSD code is very different from SYSV IPC code */

#include <sys/types.h>

#include <sys/types.h>

#include <sys/un.h>

#include <sys/un.h>

#include <stdio.h>

#include <stdio.h>

#include <errno.h>

#include <errno.h>

#include <sys/stat.h>

#include <sys/stat.h>

extern int sys_nerr;

extern int sys_nerr;

extern int errno;

extern int errno;

main (argc, argv)

main (argc, argv)

  char string[BUFSIZ];

  char string[BUFSIZ];

  struct stat statbfr;

  struct stat statbfr;

  if (argc < 2)

  if (argc < 2)

    {

    {

      fprintf (stderr, "Usage: %s filename\n", argv[0]);

      fprintf (stderr, "Usage: %s filename\n", argv[0]);

  strcat (server.sun_path, "/.emacs_server");

  strcat (server.sun_path, "/.emacs_server");

#endif

#endif

    {

    {

      fprintf (stderr, "%s: ", argv[0]);

      fprintf (stderr, "%s: ", argv[0]);

      perror ("connect");

      perror ("connect");

      exit (1);

      exit (1);

    }

    }

  if (cwd == 0)

  if (cwd == 0)

    {

    {

	       (errno < sys_nerr) ? sys_errlist[errno] : "unknown error");

	       (errno < sys_nerr) ? sys_errlist[errno] : "unknown error");

      exit (1);

      exit (1);

    }

    }

#endif /* HAVE_SYSVIPC */

#endif /* HAVE_SYSVIPC */

#include <stdio.h>

#include <stdio.h>

#include <errno.h>

#include <errno.h>

extern int execvp ();

extern int execvp ();

extern char *index ();

extern char *index ();

int nenv_size;

int nenv_size;

char *progname;

char *progname;

void fatal ();

void fatal ();

main (argc, argv, envp)

main (argc, argv, envp)

	if (tem)

	if (tem)

	  {

	  {

	    *tem = '\000';

	    *tem = '\000';

	  }

	  }

     }

     }

	/* If arg contains a "=" it specifies to set a variable */

	/* If arg contains a "=" it specifies to set a variable */

	{

	{

	  *tem = '\000';

	  *tem = '\000';

	  argc--; argv++;

	  argc--; argv++;

	  continue;

	  continue;

	}

	}

	/* Unset a variable */

	/* Unset a variable */

	{

	{

	  argc--; argv++;

	  argc--; argv++;

	  argc--; argv++;

	  argc--; argv++;

	}

	}

      else if (!strcmp (*argv, "-s") ||

      else if (!strcmp (*argv, "-s") ||

	    fatal ("No value specified for variable \"%s\"",

	    fatal ("No value specified for variable \"%s\"",

		   tem);

		   tem);

	  argc--; argv++;

	  argc--; argv++;

	  argc--; argv++;

	  argc--; argv++;

	}

	}

      else if (!strcmp (*argv, "-") || !strcmp (*argv, "--"))

      else if (!strcmp (*argv, "-") || !strcmp (*argv, "--"))

}

}

void

void

  register char *var, *val;

  register char *var, *val;

{

{

  register char **e;

  register char **e;

}

}

void

void

memory_fatal ()

memory_fatal ()

{

{

#include <stdio.h>

#include <stdio.h>

#include <ctype.h>

#include <ctype.h>

/* Define the symbol ETAGS to make the program "etags",

/* Define the symbol ETAGS to make the program "etags",

 which makes emacs-style tag tables by default.

 which makes emacs-style tag tables by default.

char *savestr();

char *savestr();

char *savenstr ();

char *savenstr ();

char *concat ();

char *concat ();

void initbuffer ();

void initbuffer ();

long readline ();

long readline ();

/* A `struct linebuffer' is a structure which holds a line of text.

/* A `struct linebuffer' is a structure which holds a line of text.

 `readline' reads a line from a stream into a linebuffer

 `readline' reads a line from a stream into a linebuffer

     char *defenv;

     char *defenv;

{

{

  register char *env, *p;

  register char *env, *p;

  struct TEX_tabent *tab;

  struct TEX_tabent *tab;

  int size, i;

  int size, i;

  return dp;

  return dp;

}

}

/* Print error message and exit.  */

/* Print error message and exit.  */

fatal (s1, s2)

fatal (s1, s2)

/* Like malloc but get fatal error if memory is exhausted.  */

/* Like malloc but get fatal error if memory is exhausted.  */

xmalloc (size)

xmalloc (size)

     int size;

     int size;

{

{

  if (!result)

  if (!result)

    fatal ("virtual memory exhausted", 0);

    fatal ("virtual memory exhausted", 0);

  return result;

  return result;

}

}

xrealloc (ptr, size)

xrealloc (ptr, size)

     char *ptr;

     char *ptr;

     int size;

     int size;

{

{

  if (!result)

  if (!result)

    fatal ("virtual memory exhausted");

    fatal ("virtual memory exhausted");

  return result;

  return result;

#endif

#endif

#include <stdio.h>

#include <stdio.h>

#include <string.h>

#include <string.h>

#include <ctype.h>

#include <ctype.h>

#include <time.h>

#include <time.h>

extern FILE *popen ();

extern FILE *popen ();

extern int fclose (), pclose ();

extern int fclose (), pclose ();

/* Utilities */

/* Utilities */

  return;

  return;

}

}

main (argc, argv)

main (argc, argv)

     int argc;

     int argc;

     char **argv;

     char **argv;

 */

 */

#include <stdio.h>

#include <stdio.h>

FILE *outfile;

FILE *outfile;

#include <sys/stat.h>

#include <sys/stat.h>

#include <sys/file.h>

#include <sys/file.h>

#include <errno.h>

#include <errno.h>

#define NO_SHORTNAMES   /* Tell config not to load remap.h */

#define NO_SHORTNAMES   /* Tell config not to load remap.h */

#include "../src/config.h"

#include "../src/config.h"

#undef close

#undef close

char *concat ();

char *concat ();

extern int errno;

extern int errno;

/* Nonzero means this is name of a lock file to delete on fatal error.  */

/* Nonzero means this is name of a lock file to delete on fatal error.  */

     char *name;

     char *name;

{

{

  extern int errno, sys_nerr;

  extern int errno, sys_nerr;

  char *s;

  char *s;

  if (errno < sys_nerr)

  if (errno < sys_nerr)

     char *name;

     char *name;

{

{

  extern int errno, sys_nerr;

  extern int errno, sys_nerr;

  char *s;

  char *s;

  if (errno < sys_nerr)

  if (errno < sys_nerr)

/* Like malloc but get fatal error if memory is exhausted.  */

/* Like malloc but get fatal error if memory is exhausted.  */

xmalloc (size)

xmalloc (size)

     int size;

     int size;

{

{

  if (!result)

  if (!result)

    fatal ("virtual memory exhausted", 0);

    fatal ("virtual memory exhausted", 0);

  return result;

  return result;

get_errmsg ()

get_errmsg ()

{

{

  extern int errno, sys_nerr;

  extern int errno, sys_nerr;

  char *s;

  char *s;

  if (errno < sys_nerr)

  if (errno < sys_nerr)

#undef open

#undef open

#undef close

#undef close

#include <stdio.h>

#include <stdio.h>

main ()

main ()

  exit (1);

  exit (1);

}

}

/* BSD code is very different from SYSV IPC code */

/* BSD code is very different from SYSV IPC code */

#include <sys/file.h>

#include <sys/file.h>

  unlink (server.sun_path);

  unlink (server.sun_path);

#endif

#endif

    {

    {

      perror ("bind");

      perror ("bind");

      exit (1);

      exit (1);

  signal (SIGPIPE, SIG_IGN);

  signal (SIGPIPE, SIG_IGN);

  for (;;)

  for (;;)

    {

    {

      if (select (s + 1, &rmask, 0, 0, 0) < 0)

      if (select (s + 1, &rmask, 0, 0, 0) < 0)

	perror ("select");

	perror ("select");

	{

	{

	  fromlen = sizeof (fromunix);

	  fromlen = sizeof (fromunix);

	  fromunix.sun_family = AF_UNIX;

	  fromunix.sun_family = AF_UNIX;

	  if (infd < 0)

	  if (infd < 0)

	    {

	    {

	      if (errno == EMFILE || errno == ENFILE)

	      if (errno == EMFILE || errno == ENFILE)

	  fflush (infile);

	  fflush (infile);

	  continue;

	  continue;

	}

	}

	{

	{

	  /* Read command codeword and fd */

	  /* Read command codeword and fd */

	  clearerr (stdin);

	  clearerr (stdin);

#endif /* SYSV IPC */

#endif /* SYSV IPC */

#include <stdio.h>

#include <stdio.h>

#include <ctype.h>

#include <ctype.h>

char *xmalloc ();

char *xmalloc ();

#define NUL	'\0'

#define NUL	'\0'

#include <stdio.h>

#include <stdio.h>

/* Break string in two parts to avoid buggy C compilers that ignore characters

/* Break string in two parts to avoid buggy C compilers that ignore characters

   after nulls in strings.  */

   after nulls in strings.  */

#include <stdio.h>

#include <stdio.h>

#include <time.h>

#include <time.h>

struct tm *localtime ();

struct tm *localtime ();

#include <stdio.h>

#include <stdio.h>

#include <ctype.h>

#include <ctype.h>

#include "../src/paths.h"

#include "../src/paths.h"

/* zippy.c

/* zippy.c