Mercurial > emacs

comparison src/doc.c @ 44385:d5cf9afe17d6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fdocumentation): More brainos. I need sleep.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 03 Apr 2002 18:05:07 +0000
parents e44eec58a815
children 65ad2c8b301b
comparison
equal deleted inserted replaced
44384:3626a12fe452 44385:d5cf9afe17d6
439 Fsignal (Qinvalid_function, Fcons (fun, Qnil)); 439 Fsignal (Qinvalid_function, Fcons (fun, Qnil));
440 } 440 }
441 441
442 /* If DOC is 0, it's typically because of a dumped file missing 442 /* If DOC is 0, it's typically because of a dumped file missing
443 from the DOC file (bug in src/Makefile.in). */ 443 from the DOC file (bug in src/Makefile.in). */
444 if (EQ (tem, make_number (0))) 444 if (EQ (doc, make_number (0)))
445 tem = Qnil; 445 doc = Qnil;
446 if (INTEGERP (doc) || CONSP (doc)) 446 if (INTEGERP (doc) || CONSP (doc))
447 { 447 {
448 Lisp_Object tem; 448 Lisp_Object tem;
449 tem = get_doc_string (doc, 0, 0); 449 tem = get_doc_string (doc, 0, 0);
450 if (NILP (tem) && try_reload) 450 if (NILP (tem) && try_reload)
486 486
487 documentation_property: 487 documentation_property:
488 488
489 tem = Fget (symbol, prop); 489 tem = Fget (symbol, prop);
490 if (EQ (tem, make_number (0))) 490 if (EQ (tem, make_number (0)))
491 tem = Qnil; 491 tem = Qnil;
492 if (INTEGERP (tem) || (CONSP (tem) && INTEGERP (XCDR (tem)))) 492 if (INTEGERP (tem) || (CONSP (tem) && INTEGERP (XCDR (tem))))
493 { 493 {
494 Lisp_Object doc = tem; 494 Lisp_Object doc = tem;
495 tem = get_doc_string (tem, 0, 0); 495 tem = get_doc_string (tem, 0, 0);
496 if (NILP (tem) && try_reload) 496 if (NILP (tem) && try_reload)