The R Project SVN R

Rev

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

Rev 90020 Rev 90179
Line 1172... Line 1172...
1172 
	makelt(ptm, ans, i, valid, valid ? d - floor(d) : d);
 1172 
	makelt(ptm, ans, i, valid, valid ? d - floor(d) : d);
1173 
	if (isUTC) {
 1173 
	if (isUTC) {
1174 
	    SET_STRING_ELT(VECTOR_ELT(ans, 9), i, mkChar(tz));
 1174 
	    SET_STRING_ELT(VECTOR_ELT(ans, 9), i, mkChar(tz));
1175 
	    INTEGER(VECTOR_ELT(ans, 10))[i] = 0;
 1175 
	    INTEGER(VECTOR_ELT(ans, 10))[i] = 0;
1176 
	} else {
 1176 
	} else {
1177 
	    char *p = "";
 1177 
	    const char *p = "";
1178 
	    // or ptm->tm_zone (but not specified by POSIX)
 1178 
	    // or ptm->tm_zone (but not specified by POSIX)
1179 
	    if(valid && ptm->tm_isdst >= 0)
 1179 
	    if(valid && ptm->tm_isdst >= 0)
1180 
		p = R_tzname[ptm->tm_isdst];
 1180 
		p = R_tzname[ptm->tm_isdst];
1181 
	    SET_STRING_ELT(VECTOR_ELT(ans, 9), i, mkChar(p));
 1181 
	    SET_STRING_ELT(VECTOR_ELT(ans, 9), i, mkChar(p));
1182 
#ifdef HAVE_TM_GMTOFF
 1182 
#ifdef HAVE_TM_GMTOFF