Mercurial > hg > xemacs-beta

comparison src/process-unix.c @ 410:de805c49cfc1 r21-2-35

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-35
author cvs
date Mon, 13 Aug 2007 11:19:21 +0200
parents b8cc9ab3f761
children 697ef44129c6
comparison
equal deleted inserted replaced
409:301b9ebbdf3b 410:de805c49cfc1
777 pty_flag ? STREAM_PTY_FLUSHING : 0); 777 pty_flag ? STREAM_PTY_FLUSHING : 0);
778 /* Record the tty descriptor used in the subprocess. */ 778 /* Record the tty descriptor used in the subprocess. */
779 UNIX_DATA(p)->subtty = forkin; 779 UNIX_DATA(p)->subtty = forkin;
780 780
781 { 781 {
782 #if !defined(__CYGWIN32__) 782 #if !defined(CYGWIN)
783 /* child_setup must clobber environ on systems with true vfork. 783 /* child_setup must clobber environ on systems with true vfork.
784 Protect it from permanent change. */ 784 Protect it from permanent change. */
785 char **save_environ = environ; 785 char **save_environ = environ;
786 #endif 786 #endif
787 787
936 } 936 }
937 937
938 } /**** End of child code ****/ 938 } /**** End of child code ****/
939 939
940 /**** Back in parent process ****/ 940 /**** Back in parent process ****/
941 #if !defined(__CYGWIN32__) 941 #if !defined(CYGWIN)
942 environ = save_environ; 942 environ = save_environ;
943 #endif 943 #endif
944 } 944 }
945 945
946 if (pid < 0) 946 if (pid < 0)
1853 1853
1854 /* join multicast group */ 1854 /* join multicast group */
1855 imr.imr_multiaddr.s_addr = htonl (inet_addr ((char *) XSTRING_DATA (dest))); 1855 imr.imr_multiaddr.s_addr = htonl (inet_addr ((char *) XSTRING_DATA (dest)));
1856 imr.imr_interface.s_addr = htonl (INADDR_ANY); 1856 imr.imr_interface.s_addr = htonl (INADDR_ANY);
1857 if (setsockopt (rs, IPPROTO_IP, IP_ADD_MEMBERSHIP, 1857 if (setsockopt (rs, IPPROTO_IP, IP_ADD_MEMBERSHIP,
1858 (char *) &imr, sizeof (struct ip_mreq)) < 0) 1858 &imr, sizeof (struct ip_mreq)) < 0)
1859 { 1859 {
1860 close (ws); 1860 close (ws);
1861 close (rs); 1861 close (rs);
1862 report_file_error ("error adding membership", list2(name, dest)); 1862 report_file_error ("error adding membership", list2(name, dest));
1863 } 1863 }
1919 1919
1920 speed_up_interrupts (); 1920 speed_up_interrupts ();
1921 1921
1922 /* scope */ 1922 /* scope */
1923 if (setsockopt (ws, IPPROTO_IP, IP_MULTICAST_TTL, 1923 if (setsockopt (ws, IPPROTO_IP, IP_MULTICAST_TTL,
1924 (char *) &thettl, sizeof (thettl)) < 0) 1924 &thettl, sizeof (thettl)) < 0)
1925 { 1925 {
1926 close (rs); 1926 close (rs);
1927 close (ws); 1927 close (ws);
1928 report_file_error ("error setting ttl", list2(name, ttl)); 1928 report_file_error ("error setting ttl", list2(name, ttl));
1929 } 1929 }