comparison lib-src/etags.c @ 37719:9c4fdf982ba2

(add_regex): Reset the whole newly allocated pattern buffer instead of the individual members. It's safer and works with Xemacs.

37718:bffcf33fd50d

 * 2001 Nested classes by Francesco Potort́ based on work by Mykola Dzyuba.
 *
 *	Francesco Potort́ <[e-mail]> has maintained it since 1993.
 */

char pot_etags_version[] = "@(#) pot revision number is 14.18";

#define	TRUE	1
#define	FALSE	0

#ifdef DEBUG

add_regex (regexp_pattern, ignore_case, lang)
     char *regexp_pattern;
     bool ignore_case;
     language *lang;
{
  char *name;
  const char *err;
  struct re_pattern_buffer *patbuf;
  pattern *pp;

      return;
    }
  (void) scan_separators (name);

  patbuf = xnew (1, struct re_pattern_buffer);
  /* Translation table to fold case if appropriate. */
  patbuf->translate = (ignore_case) ? lc_trans : NULL;
  patbuf->fastmap = NULL;
  patbuf->buffer = NULL;
  patbuf->allocated = 0;

  err = re_compile_pattern (regexp_pattern, strlen (regexp_pattern), patbuf);
  if (err != NULL)
    {
      error ("%s while compiling pattern", err);

37719:9c4fdf982ba2

 * 2001 Nested classes by Francesco Potort́ based on work by Mykola Dzyuba.
 *
 *	Francesco Potort́ <[e-mail]> has maintained it since 1993.
 */

char pot_etags_version[] = "@(#) pot revision number is 14.20";

#define	TRUE	1
#define	FALSE	0

#ifdef DEBUG

add_regex (regexp_pattern, ignore_case, lang)
     char *regexp_pattern;
     bool ignore_case;
     language *lang;
{
  static struct re_pattern_buffer zeropattern;
  char *name;
  const char *err;
  struct re_pattern_buffer *patbuf;
  pattern *pp;

      return;
    }
  (void) scan_separators (name);

  patbuf = xnew (1, struct re_pattern_buffer);
  *patbuf = zeropattern;
  if (ignore_case)
    patbuf->translate = lc_trans;	/* translation table to fold case  */

  err = re_compile_pattern (regexp_pattern, strlen (regexp_pattern), patbuf);
  if (err != NULL)
    {
      error ("%s while compiling pattern", err);