The R Project SVN R

Rev

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

Rev 61766 Rev 61771
Line 425... Line 425...
425 
	REprintf(_("Lost warning messages\n"));
 425 
	REprintf(_("Lost warning messages\n"));
426 
    }
 426 
    }
427 
    inPrintWarnings = 0;
 427 
    inPrintWarnings = 0;
428 
}
 428 
}
429 
 
 429 
 
- 
 
 430 
attribute_hidden
430 
void PrintWarnings(void)
 431 
void PrintWarnings(void)
431 
{
 432 
{
432 
    int i;
 433 
    int i;
433 
    char *header;
 434 
    char *header;
434 
    SEXP names, s, t;
 435 
    SEXP names, s, t;
Line 1197... Line 1198...
1197 
 
 1198 
 
1198 
    { WARNING_UNKNOWN,		N_("unknown warning (report this!)")	},
 1199 
    { WARNING_UNKNOWN,		N_("unknown warning (report this!)")	},
1199 
};
 1200 
};
1200 
 
 1201 
 
1201 
 
 1202 
 
- 
 
 1203 
attribute_hidden
1202 
void ErrorMessage(SEXP call, int which_error, ...)
 1204 
void ErrorMessage(SEXP call, int which_error, ...)
1203 
{
 1205 
{
1204 
    int i;
 1206 
    int i;
1205 
    char buf[BUFSIZE];
 1207 
    char buf[BUFSIZE];
1206 
    va_list(ap);
 1208 
    va_list(ap);
Line 1216... Line 1218...
1216 
    Rvsnprintf(buf, BUFSIZE, _(ErrorDB[i].format), ap);
 1218 
    Rvsnprintf(buf, BUFSIZE, _(ErrorDB[i].format), ap);
1217 
    va_end(ap);
 1219 
    va_end(ap);
1218 
    errorcall(call, "%s", buf);
 1220 
    errorcall(call, "%s", buf);
1219 
}
 1221 
}
1220 
 
 1222 
 
- 
 
 1223 
attribute_hidden
1221 
void WarningMessage(SEXP call, R_WARNING which_warn, ...)
 1224 
void WarningMessage(SEXP call, R_WARNING which_warn, ...)
1222 
{
 1225 
{
1223 
    int i;
 1226 
    int i;
1224 
    char buf[BUFSIZE];
 1227 
    char buf[BUFSIZE];
1225 
    va_list(ap);
 1228 
    va_list(ap);