home *** CD-ROM | disk | FTP | other *** search
/ NeXT Education Software Sampler 1992 Fall / NeXT Education Software Sampler 1992 Fall.iso / Programming / Source / winterp-1.13 / contrib / SunOS3.5-patch / patch next >
Encoding:
Text File  |  1991-10-06  |  3.1 KB  |  89 lines

  1. #
  2. # WINTERP Copyright 1989, 1990, 1991 Hewlett-Packard Company (by Niels Mayer).
  3. # XLISP version 2.1, Copyright (c) 1989, by David Betz.
  4. #
  5. # Permission to use, copy, modify, distribute, and sell this software and its
  6. # documentation for any purpose is hereby granted without fee, provided that
  7. # the above copyright notice appear in all copies and that both that
  8. # copyright notice and this permission notice appear in supporting
  9. # documentation, and that the name of Hewlett-Packard and David Betz not be
  10. # used in advertising or publicity pertaining to distribution of the software
  11. # without specific, written prior permission.  Hewlett-Packard and David Betz
  12. # make no representations about the suitability of this software for any
  13. # purpose. It is provided "as is" without express or implied warranty.
  14. #
  15.  
  16. *** winterp.c.orig    Thu Apr  4 08:05:24 1991
  17. --- winterp.c    Thu Apr  4 08:05:31 1991
  18. ***************
  19. *** 57,63 ****
  20.   #endif                /* WINTERP_WANT_INET_SERVER */
  21.   
  22.   #ifdef WINTERP_WANT_UNIX_SERVER
  23. ! #include <stdlib.h> /* for unlink() */
  24.   #include <sys/un.h> /* for AF_UNIX sockets */
  25.   #endif                /* WINTERP_WANT_UNIX_SERVER */
  26.   
  27. --- 57,63 ----
  28.   #endif                /* WINTERP_WANT_INET_SERVER */
  29.   
  30.   #ifdef WINTERP_WANT_UNIX_SERVER
  31. ! /* #include <stdlib.h>  for unlink() */
  32.   #include <sys/un.h> /* for AF_UNIX sockets */
  33.   #endif                /* WINTERP_WANT_UNIX_SERVER */
  34.   
  35. ***************
  36. *** 446,453 ****
  37.     root_win = DefaultRootWindow(display);
  38.     screen = DefaultScreenOfDisplay(display);
  39.     colormap = XDefaultColormapOfScreen(screen);
  40. -   wm_delete_atom = XmInternAtom(display, "WM_DELETE_WINDOW");
  41.   
  42.     /*
  43.      * Setup action table for accelerators and translations.
  44.      */
  45. --- 446,454 ----
  46.     root_win = DefaultRootWindow(display);
  47.     screen = DefaultScreenOfDisplay(display);
  48.     colormap = XDefaultColormapOfScreen(screen);
  49.   
  50. +   wm_delete_atom = XmInternAtom(display, "WM_DELETE_WINDOW", FALSE);
  51.     /*
  52.      * Setup action table for accelerators and translations.
  53.      */
  54. ***************
  55. *** 911,917 ****
  56.     int rdsock;
  57.     int addrlen = sizeof(struct sockaddr_in);
  58.     struct sockaddr_in peeraddr_in; /* for peer socket address */
  59. ! #ifdef hpux            
  60.     long lingerOpt = 1L;        /* NOTE: necessary while hpux-version < 8.0 (???) */
  61.   #else
  62.     struct linger lingerOpt;
  63. --- 914,920 ----
  64.     int rdsock;
  65.     int addrlen = sizeof(struct sockaddr_in);
  66.     struct sockaddr_in peeraddr_in; /* for peer socket address */
  67. ! #ifdef HACK
  68.     long lingerOpt = 1L;        /* NOTE: necessary while hpux-version < 8.0 (???) */
  69.   #else
  70.     struct linger lingerOpt;
  71. ***************
  72. *** 925,931 ****
  73.       xlfatal("Unable to accept() on INET Domain Socket."); /* CLEANUP & EXIT */
  74.     }
  75.     if (setsockopt(rdsock, SOL_SOCKET, SO_LINGER, (char *) &lingerOpt,
  76. ! #ifdef hpux
  77.            sizeof(long)    /* NOTE: necessary while hpux-version < 8.0 (???) */
  78.   #else
  79.            sizeof(struct linger)
  80. --- 928,934 ----
  81.       xlfatal("Unable to accept() on INET Domain Socket."); /* CLEANUP & EXIT */
  82.     }
  83.     if (setsockopt(rdsock, SOL_SOCKET, SO_LINGER, (char *) &lingerOpt,
  84. ! #ifdef HACK
  85.            sizeof(long)    /* NOTE: necessary while hpux-version < 8.0 (???) */
  86.   #else
  87.            sizeof(struct linger)
  88.