# HG changeset patch # User Richard M. Stallman # Date 803764018 0 # Node ID f2e9eb6a8939b95e99399c176e00a48c57942285 # Parent 68508136431f57497e00a960c5dd4081ee80eac5 (scan_file): Make sure it never looks at filename[-1]. diff -r 68508136431f -r f2e9eb6a8939 lib-src/make-docfile.c --- a/lib-src/make-docfile.c Wed Jun 21 19:45:27 1995 +0000 +++ b/lib-src/make-docfile.c Wed Jun 21 19:46:58 1995 +0000 @@ -177,9 +177,9 @@ 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);