comparison src/editfns.c @ 48781:d17f48c1b40f

fixed a couple of minor compilation errors in editfns.c
author Ben Key <bkey1@tampabay.rr.com>
date Tue, 10 Dec 2002 07:09:41 +0000
parents 4a69081f2ff4
children b02bdb795a5c
comparison
equal deleted inserted replaced
48780:a1aba4c3d002 48781:d17f48c1b40f
3210 /* Precision for each spec, or -1, a flag value meaning no precision 3210 /* Precision for each spec, or -1, a flag value meaning no precision
3211 was given in that spec. Element 0, corresonding to the format 3211 was given in that spec. Element 0, corresonding to the format
3212 string itself, will not be used. Element NARGS, corresponding to 3212 string itself, will not be used. Element NARGS, corresponding to
3213 no argument, *will* be assigned to in the case that a `%' and `.' 3213 no argument, *will* be assigned to in the case that a `%' and `.'
3214 occur after the final format specifier. */ 3214 occur after the final format specifier. */
3215 int precision[nargs]; 3215 int * precision = (int *) (_alloca(nargs * sizeof (int)));
3216 int longest_format; 3216 int longest_format;
3217 Lisp_Object val; 3217 Lisp_Object val;
3218 struct info 3218 struct info
3219 { 3219 {
3220 int start, end; 3220 int start, end;
3386 so we have to take into account what that function 3386 so we have to take into account what that function
3387 prints. */ 3387 prints. */
3388 /* Filter out flag value of -1. This is a conditional with omitted 3388 /* Filter out flag value of -1. This is a conditional with omitted
3389 operand: the value is PRECISION[N] if the conditional is >=0 and 3389 operand: the value is PRECISION[N] if the conditional is >=0 and
3390 otherwise is 0. */ 3390 otherwise is 0. */
3391 thissize = MAX_10_EXP + 100 + (precision[n] > 0 ? : 0); 3391 thissize = MAX_10_EXP + 100 + ((precision[n] > 0)?precision[n]:0);
3392 } 3392 }
3393 else 3393 else
3394 { 3394 {
3395 /* Anything but a string, convert to a string using princ. */ 3395 /* Anything but a string, convert to a string using princ. */
3396 register Lisp_Object tem; 3396 register Lisp_Object tem;