(Fformat): Use alloca, not _alloca.

src/ChangeLog

+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
 

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
 	  {