The R Project SVN R

Rev

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

Rev 42520 Rev 42617
Line 260... Line 260...
260 
	    tlist = CDR(tlist);
 260 
	    tlist = CDR(tlist);
261 
	}
 261 
	}
262 
	UNPROTECT(1);
 262 
	UNPROTECT(1);
263 
	return (rval);
 263 
	return (rval);
264 
    } else {
 264 
    } else {
265 
	tlist = ScalarLogical(ll);
 265 
	tlist = ScalarInteger(ll);
266 
	R_Visible = 0;
 266 
	R_Visible = 0;
267 
	return tlist;
 267 
	return tlist;
268 
    }
 268 
    }
269 
}
 269 
}