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

(scan_file): Make sure it never looks at filename[-1].

Browse source
This commit is contained in:
Richard M. Stallman 1995-06-21 19:46:58 +00:00
parent 5281dea442
commit dc61cb9dd8
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lib-src/make-docfile.c
View file

@ -177,9 +177,9 @@ scan_file (filename)
char *filename;
{
int len = strlen (filename);
if (!strcmp (filename + len - 4, ".elc"))
if (len > 4 && !strcmp (filename + len - 4, ".elc"))
return scan_lisp_file (filename, READ_BINARY);
else if (!strcmp (filename + len - 3, ".el"))
else if (len > 3 && !strcmp (filename + len - 3, ".el"))
return scan_lisp_file (filename, READ_TEXT);
else
return scan_c_file (filename, READ_TEXT);