Mercurial > emacs
diff src/doc.c @ 54745:98cf37e32872
(Fsnarf_documentation): Ignore new file name entries.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Wed, 07 Apr 2004 19:17:36 +0000 |
parents | e1003d782dc6 |
children | 7b6b4d9ae726 |
line wrap: on
line diff
--- a/src/doc.c Wed Apr 07 12:57:55 2004 +0000 +++ b/src/doc.c Wed Apr 07 19:17:36 2004 +0000 @@ -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 @@ *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 @@ 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); }