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. */