The R Project SVN R

Rev

Rev 85539 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 85539 Rev 85648
Line 204... Line 204...
204 
   with the hThread handle closed.
 204 
   with the hThread handle closed.
205 
*/
 205 
*/
206 
 
 206 
 
207 
extern size_t Rf_utf8towcs(wchar_t *wc, const char *s, size_t n);
 207 
extern size_t Rf_utf8towcs(wchar_t *wc, const char *s, size_t n);
208 
 
 208 
 
- 
 
 209 
/* NOTE: this doesn't work for CE_UTF8 due to expandcmd() */
209 
static void pcreate(const char* cmd, cetype_t enc,
 210 
static void pcreate(const char* cmd, cetype_t enc,
210 
		      int newconsole, int visible,
 211 
		      int newconsole, int visible,
211 
		      HANDLE hIN, HANDLE hOUT, HANDLE hERR,
 212 
		      HANDLE hIN, HANDLE hOUT, HANDLE hERR,
212 
		      pinfo *pi, int consignals)
 213 
		      pinfo *pi, int consignals)
213 
{
 214 
{
Line 226... Line 227...
226 
    SECURITY_ATTRIBUTES sa;
 227 
    SECURITY_ATTRIBUTES sa;
227 
    sa.nLength = sizeof(sa);
 228 
    sa.nLength = sizeof(sa);
228 
    sa.lpSecurityDescriptor = NULL;
 229 
    sa.lpSecurityDescriptor = NULL;
229 
    sa.bInheritHandle = TRUE;
 230 
    sa.bInheritHandle = TRUE;
230 
 
 231 
 
231 
    /* FIXME: this might need to be done in wchar_t */
 232 
    /* FIXME: this would have to be done in wchar_t/UTF-16LE to support
- 
 
 233 
       CE_UTF8; the enc==CE_UTF8 branch could be phased out once UTF-8 as
- 
 
 234 
       native encoding can be assumed on all Windows systems  */
232 
    if (!(ecmd = expandcmd(cmd, 0))) return; /* error message already set */
 235 
    if (!(ecmd = expandcmd(cmd, 0))) return; /* error message already set */
233 
 
 236 
 
234 
    inpipe = (hIN != INVALID_HANDLE_VALUE)
 237 
    inpipe = (hIN != INVALID_HANDLE_VALUE)
235 
	|| (hOUT != INVALID_HANDLE_VALUE)
 238 
	|| (hOUT != INVALID_HANDLE_VALUE)
236 
	|| (hERR != INVALID_HANDLE_VALUE);
 239 
	|| (hERR != INVALID_HANDLE_VALUE);