#

Special Operator FUNCTION

Syntax:

function name => function

Arguments and Values:

name---a function name or lambda expression.

function---a function object.

Description:

The value of function is the functional value of name in the current lexical environment.

If name is a function name, the functional definition of that name is that established by the innermost lexically enclosing flet, labels, or macrolet form, if there is one. Otherwise the global functional definition of the function name is returned.

If name is a lambda expression, then a lexical closure is returned. In situations where a closure over the same set of bindings might be produced more than once, the various resulting closures might or might not be eq.

It is an error to use function on a function name that does not denote a function in the lexical environment in which the function form appears. Specifically, it is an error to use function on a symbol that denotes a macro or special form. An implementation may choose not to signal this error for performance reasons, but implementations are forbidden from defining the failure to signal an error as a useful behavior.

Examples:

     (defun adder (x) (function (lambda (y) (+ x y))))

The result of `(adder 3)` is a function that adds `3` to its argument:

     (setq add3 (adder 3))
     (funcall add3 5) =>  8

This works because function creates a closure of the lambda expression that is able to refer to the value `3` of the variable `x` even after control has returned from the function `adder`.

Side Effects: None.

Affected By: None.

Exceptional Situations: None.

See Also:

defun, fdefinition, flet, labels, symbol-function, Section 3.1.2.1.1 (Symbols as Forms), Section 2.4.8.2 (Sharpsign Single-Quote), Section 22.1.3.13 (Printing Other Objects)

Notes:

The notation `#'`name`` may be used as an abbreviation for `(function` name`)`.

The following X3J13 cleanup issues, not part of the specification, apply to this section:

- FUNCTION-TYPE:X3J13-MARCH-88
- FUNCTION-NAME:LARGE

Copyright 1996-2005, LispWorks Ltd. All rights reserved.