Mercurial > hg > xemacs-beta
comparison src/process.c @ 167:85ec50267440 r20-3b10
Import from CVS: tag r20-3b10
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:45:46 +0200 |
parents | 28f395d8dc7a |
children | 15872534500d |
comparison
equal
deleted
inserted
replaced
166:7a77eb660975 | 167:85ec50267440 |
---|---|
887 it off" */ | 887 it off" */ |
888 int logging_on = cadillac_stop_logging (); /* #### rename me */ | 888 int logging_on = cadillac_stop_logging (); /* #### rename me */ |
889 #endif | 889 #endif |
890 | 890 |
891 #ifndef WINDOWSNT | 891 #ifndef WINDOWSNT |
892 pid = vfork (); | 892 pid = fork (); |
893 if (pid == 0) | 893 if (pid == 0) |
894 #endif /* not WINDOWSNT */ | 894 #endif /* not WINDOWSNT */ |
895 { | 895 { |
896 /**** Now we're in the child process ****/ | 896 /**** Now we're in the child process ****/ |
897 int xforkin = forkin; | 897 int xforkin = forkin; |
1036 } | 1036 } |
1037 | 1037 |
1038 if (pid < 0) | 1038 if (pid < 0) |
1039 { | 1039 { |
1040 close_descriptor_pair (forkin, forkout); | 1040 close_descriptor_pair (forkin, forkout); |
1041 report_file_error ("Doing vfork", Qnil); | 1041 report_file_error ("Doing fork", Qnil); |
1042 } | 1042 } |
1043 | 1043 |
1044 p->pid = make_int (pid); | 1044 p->pid = make_int (pid); |
1045 /* #### dmoore - why is this commented out, otherwise we leave | 1045 /* #### dmoore - why is this commented out, otherwise we leave |
1046 subtty = forkin, but then we close forkin just below. */ | 1046 subtty = forkin, but then we close forkin just below. */ |