The R Project SVN R

Rev

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

Rev 41784 Rev 41807
Line 458... Line 458...
458 
			      SEXP dimnames)
 458 
			      SEXP dimnames)
459 
{
 459 
{
460 
/* == printArray(.) */
 460 
/* == printArray(.) */
461 
 
 461 
 
462 
    int ndim = LENGTH(dim);
 462 
    int ndim = LENGTH(dim);
463 
    char *rn = NULL, *cn = NULL;
 463 
    const char *rn = NULL, *cn = NULL;
464 
 
 464 
 
465 
    if (ndim == 1)
 465 
    if (ndim == 1)
466 
	printVector(x, 1, quote);
 466 
	printVector(x, 1, quote);
467 
    else if (ndim == 2) {
 467 
    else if (ndim == 2) {
468 
	SEXP rl, cl;
 468 
	SEXP rl, cl;