comparison src/msdos.c @ 16:0293115a14e9 r19-15b91

Import from CVS: tag r19-15b91
author cvs
date Mon, 13 Aug 2007 08:49:20 +0200
parents 376386a54a3c
children 859a2309aef8
comparison
equal deleted inserted replaced
15:ad457d5f7d04 16:0293115a14e9
2166 for (i = 0; i < len; i++) 2166 for (i = 0; i < len; i++)
2167 { 2167 {
2168 tmp = Fcar (lst); 2168 tmp = Fcar (lst);
2169 lst = Fcdr (lst); 2169 lst = Fcdr (lst);
2170 CHECK_STRING (tmp); 2170 CHECK_STRING (tmp);
2171 envv[i] = alloca (string_length (XSTRING (tmp)) + 1); 2171 envv[i] = alloca (XSTRING_LENGTH (tmp) + 1);
2172 strcpy (envv[i], string_data (XSTRING (tmp))); 2172 strcpy (envv[i], XSTRING_DATA (tmp));
2173 } 2173 }
2174 envv[len] = (char *) 0; 2174 envv[len] = (char *) 0;
2175 } 2175 }
2176 2176
2177 if (STRINGP (dir)) 2177 if (STRINGP (dir))
2178 chdir (string_data (XSTRING (dir))); 2178 chdir (XSTRING_DATA (dir));
2179 inbak = dup (0); 2179 inbak = dup (0);
2180 outbak = dup (1); 2180 outbak = dup (1);
2181 errbak = dup (2); 2181 errbak = dup (2);
2182 if (inbak < 0 || outbak < 0 || errbak < 0) 2182 if (inbak < 0 || outbak < 0 || errbak < 0)
2183 goto done; /* Allocation might fail due to lack of descriptors. */ 2183 goto done; /* Allocation might fail due to lack of descriptors. */