comparison src/editfns.c @ 54846:e8865bfda38b

(Fformat): Fix allocation size of precision array.

54845:5e651158130c

  /* Precision for each spec, or -1, a flag value meaning no precision
     was given in that spec.  Element 0, corresonding to the format
     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 longest_format;
  Lisp_Object val;
  int arg_intervals = 0;

  /* discarded[I] is 1 if byte I of the format

  longest_format = 0;

  /* Make room in result for all the non-%-codes in the control string.  */
  total = 5 + CONVERTED_BYTE_SIZE (multibyte, args[0]);

  /* Allocate the info and discarded tables.  */ 
  {
    int nbytes = nargs * sizeof *info;
    int i;
    info = (struct info *) alloca (nbytes);
    bzero (info, nbytes);

54846:e8865bfda38b

  /* Precision for each spec, or -1, a flag value meaning no precision
     was given in that spec.  Element 0, corresonding to the format
     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 + 1) * sizeof (int)));
  int longest_format;
  Lisp_Object val;
  int arg_intervals = 0;

  /* discarded[I] is 1 if byte I of the format

  longest_format = 0;

  /* Make room in result for all the non-%-codes in the control string.  */
  total = 5 + CONVERTED_BYTE_SIZE (multibyte, args[0]);

  /* Allocate the info and discarded tables.  */
  {
    int nbytes = nargs * sizeof *info;
    int i;
    info = (struct info *) alloca (nbytes);
    bzero (info, nbytes);