From: Juanma Barranquero Date: Tue, 10 Dec 2002 07:40:21 +0000 (+0000) Subject: (Fformat): Use alloca, not _alloca. X-Git-Tag: ttn-vms-21-2-B4~12058 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b11f1d8a332465e124e6fdc02d445af4bc29014e;p=emacs.git (Fformat): Use alloca, not _alloca. --- diff --git a/src/ChangeLog b/src/ChangeLog index 38f2c6c798b..650df8494e7 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,7 @@ +2002-12-10 Juanma Barranquero + + * editfns.c (Fformat): Use alloca, not _alloca. + 2002-12-09 Richard M. Stallman * buffer.c (Fget_buffer_create): Call Qucs_set_table_for_input @@ -24,15 +28,15 @@ * eval.c (Feval) [HAVE_CARBON]: Calls mac_check_for_quit_char at each stack frame. This may change as it could be time consuming. - - * macterm.c (mac_check_for_quit_char, quit_char_comp) - (init_quit_char_handler, mac_determine_quit_char_modifiers) + + * macterm.c (mac_check_for_quit_char, quit_char_comp) + (init_quit_char_handler, mac_determine_quit_char_modifiers) (mac_initialize): Added code to check for pressing of quit_char in the OS event queue * mac.c (sys_select): Call mac_check_for_quit_char every second while blocking on select. - + * mac.c (sys_read): Use sys_select to test for input first before calling read to allow C-g to break 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) */) string itself, will not be used. Element NARGS, corresponding to no argument, *will* be assigned to in the case that a `%' and `.' occur after the final format specifier. */ - int * precision = (int *) (_alloca(nargs * sizeof (int))); + int *precision = (int *) (alloca(nargs * sizeof (int))); int longest_format; Lisp_Object val; struct info @@ -3385,10 +3385,8 @@ usage: (format STRING &rest OBJECTS) */) /* Note that we're using sprintf to print floats, so we have to take into account what that function prints. */ - /* Filter out flag value of -1. This is a conditional with omitted - operand: the value is PRECISION[N] if the conditional is >=0 and - otherwise is 0. */ - thissize = MAX_10_EXP + 100 + ((precision[n] > 0)?precision[n]:0); + /* Filter out flag value of -1. */ + thissize = MAX_10_EXP + 100 + ((precision[n] > 0) ? precision[n] : 0); } else {