(Fsnarf_documentation): Ignore new file name entries.
This commit is contained in:
parent
1618ce6df7
commit
a12a9bd6ab
1 changed files with 6 additions and 3 deletions
|
@ -1,5 +1,6 @@
|
|||
/* Record indices of function doc strings stored in a file.
|
||||
Copyright (C) 1985, 86,93,94,95,97,98,99, 2000 Free Software Foundation, Inc.
|
||||
Copyright (C) 1985, 86,93,94,95,97,98,99,2000,04
|
||||
Free Software Foundation, Inc.
|
||||
|
||||
This file is part of GNU Emacs.
|
||||
|
||||
|
@ -612,8 +613,7 @@ the same file name is found in the `data-directory'. */)
|
|||
*p = '_';
|
||||
p++;
|
||||
}
|
||||
#endif /* not VMS4_4 */
|
||||
#ifdef VMS4_4
|
||||
#else /* VMS4_4 */
|
||||
strcpy (name, sys_translate_unix (name));
|
||||
#endif /* VMS4_4 */
|
||||
#endif /* VMS */
|
||||
|
@ -660,6 +660,9 @@ the same file name is found in the `data-directory'. */)
|
|||
else if (p[1] == 'F')
|
||||
store_function_docstring (sym, pos + end + 1 - buf);
|
||||
|
||||
else if (p[1] == 'S')
|
||||
; /* Just a source file name boundary marker. Ignore it. */
|
||||
|
||||
else
|
||||
error ("DOC file invalid at position %d", pos);
|
||||
}
|
||||
|
|
Loading…
Add table
Reference in a new issue