comparison src/doc.c @ 3545:2ba8b7a25429

[xemacs-hg @ 2006-08-06 16:37:31 by aidan] Add an informative assertion and comment to snarf-documentation.
author aidan
date Sun, 06 Aug 2006 16:37:33 +0000
parents 41c353ad2c74
children 9b8943d0d12a
comparison
equal deleted inserted replaced
3544:981a144e71fa 3545:2ba8b7a25429
740 while (p != end && *p != '\037') p++; 740 while (p != end && *p != '\037') p++;
741 /* p points to ^_Ffunctionname\n or ^_Vvarname\n. */ 741 /* p points to ^_Ffunctionname\n or ^_Vvarname\n. */
742 if (p != end) 742 if (p != end)
743 { 743 {
744 end = qxestrchr (p, '\n'); 744 end = qxestrchr (p, '\n');
745 /* If you trigger a failure with of this assertion, you probably
746 configured with --quick-build and need to to rebuild your DOC
747 file. */
748 assert((end - p - 2) > -1);
745 sym = oblookup (Vobarray, p + 2, end - p - 2); 749 sym = oblookup (Vobarray, p + 2, end - p - 2);
746 if (SYMBOLP (sym)) 750 if (SYMBOLP (sym))
747 { 751 {
748 Lisp_Object offset = make_int (pos + end + 1 - buf); 752 Lisp_Object offset = make_int (pos + end + 1 - buf);
749 /* Attach a docstring to a variable */ 753 /* Attach a docstring to a variable */