From ca56fb8c672ee9745166cbf36c84c2d58acd028f Mon Sep 17 00:00:00 2001 From: "Kim F. Storm" Date: Fri, 10 Feb 2006 00:09:18 +0000 Subject: [PATCH] (Function Indirection): Add NOERROR to indirect-function. --- lispref/eval.texi | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) diff --git a/lispref/eval.texi b/lispref/eval.texi index d898e08850b..803f3d4a70d 100644 --- a/lispref/eval.texi +++ b/lispref/eval.texi @@ -314,16 +314,20 @@ symbol function indirection when calling @code{erste}. perform symbol function indirection explicitly. @c Emacs 19 feature -@defun indirect-function function +@defun indirect-function function &optional noerror @anchor{Definition of indirect-function} This function returns the meaning of @var{function} as a function. If @var{function} is a symbol, then it finds @var{function}'s function definition and starts over with that value. If @var{function} is not a symbol, then it returns @var{function} itself. -This function signals a @code{void-function} error if the final -symbol is unbound and a @code{cyclic-function-indirection} error if -there is a loop in the chain of symbols. +This function signals a @code{void-function} error if the final symbol +is unbound and optional argument @var{noerror} is @code{nil} or +omitted. Otherwise, if @var{noerror} is non-@code{nil}, it returns +@code{nil} if the final symbol is unbound. + +It signals a @code{cyclic-function-indirection} error if there is a +loop in the chain of symbols. Here is how you could define @code{indirect-function} in Lisp: -- 2.39.2