The R Project SVN R

Rev

Rev 63220 | Rev 64657 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 63220 Rev 63221
Line 700... Line 700...
700
}
700
}
701
 
701
 
702
#define BUFSIZE 10000
702
#define BUFSIZE 10000
703
static int Wpipe_vfprintf(Rconnection con, const char *format, va_list ap)
703
static int Wpipe_vfprintf(Rconnection con, const char *format, va_list ap)
704
{
704
{
-
 
705
    R_CheckStack2(BUFSIZE);
705
    char buf[BUFSIZE], *b = buf;
706
    char buf[BUFSIZE], *b = buf;
706
    int res = 0;
707
    int res = 0;
707
 
708
 
708
    res = vsnprintf(b, BUFSIZE, format, ap);
709
    res = vsnprintf(b, BUFSIZE, format, ap);
709
    if(res < 0) { /* a failure indication, so try again */
710
    if(res < 0) { /* a failure indication, so try again */