(Fformat): Use alloca, not _alloca.

diff --git a/src/ChangeLog b/src/ChangeLog
index 38f2c6c..650df84 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2002-12-10  Juanma Barranquero  <lektu@terra.es>
+
+       * editfns.c (Fformat): Use alloca, not _alloca.
+
 2002-12-09  Richard M. Stallman  <rms@gnu.org>
 
        * 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 62bd324..6deb9b9 100644 (file)
--- 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
          {