The R Project SVN R

Rev

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

Rev 2584 Rev 4928
Line 236... Line 236...
236 
/* format.info(obj)  --> 3 integers  (w,d,e) with the formatting information
 236 
/* format.info(obj)  --> 3 integers  (w,d,e) with the formatting information
237 
 *			w = total width (#{chars}) per item
 237 
 *			w = total width (#{chars}) per item
238 
 *			d = #{digits} to RIGHT of "."
 238 
 *			d = #{digits} to RIGHT of "."
239 
 *			e = {0:2}.   0: Fixpoint;
 239 
 *			e = {0:2}.   0: Fixpoint;
240 
 *				   1,2: exponential with 2/3 digit expon.
 240 
 *				   1,2: exponential with 2/3 digit expon.
- 
 
 241 
 *
- 
 
 242 
 * for complex : 2 x 3 integers for (Re, Im)
241 
 */
 243 
 */
242 
 
 244 
 
243 
SEXP do_formatinfo(SEXP call, SEXP op, SEXP args, SEXP env)
 245 
SEXP do_formatinfo(SEXP call, SEXP op, SEXP args, SEXP env)
244 
{
 246 
{
245 
    SEXP x;
 247 
    SEXP x;