procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(Fformat): Use alloca, not _alloca.

Browse source
This commit is contained in:
Juanma Barranquero 2002-12-10 07:40:21 +00:00
parent 2573153f50
commit b11f1d8a33
2 changed files with 11 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
src/ChangeLog
View file

@ -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

8
src/editfns.c
View file

@ -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
{