Mercurial > emacs
changeset 68780:eb6c6d7a4c7f
(Findirect_function): Rewrite docstring.
Fix omission bug: Declare new arg NOERROR.
| author | Thien-Thi Nguyen <ttn@gnuvola.org> |
|---|---|
| date | Fri, 10 Feb 2006 22:34:24 +0000 |
| parents | 156eafa22e3e |
| children | c7f7abf8709d |
| files | src/data.c |
| diffstat | 1 files changed, 6 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/src/data.c Fri Feb 10 20:04:50 2006 +0000 +++ b/src/data.c Fri Feb 10 22:34:24 2006 +0000 @@ -1929,15 +1929,15 @@ DEFUN ("indirect-function", Findirect_function, Sindirect_function, 1, 2, 0, doc: /* Return the function at the end of OBJECT's function chain. -If OBJECT is a symbol, follow all function indirections and return the final -function binding. -If OBJECT is not a symbol, just return it. -If optional arg NOERROR is nil, signal a void-function error if -the final symbol is unbound. Otherwise, just return nil is unbound. +If OBJECT is not a symbol, just return it. Otherwise, follow all +function indirections to find the final function binding and return it. +If the final symbol in the chain is unbound, signal a void-function error. +Optional arg NOERROR non-nil means to return nil instead of signalling. Signal a cyclic-function-indirection error if there is a loop in the function chain of symbols. */) -(object, noerror) + (object, noerror) register Lisp_Object object; + Lisp_Object noerror; { Lisp_Object result;