Displaying 1 result from an estimated 1 matches for "setupwarn".
2011 Nov 11
1
When collected warnings exceeds 50
...ing endcontext() in errors.c:
svn diff src/main/errors.c
Index: src/main/errors.c
===================================================================
--- src/main/errors.c (revision 57624)
+++ src/main/errors.c (working copy)
@@ -333,8 +333,11 @@
char *tr; int nc;
if(!R_CollectWarnings)
setupwarnings();
- if( R_CollectWarnings > 49 )
+ if( R_CollectWarnings > 49 ) {
+ endcontext(&cntxt);
+ inWarning = 0;
return;
+ }
SET_VECTOR_ELT(R_Warnings, R_CollectWarnings, call);
Rvsnprintf(buf, min(BUFSIZE, R_WarnLength+1), format, ap);
if(R_WarnLength < BUFSIZE - 20 &...