The R Project SVN R

Rev

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

Rev 75611 Rev 75618
Line 2039... Line 2039...
2039 
                  const char *errmsg, const char *warnmsg,
 2039 
                  const char *errmsg, const char *warnmsg,
2040 
                  const char *varname, Rboolean warnByDefault)
 2040 
                  const char *varname, Rboolean warnByDefault)
2041 
{
 2041 
{
2042 
    /* disable GC so that use of this temporary checking code does not
 2042 
    /* disable GC so that use of this temporary checking code does not
2043 
       introduce new PROTECT errors e.g. in asLogical() use */
 2043 
       introduce new PROTECT errors e.g. in asLogical() use */
2044 
    R_CHECK_THREAD("R_BadValueInRCode");
 2044 
    R_CHECK_THREAD;
2045 
    int enabled = R_GCEnabled;
 2045 
    int enabled = R_GCEnabled;
2046 
    R_GCEnabled = FALSE;
 2046 
    R_GCEnabled = FALSE;
2047 
    int nprotect = 0;
 2047 
    int nprotect = 0;
2048 
    char *check = getenv(varname);
 2048 
    char *check = getenv(varname);
2049 
    const void *vmax = vmaxget();
 2049 
    const void *vmax = vmaxget();