Commit f9b84f9f authored by Chong Yidong's avatar Chong Yidong

* etags.c (Scheme_functions): Don't loop past a null character (Bug#5601).

parent 3e39928c
2010-02-20 Kevin Ryde <user42@zip.com.au>
* etags.c (Scheme_functions): Don't loop past a null character
(Bug#5601).
2010-01-29 Kester Habermann <kester@linuxtag.org> (tiny change)
* etags.c (Fortran_functions): Handle recursive keyword
......
......@@ -5004,8 +5004,9 @@ Scheme_functions (inf)
if (strneq (bp, "(def", 4) || strneq (bp, "(DEF", 4))
{
bp = skip_non_spaces (bp+4);
/* Skip over open parens and white space */
while (notinname (*bp))
/* Skip over open parens and white space. Don't continue past
'\0'. */
while (*bp && notinname (*bp))
bp++;
get_tag (bp, NULL);
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment