aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/ChangeLog12
-rw-r--r--src/editfns.c8
2 files changed, 11 insertions, 9 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index 38f2c6c798b..650df8494e7 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
12002-12-10 Juanma Barranquero <lektu@terra.es>
2
3 * editfns.c (Fformat): Use alloca, not _alloca.
4
12002-12-09 Richard M. Stallman <rms@gnu.org> 52002-12-09 Richard M. Stallman <rms@gnu.org>
2 6
3 * buffer.c (Fget_buffer_create): Call Qucs_set_table_for_input 7 * buffer.c (Fget_buffer_create): Call Qucs_set_table_for_input
@@ -24,15 +28,15 @@
24 28
25 * eval.c (Feval) [HAVE_CARBON]: Calls mac_check_for_quit_char at 29 * eval.c (Feval) [HAVE_CARBON]: Calls mac_check_for_quit_char at
26 each stack frame. This may change as it could be time consuming. 30 each stack frame. This may change as it could be time consuming.
27 31
28 * macterm.c (mac_check_for_quit_char, quit_char_comp) 32 * macterm.c (mac_check_for_quit_char, quit_char_comp)
29 (init_quit_char_handler, mac_determine_quit_char_modifiers) 33 (init_quit_char_handler, mac_determine_quit_char_modifiers)
30 (mac_initialize): Added code to check for pressing of quit_char 34 (mac_initialize): Added code to check for pressing of quit_char
31 in the OS event queue 35 in the OS event queue
32 36
33 * mac.c (sys_select): Call mac_check_for_quit_char every second 37 * mac.c (sys_select): Call mac_check_for_quit_char every second
34 while blocking on select. 38 while blocking on select.
35 39
36 * mac.c (sys_read): Use sys_select to test for input first 40 * mac.c (sys_read): Use sys_select to test for input first
37 before calling read to allow C-g to break 41 before calling read to allow C-g to break
38 42
diff --git a/src/editfns.c b/src/editfns.c
index 62bd324dfc1..6deb9b96f8a 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -3212,7 +3212,7 @@ usage: (format STRING &rest OBJECTS) */)
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 = (int *) (_alloca(nargs * sizeof (int))); 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
@@ -3385,10 +3385,8 @@ usage: (format STRING &rest OBJECTS) */)
3385 /* Note that we're using sprintf to print floats, 3385 /* Note that we're using sprintf to print floats,
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. */
3389 operand: the value is PRECISION[N] if the conditional is >=0 and 3389 thissize = MAX_10_EXP + 100 + ((precision[n] > 0) ? precision[n] : 0);
3390 otherwise is 0. */
3391 thissize = MAX_10_EXP + 100 + ((precision[n] > 0)?precision[n]:0);
3392 } 3390 }
3393 else 3391 else
3394 { 3392 {