Mercurial > hg > xemacs-beta

comparison src/doc.c @ 189:489f57a838ef r20-3b21

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b21
author cvs
date Mon, 13 Aug 2007 09:57:07 +0200
parents 3d6bfa290dbd
children 41ff10fd062f
comparison
equal deleted inserted replaced
188:e29a8e7498d9 189:489f57a838ef
487 } 487 }
488 /* Attach a docstring to a function. 488 /* Attach a docstring to a function.
489 The type determines where the docstring is stored. */ 489 The type determines where the docstring is stored. */
490 else if (p[1] == 'F') 490 else if (p[1] == 'F')
491 { 491 {
492 fun = XSYMBOL (sym)->function;/*indirect_function (sym,0);*/ 492 fun = indirect_function (sym,0);
493 493
494 if (CONSP (fun) && EQ (XCAR (fun), Qmacro)) 494 if (CONSP (fun) && EQ (XCAR (fun), Qmacro))
495 fun = XCDR (fun); 495 fun = XCDR (fun);
496 496
497 if (UNBOUNDP (fun)) 497 if (UNBOUNDP (fun))