The R Project SVN R

Rev

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

Rev 45446 Rev 47460
Line 139... Line 139...
139 
 
 139 
 
140 
    for (i = 0; i < n; i++) {
 140 
    for (i = 0; i < n; i++) {
141 
	if (i > 0 && width + w + R_print.gap > R_print.width) {
 141 
	if (i > 0 && width + w + R_print.gap > R_print.width) {
142 
	    DO_newline;
 142 
	    DO_newline;
143 
	}
 143 
	}
144 
#ifdef BUGGY
 - 
 
145 
	Rprintf("%*s%s", R_print.gap, "",
 - 
 
146 
		EncodeString(x[i], w, quote, Rprt_adj_left));
 - 
 
147 
#else
 - 
 
148 
	Rprintf("%*s%s", R_print.gap, "",
 144 
	Rprintf("%*s%s", R_print.gap, "",
149 
		EncodeString(x[i], w, quote, R_print.right));
 145 
		EncodeString(x[i], w, quote, R_print.right));
150 
#endif
 - 
 
151 
	width += w + R_print.gap;
 146 
	width += w + R_print.gap;
152 
    }
 147 
    }
153 
    Rprintf("\n");
 148 
    Rprintf("\n");
154 
}
 149 
}
155 
 
 150