mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-10 05:30:45 -08:00
Code Issues Projects Releases Wiki Activity

(create_process): Detect failure of `pipe'.

Browse source
This commit is contained in:
Karl Heuer 1999-07-30 14:39:27 +00:00
parent b1314e1550
commit fc14013c81
1 changed files with 11 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

13
src/process.c
View file

@ -1379,10 +1379,19 @@ create_process (process, new_argv, current_dir)
}
#else /* not SKTPAIR */
{
pipe (sv);
int tem;
tem = pipe (sv);
if (tem < 0)
report_file_error ("Creating pipe", Qnil);
inchannel = sv[0];
forkout = sv[1];
pipe (sv);
tem = pipe (sv);
if (tem < 0)
{
close (inchannel);
close (forkout);
report_file_error ("Creating pipe", Qnil);
}
outchannel = sv[1];
forkin = sv[0];
}