aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorRichard M. Stallman1996-04-26 19:55:27 +0000
committerRichard M. Stallman1996-04-26 19:55:27 +0000
commit7795ff9bc0ebd9dc55225f5ec0254845537ba1fc (patch)
tree5dce33d7b01ed5e29927113a4c65ccbe9fc1d9c7 /src
parentf3849f257d7cb157c861cec9557e775b26a74e49 (diff)
downloademacs-7795ff9bc0ebd9dc55225f5ec0254845537ba1fc.tar.gz
emacs-7795ff9bc0ebd9dc55225f5ec0254845537ba1fc.zip
(Fopen_network_stream): Set process infd to inch.
(create_process, read_process_output, Fsignal_process) [WINDOWSNT]: Remove conditional NT code.
Diffstat (limited to 'src')
-rw-r--r--src/process.c29
1 files changed, 3 insertions, 26 deletions
diff --git a/src/process.c b/src/process.c
index 1637ab6e7db..a5eba6c9f17 100644
--- a/src/process.c
+++ b/src/process.c
@@ -1255,22 +1255,12 @@ create_process (process, new_argv, current_dir)
1255 } 1255 }
1256#else /* not SKTPAIR */ 1256#else /* not SKTPAIR */
1257 { 1257 {
1258#ifdef WINDOWSNT
1259 pipe_with_inherited_out (sv);
1260 inchannel = sv[0];
1261 forkout = sv[1];
1262
1263 pipe_with_inherited_in (sv);
1264 forkin = sv[0];
1265 outchannel = sv[1];
1266#else /* not WINDOWSNT */
1267 pipe (sv); 1258 pipe (sv);
1268 inchannel = sv[0]; 1259 inchannel = sv[0];
1269 forkout = sv[1]; 1260 forkout = sv[1];
1270 pipe (sv); 1261 pipe (sv);
1271 outchannel = sv[1]; 1262 outchannel = sv[1];
1272 forkin = sv[0]; 1263 forkin = sv[0];
1273#endif /* not WINDOWSNT */
1274 } 1264 }
1275#endif /* not SKTPAIR */ 1265#endif /* not SKTPAIR */
1276 1266
@@ -1800,7 +1790,7 @@ Fourth arg SERVICE is name of the service desired, or an integer\n\
1800 XPROCESS (proc)->filter = Qnil; 1790 XPROCESS (proc)->filter = Qnil;
1801 XPROCESS (proc)->command = Qnil; 1791 XPROCESS (proc)->command = Qnil;
1802 XPROCESS (proc)->pid = Qnil; 1792 XPROCESS (proc)->pid = Qnil;
1803 XSETINT (XPROCESS (proc)->infd, s); 1793 XSETINT (XPROCESS (proc)->infd, inch);
1804 XSETINT (XPROCESS (proc)->outfd, outch); 1794 XSETINT (XPROCESS (proc)->outfd, outch);
1805 XPROCESS (proc)->status = Qrun; 1795 XPROCESS (proc)->status = Qrun;
1806 FD_SET (inch, &input_wait_mask); 1796 FD_SET (inch, &input_wait_mask);
@@ -2463,20 +2453,12 @@ read_process_output (proc, channel)
2463#else /* not VMS */ 2453#else /* not VMS */
2464 2454
2465 if (proc_buffered_char[channel] < 0) 2455 if (proc_buffered_char[channel] < 0)
2466#ifdef WINDOWSNT 2456 nchars = read (channel, chars, sizeof (chars));
2467 nchars = read_child_output (channel, chars, sizeof (chars));
2468#else
2469 nchars = read (channel, chars, sizeof chars);
2470#endif
2471 else 2457 else
2472 { 2458 {
2473 chars[0] = proc_buffered_char[channel]; 2459 chars[0] = proc_buffered_char[channel];
2474 proc_buffered_char[channel] = -1; 2460 proc_buffered_char[channel] = -1;
2475#ifdef WINDOWSNT 2461 nchars = read (channel, chars + 1, sizeof (chars) - 1);
2476 nchars = read_child_output (channel, chars + 1, sizeof (chars) - 1);
2477#else
2478 nchars = read (channel, chars + 1, sizeof chars - 1);
2479#endif
2480 if (nchars < 0) 2462 if (nchars < 0)
2481 nchars = 1; 2463 nchars = 1;
2482 else 2464 else
@@ -3228,12 +3210,7 @@ SIGCODE may be an integer, or a symbol whose name is a signal name.")
3228 3210
3229#undef handle_signal 3211#undef handle_signal
3230 3212
3231#ifdef WINDOWSNT
3232 /* Only works for kill-type signals */
3233 return make_number (win32_kill_process (XINT (pid), XINT (sigcode)));
3234#else
3235 return make_number (kill (XINT (pid), XINT (sigcode))); 3213 return make_number (kill (XINT (pid), XINT (sigcode)));
3236#endif
3237} 3214}
3238 3215
3239DEFUN ("process-send-eof", Fprocess_send_eof, Sprocess_send_eof, 0, 1, 0, 3216DEFUN ("process-send-eof", Fprocess_send_eof, Sprocess_send_eof, 0, 1, 0,