mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-26 07:33:47 +00:00
Code Issues Releases Activity

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

Browse Source
This commit is contained in:
Chong Yidong 2010-02-20 09:11:20 -05:00
parent 3e39928c77
commit f9b84f9f4b
2 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lib-src/ChangeLog
View File

@ -1,3 +1,8 @@
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

5
lib-src/etags.c
View File

@ -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);
}