Mercurial > emacs
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; |