Merge from emacs-24; up to 2012-04-21T14:12:27Z!sdl.web@gmail.com
[bpt/emacs.git] / doc / lispref / eval.texi
CommitLineData
b8d4c8d0
GM
1@c -*-texinfo-*-
2@c This is part of the GNU Emacs Lisp Reference Manual.
1e103a7c 3@c Copyright (C) 1990-1994, 1998, 2001-2012 Free Software Foundation, Inc.
b8d4c8d0 4@c See the file elisp.texi for copying conditions.
b8d4c8d0
GM
5@node Evaluation, Control Structures, Symbols, Top
6@chapter Evaluation
7@cindex evaluation
8@cindex interpreter
9@cindex interpreter
10@cindex value of expression
11
12 The @dfn{evaluation} of expressions in Emacs Lisp is performed by the
13@dfn{Lisp interpreter}---a program that receives a Lisp object as input
14and computes its @dfn{value as an expression}. How it does this depends
15on the data type of the object, according to rules described in this
16chapter. The interpreter runs automatically to evaluate portions of
17your program, but can also be called explicitly via the Lisp primitive
18function @code{eval}.
19
20@ifnottex
21@menu
22* Intro Eval:: Evaluation in the scheme of things.
23* Forms:: How various sorts of objects are evaluated.
24* Quoting:: Avoiding evaluation (to put constants in the program).
03988c98 25* Backquote:: Easier construction of list structure.
b8d4c8d0
GM
26* Eval:: How to invoke the Lisp interpreter explicitly.
27@end menu
28
29@node Intro Eval
30@section Introduction to Evaluation
31
a5b99fab
CY
32 The Lisp interpreter, or evaluator, is the part of Emacs that
33computes the value of an expression that is given to it. When a
34function written in Lisp is called, the evaluator computes the value
35of the function by evaluating the expressions in the function body.
36Thus, running any Lisp program really means running the Lisp
37interpreter.
b8d4c8d0
GM
38@end ifnottex
39
a5b99fab 40@cindex form
b8d4c8d0 41@cindex expression
a037c171
CY
42@cindex S-expression
43 A Lisp object that is intended for evaluation is called a @dfn{form}
44or @dfn{expression}@footnote{It is sometimes also referred to as an
45@dfn{S-expression} or @dfn{sexp}, but we generally do not use this
46terminology in this manual.}. The fact that forms are data objects
47and not merely text is one of the fundamental differences between
48Lisp-like languages and typical programming languages. Any object can
49be evaluated, but in practice only numbers, symbols, lists and strings
50are evaluated very often.
b8d4c8d0 51
a5b99fab
CY
52 In subsequent sections, we will describe the details of what
53evaluation means for each kind of form.
54
55 It is very common to read a Lisp form and then evaluate the form,
56but reading and evaluation are separate activities, and either can be
57performed alone. Reading per se does not evaluate anything; it
58converts the printed representation of a Lisp object to the object
59itself. It is up to the caller of @code{read} to specify whether this
b8d4c8d0
GM
60object is a form to be evaluated, or serves some entirely different
61purpose. @xref{Input Functions}.
62
b8d4c8d0 63@cindex recursive evaluation
a5b99fab
CY
64 Evaluation is a recursive process, and evaluating a form often
65involves evaluating parts within that form. For instance, when you
66evaluate a @dfn{function call} form such as @code{(car x)}, Emacs
67first evaluates the argument (the subform @code{x}). After evaluating
68the argument, Emacs @dfn{executes} the function (@code{car}), and if
69the function is written in Lisp, execution works by evaluating the
31cbea1d
CY
70@dfn{body} of the function (in this example, however, @code{car} is
71not a Lisp function; it is a primitive function implemented in C).
a5b99fab
CY
72@xref{Functions}, for more information about functions and function
73calls.
b8d4c8d0
GM
74
75@cindex environment
a5b99fab
CY
76 Evaluation takes place in a context called the @dfn{environment},
77which consists of the current values and bindings of all Lisp
78variables (@pxref{Variables}).@footnote{This definition of
79``environment'' is specifically not intended to include all the data
80that can affect the result of a program.} Whenever a form refers to a
81variable without creating a new binding for it, the variable evaluates
82to the value given by the current environment. Evaluating a form may
31cbea1d
CY
83also temporarily alter the environment by binding variables
84(@pxref{Local Variables}).
b8d4c8d0
GM
85
86@cindex side effect
a5b99fab
CY
87 Evaluating a form may also make changes that persist; these changes
88are called @dfn{side effects}. An example of a form that produces a
89side effect is @code{(setq foo 1)}.
b8d4c8d0 90
a5b99fab
CY
91 Do not confuse evaluation with command key interpretation. The
92editor command loop translates keyboard input into a command (an
93interactively callable function) using the active keymaps, and then
94uses @code{call-interactively} to execute that command. Executing the
95command usually involves evaluation, if the command is written in
96Lisp; however, this step is not considered a part of command key
97interpretation. @xref{Command Loop}.
b8d4c8d0
GM
98
99@node Forms
100@section Kinds of Forms
101
a037c171
CY
102 A Lisp object that is intended to be evaluated is called a
103@dfn{form} (or an @dfn{expression}). How Emacs evaluates a form
104depends on its data type. Emacs has three different kinds of form
105that are evaluated differently: symbols, lists, and ``all other
16152b76 106types''. This section describes all three kinds, one by one, starting
a037c171 107with the ``all other types'' which are self-evaluating forms.
b8d4c8d0
GM
108
109@menu
110* Self-Evaluating Forms:: Forms that evaluate to themselves.
111* Symbol Forms:: Symbols evaluate as variables.
112* Classifying Lists:: How to distinguish various sorts of list forms.
113* Function Indirection:: When a symbol appears as the car of a list,
d24880de 114 we find the real function via the symbol.
b8d4c8d0
GM
115* Function Forms:: Forms that call functions.
116* Macro Forms:: Forms that call macros.
117* Special Forms:: "Special forms" are idiosyncratic primitives,
118 most of them extremely important.
119* Autoloading:: Functions set up to load files
120 containing their real definitions.
121@end menu
122
123@node Self-Evaluating Forms
124@subsection Self-Evaluating Forms
125@cindex vector evaluation
126@cindex literal evaluation
127@cindex self-evaluating form
128
a5b99fab
CY
129 A @dfn{self-evaluating form} is any form that is not a list or
130symbol. Self-evaluating forms evaluate to themselves: the result of
131evaluation is the same object that was evaluated. Thus, the number 25
132evaluates to 25, and the string @code{"foo"} evaluates to the string
133@code{"foo"}. Likewise, evaluating a vector does not cause evaluation
134of the elements of the vector---it returns the same vector with its
135contents unchanged.
b8d4c8d0
GM
136
137@example
138@group
139'123 ; @r{A number, shown without evaluation.}
140 @result{} 123
141@end group
142@group
143123 ; @r{Evaluated as usual---result is the same.}
144 @result{} 123
145@end group
146@group
147(eval '123) ; @r{Evaluated ``by hand''---result is the same.}
148 @result{} 123
149@end group
150@group
151(eval (eval '123)) ; @r{Evaluating twice changes nothing.}
152 @result{} 123
153@end group
154@end example
155
156 It is common to write numbers, characters, strings, and even vectors
157in Lisp code, taking advantage of the fact that they self-evaluate.
158However, it is quite unusual to do this for types that lack a read
159syntax, because there's no way to write them textually. It is possible
160to construct Lisp expressions containing these types by means of a Lisp
161program. Here is an example:
162
163@example
164@group
165;; @r{Build an expression containing a buffer object.}
166(setq print-exp (list 'print (current-buffer)))
167 @result{} (print #<buffer eval.texi>)
168@end group
169@group
170;; @r{Evaluate it.}
171(eval print-exp)
172 @print{} #<buffer eval.texi>
173 @result{} #<buffer eval.texi>
174@end group
175@end example
176
177@node Symbol Forms
178@subsection Symbol Forms
179@cindex symbol evaluation
180
181 When a symbol is evaluated, it is treated as a variable. The result
31cbea1d
CY
182is the variable's value, if it has one. If the symbol has no value as
183a variable, the Lisp interpreter signals an error. For more
184information on the use of variables, see @ref{Variables}.
b8d4c8d0
GM
185
186 In the following example, we set the value of a symbol with
187@code{setq}. Then we evaluate the symbol, and get back the value that
188@code{setq} stored.
189
190@example
191@group
192(setq a 123)
193 @result{} 123
194@end group
195@group
196(eval 'a)
197 @result{} 123
198@end group
199@group
200a
201 @result{} 123
202@end group
203@end example
204
205 The symbols @code{nil} and @code{t} are treated specially, so that the
206value of @code{nil} is always @code{nil}, and the value of @code{t} is
207always @code{t}; you cannot set or bind them to any other values. Thus,
208these two symbols act like self-evaluating forms, even though
209@code{eval} treats them like any other symbol. A symbol whose name
210starts with @samp{:} also self-evaluates in the same way; likewise,
211its value ordinarily cannot be changed. @xref{Constant Variables}.
212
213@node Classifying Lists
214@subsection Classification of List Forms
215@cindex list form evaluation
216
217 A form that is a nonempty list is either a function call, a macro
218call, or a special form, according to its first element. These three
219kinds of forms are evaluated in different ways, described below. The
220remaining list elements constitute the @dfn{arguments} for the function,
221macro, or special form.
222
223 The first step in evaluating a nonempty list is to examine its first
224element. This element alone determines what kind of form the list is
225and how the rest of the list is to be processed. The first element is
226@emph{not} evaluated, as it would be in some Lisp dialects such as
227Scheme.
228
229@node Function Indirection
230@subsection Symbol Function Indirection
231@cindex symbol function indirection
232@cindex indirection for functions
233@cindex void function
234
a5b99fab
CY
235 If the first element of the list is a symbol then evaluation
236examines the symbol's function cell, and uses its contents instead of
237the original symbol. If the contents are another symbol, this
238process, called @dfn{symbol function indirection}, is repeated until
239it obtains a non-symbol. @xref{Function Names}, for more information
240about symbol function indirection.
b8d4c8d0
GM
241
242 One possible consequence of this process is an infinite loop, in the
243event that a symbol's function cell refers to the same symbol. Or a
244symbol may have a void function cell, in which case the subroutine
245@code{symbol-function} signals a @code{void-function} error. But if
246neither of these things happens, we eventually obtain a non-symbol,
247which ought to be a function or other suitable object.
248
249@kindex invalid-function
250 More precisely, we should now have a Lisp function (a lambda
a5b99fab
CY
251expression), a byte-code function, a primitive function, a Lisp macro,
252a special form, or an autoload object. Each of these types is a case
253described in one of the following sections. If the object is not one
254of these types, Emacs signals an @code{invalid-function} error.
b8d4c8d0
GM
255
256 The following example illustrates the symbol indirection process. We
257use @code{fset} to set the function cell of a symbol and
258@code{symbol-function} to get the function cell contents
259(@pxref{Function Cells}). Specifically, we store the symbol @code{car}
260into the function cell of @code{first}, and the symbol @code{first} into
261the function cell of @code{erste}.
262
ddff3351 263@example
b8d4c8d0
GM
264@group
265;; @r{Build this function cell linkage:}
266;; ------------- ----- ------- -------
267;; | #<subr car> | <-- | car | <-- | first | <-- | erste |
268;; ------------- ----- ------- -------
269@end group
b8d4c8d0
GM
270@group
271(symbol-function 'car)
272 @result{} #<subr car>
273@end group
274@group
275(fset 'first 'car)
276 @result{} car
277@end group
278@group
279(fset 'erste 'first)
280 @result{} first
281@end group
282@group
283(erste '(1 2 3)) ; @r{Call the function referenced by @code{erste}.}
284 @result{} 1
285@end group
ddff3351 286@end example
b8d4c8d0
GM
287
288 By contrast, the following example calls a function without any symbol
289function indirection, because the first element is an anonymous Lisp
290function, not a symbol.
291
ddff3351 292@example
b8d4c8d0
GM
293@group
294((lambda (arg) (erste arg))
295 '(1 2 3))
296 @result{} 1
297@end group
ddff3351 298@end example
b8d4c8d0
GM
299
300@noindent
301Executing the function itself evaluates its body; this does involve
302symbol function indirection when calling @code{erste}.
303
88ed9e87
SM
304 This form is rarely used and is now deprecated. Instead, you should write it
305as:
306
ddff3351 307@example
88ed9e87
SM
308@group
309(funcall (lambda (arg) (erste arg))
310 '(1 2 3))
311@end group
ddff3351 312@end example
88ed9e87 313or just
ddff3351 314@example
88ed9e87
SM
315@group
316(let ((arg '(1 2 3))) (erste arg))
317@end group
ddff3351 318@end example
88ed9e87 319
b8d4c8d0
GM
320 The built-in function @code{indirect-function} provides an easy way to
321perform symbol function indirection explicitly.
322
323@c Emacs 19 feature
324@defun indirect-function function &optional noerror
325@anchor{Definition of indirect-function}
326This function returns the meaning of @var{function} as a function. If
327@var{function} is a symbol, then it finds @var{function}'s function
328definition and starts over with that value. If @var{function} is not a
329symbol, then it returns @var{function} itself.
330
331This function signals a @code{void-function} error if the final symbol
332is unbound and optional argument @var{noerror} is @code{nil} or
333omitted. Otherwise, if @var{noerror} is non-@code{nil}, it returns
334@code{nil} if the final symbol is unbound.
335
336It signals a @code{cyclic-function-indirection} error if there is a
337loop in the chain of symbols.
338
339Here is how you could define @code{indirect-function} in Lisp:
340
ddff3351 341@example
b8d4c8d0
GM
342(defun indirect-function (function)
343 (if (symbolp function)
344 (indirect-function (symbol-function function))
345 function))
ddff3351 346@end example
b8d4c8d0
GM
347@end defun
348
349@node Function Forms
350@subsection Evaluation of Function Forms
351@cindex function form evaluation
352@cindex function call
353
354 If the first element of a list being evaluated is a Lisp function
355object, byte-code object or primitive function object, then that list is
356a @dfn{function call}. For example, here is a call to the function
357@code{+}:
358
359@example
360(+ 1 x)
361@end example
362
363 The first step in evaluating a function call is to evaluate the
364remaining elements of the list from left to right. The results are the
365actual argument values, one value for each list element. The next step
366is to call the function with this list of arguments, effectively using
367the function @code{apply} (@pxref{Calling Functions}). If the function
368is written in Lisp, the arguments are used to bind the argument
369variables of the function (@pxref{Lambda Expressions}); then the forms
370in the function body are evaluated in order, and the value of the last
371body form becomes the value of the function call.
372
373@node Macro Forms
374@subsection Lisp Macro Evaluation
375@cindex macro call evaluation
376
377 If the first element of a list being evaluated is a macro object, then
378the list is a @dfn{macro call}. When a macro call is evaluated, the
379elements of the rest of the list are @emph{not} initially evaluated.
380Instead, these elements themselves are used as the arguments of the
381macro. The macro definition computes a replacement form, called the
382@dfn{expansion} of the macro, to be evaluated in place of the original
383form. The expansion may be any sort of form: a self-evaluating
384constant, a symbol, or a list. If the expansion is itself a macro call,
385this process of expansion repeats until some other sort of form results.
386
387 Ordinary evaluation of a macro call finishes by evaluating the
388expansion. However, the macro expansion is not necessarily evaluated
389right away, or at all, because other programs also expand macro calls,
390and they may or may not evaluate the expansions.
391
392 Normally, the argument expressions are not evaluated as part of
393computing the macro expansion, but instead appear as part of the
394expansion, so they are computed when the expansion is evaluated.
395
396 For example, given a macro defined as follows:
397
398@example
399@group
400(defmacro cadr (x)
401 (list 'car (list 'cdr x)))
402@end group
403@end example
404
405@noindent
406an expression such as @code{(cadr (assq 'handler list))} is a macro
407call, and its expansion is:
408
409@example
410(car (cdr (assq 'handler list)))
411@end example
412
413@noindent
414Note that the argument @code{(assq 'handler list)} appears in the
415expansion.
416
417@xref{Macros}, for a complete description of Emacs Lisp macros.
418
419@node Special Forms
420@subsection Special Forms
45e46036
EZ
421@cindex special forms
422@cindex evaluation of special forms
b8d4c8d0
GM
423
424 A @dfn{special form} is a primitive function specially marked so that
425its arguments are not all evaluated. Most special forms define control
426structures or perform variable bindings---things which functions cannot
427do.
428
429 Each special form has its own rules for which arguments are evaluated
430and which are used without evaluation. Whether a particular argument is
431evaluated may depend on the results of evaluating other arguments.
432
433 Here is a list, in alphabetical order, of all of the special forms in
434Emacs Lisp with a reference to where each is described.
435
436@table @code
437@item and
438@pxref{Combining Conditions}
439
440@item catch
441@pxref{Catch and Throw}
442
443@item cond
444@pxref{Conditionals}
445
446@item condition-case
447@pxref{Handling Errors}
448
449@item defconst
450@pxref{Defining Variables}
451
452@item defmacro
453@pxref{Defining Macros}
454
455@item defun
456@pxref{Defining Functions}
457
458@item defvar
459@pxref{Defining Variables}
460
461@item function
462@pxref{Anonymous Functions}
463
464@item if
465@pxref{Conditionals}
466
467@item interactive
468@pxref{Interactive Call}
469
470@item let
471@itemx let*
472@pxref{Local Variables}
473
474@item or
475@pxref{Combining Conditions}
476
477@item prog1
478@itemx prog2
479@itemx progn
480@pxref{Sequencing}
481
482@item quote
483@pxref{Quoting}
484
485@item save-current-buffer
486@pxref{Current Buffer}
487
488@item save-excursion
489@pxref{Excursions}
490
491@item save-restriction
492@pxref{Narrowing}
493
494@item save-window-excursion
495@pxref{Window Configurations}
496
497@item setq
498@pxref{Setting Variables}
499
500@item setq-default
501@pxref{Creating Buffer-Local}
502
503@item track-mouse
504@pxref{Mouse Tracking}
505
506@item unwind-protect
507@pxref{Nonlocal Exits}
508
509@item while
510@pxref{Iteration}
511
512@item with-output-to-temp-buffer
513@pxref{Temporary Displays}
514@end table
515
516@cindex CL note---special forms compared
517@quotation
518@b{Common Lisp note:} Here are some comparisons of special forms in
519GNU Emacs Lisp and Common Lisp. @code{setq}, @code{if}, and
520@code{catch} are special forms in both Emacs Lisp and Common Lisp.
521@code{defun} is a special form in Emacs Lisp, but a macro in Common
522Lisp. @code{save-excursion} is a special form in Emacs Lisp, but
523doesn't exist in Common Lisp. @code{throw} is a special form in
524Common Lisp (because it must be able to throw multiple values), but it
525is a function in Emacs Lisp (which doesn't have multiple
526values).@refill
527@end quotation
528
529@node Autoloading
530@subsection Autoloading
531
532 The @dfn{autoload} feature allows you to call a function or macro
533whose function definition has not yet been loaded into Emacs. It
534specifies which file contains the definition. When an autoload object
535appears as a symbol's function definition, calling that symbol as a
310a820f
EZ
536function automatically loads the specified file; then it calls the
537real definition loaded from that file. The way to arrange for an
538autoload object to appear as a symbol's function definition is
539described in @ref{Autoload}.
b8d4c8d0
GM
540
541@node Quoting
542@section Quoting
543
544 The special form @code{quote} returns its single argument, as written,
545without evaluating it. This provides a way to include constant symbols
546and lists, which are not self-evaluating objects, in a program. (It is
547not necessary to quote self-evaluating objects such as numbers, strings,
548and vectors.)
549
550@defspec quote object
551This special form returns @var{object}, without evaluating it.
552@end defspec
553
554@cindex @samp{'} for quoting
555@cindex quoting using apostrophe
556@cindex apostrophe for quoting
557Because @code{quote} is used so often in programs, Lisp provides a
558convenient read syntax for it. An apostrophe character (@samp{'})
559followed by a Lisp object (in read syntax) expands to a list whose first
560element is @code{quote}, and whose second element is the object. Thus,
561the read syntax @code{'x} is an abbreviation for @code{(quote x)}.
562
563Here are some examples of expressions that use @code{quote}:
564
565@example
566@group
567(quote (+ 1 2))
568 @result{} (+ 1 2)
569@end group
570@group
571(quote foo)
572 @result{} foo
573@end group
574@group
575'foo
576 @result{} foo
577@end group
578@group
579''foo
580 @result{} (quote foo)
581@end group
582@group
583'(quote foo)
584 @result{} (quote foo)
585@end group
586@group
587['foo]
588 @result{} [(quote foo)]
589@end group
590@end example
591
592 Other quoting constructs include @code{function} (@pxref{Anonymous
593Functions}), which causes an anonymous lambda expression written in Lisp
594to be compiled, and @samp{`} (@pxref{Backquote}), which is used to quote
595only part of a list, while computing and substituting other parts.
596
03988c98
CY
597@node Backquote
598@section Backquote
599@cindex backquote (list substitution)
600@cindex ` (list substitution)
601@findex `
602
603 @dfn{Backquote constructs} allow you to quote a list, but
604selectively evaluate elements of that list. In the simplest case, it
605is identical to the special form @code{quote}
606@iftex
607@end iftex
608@ifnottex
609(described in the previous section; @pxref{Quoting}).
610@end ifnottex
611For example, these two forms yield identical results:
612
613@example
614@group
615`(a list of (+ 2 3) elements)
616 @result{} (a list of (+ 2 3) elements)
617@end group
618@group
619'(a list of (+ 2 3) elements)
620 @result{} (a list of (+ 2 3) elements)
621@end group
622@end example
623
624@findex , @r{(with backquote)}
625 The special marker @samp{,} inside of the argument to backquote
626indicates a value that isn't constant. The Emacs Lisp evaluator
627evaluates the argument of @samp{,}, and puts the value in the list
628structure:
629
630@example
631@group
632`(a list of ,(+ 2 3) elements)
633 @result{} (a list of 5 elements)
634@end group
635@end example
636
637@noindent
638Substitution with @samp{,} is allowed at deeper levels of the list
639structure also. For example:
640
641@example
642@group
643`(1 2 (3 ,(+ 4 5)))
644 @result{} (1 2 (3 9))
645@end group
646@end example
647
648@findex ,@@ @r{(with backquote)}
649@cindex splicing (with backquote)
650 You can also @dfn{splice} an evaluated value into the resulting list,
651using the special marker @samp{,@@}. The elements of the spliced list
652become elements at the same level as the other elements of the resulting
653list. The equivalent code without using @samp{`} is often unreadable.
654Here are some examples:
655
656@example
657@group
658(setq some-list '(2 3))
659 @result{} (2 3)
660@end group
661@group
662(cons 1 (append some-list '(4) some-list))
663 @result{} (1 2 3 4 2 3)
664@end group
665@group
666`(1 ,@@some-list 4 ,@@some-list)
667 @result{} (1 2 3 4 2 3)
668@end group
669
670@group
671(setq list '(hack foo bar))
672 @result{} (hack foo bar)
673@end group
674@group
675(cons 'use
676 (cons 'the
677 (cons 'words (append (cdr list) '(as elements)))))
678 @result{} (use the words foo bar as elements)
679@end group
680@group
681`(use the words ,@@(cdr list) as elements)
682 @result{} (use the words foo bar as elements)
683@end group
684@end example
685
686
b8d4c8d0
GM
687@node Eval
688@section Eval
689
690 Most often, forms are evaluated automatically, by virtue of their
691occurrence in a program being run. On rare occasions, you may need to
692write code that evaluates a form that is computed at run time, such as
693after reading a form from text being edited or getting one from a
694property list. On these occasions, use the @code{eval} function.
d032d5e7
SM
695Often @code{eval} is not needed and something else should be used instead.
696For example, to get the value of a variable, while @code{eval} works,
697@code{symbol-value} is preferable; or rather than store expressions
698in a property list that then need to go through @code{eval}, it is better to
699store functions instead that are then passed to @code{funcall}.
b8d4c8d0
GM
700
701 The functions and variables described in this section evaluate forms,
702specify limits to the evaluation process, or record recently returned
703values. Loading a file also does evaluation (@pxref{Loading}).
704
705 It is generally cleaner and more flexible to store a function in a
706data structure, and call it with @code{funcall} or @code{apply}, than
707to store an expression in the data structure and evaluate it. Using
708functions provides the ability to pass information to them as
709arguments.
710
d032d5e7 711@defun eval form &optional lexical
31cbea1d 712This is the basic function for evaluating an expression. It evaluates
b8d4c8d0
GM
713@var{form} in the current environment and returns the result. How the
714evaluation proceeds depends on the type of the object (@pxref{Forms}).
31cbea1d
CY
715
716The argument @var{lexical}, if non-@code{nil}, means to evaluate
717@var{form} using lexical scoping rules for variables, instead of the
718default dynamic scoping rules. @xref{Lexical Binding}.
b8d4c8d0
GM
719
720Since @code{eval} is a function, the argument expression that appears
721in a call to @code{eval} is evaluated twice: once as preparation before
722@code{eval} is called, and again by the @code{eval} function itself.
723Here is an example:
724
725@example
726@group
727(setq foo 'bar)
728 @result{} bar
729@end group
730@group
731(setq bar 'baz)
732 @result{} baz
733;; @r{Here @code{eval} receives argument @code{foo}}
734(eval 'foo)
735 @result{} bar
736;; @r{Here @code{eval} receives argument @code{bar}, which is the value of @code{foo}}
737(eval foo)
738 @result{} baz
739@end group
740@end example
741
742The number of currently active calls to @code{eval} is limited to
743@code{max-lisp-eval-depth} (see below).
744@end defun
745
746@deffn Command eval-region start end &optional stream read-function
747@anchor{Definition of eval-region}
748This function evaluates the forms in the current buffer in the region
749defined by the positions @var{start} and @var{end}. It reads forms from
750the region and calls @code{eval} on them until the end of the region is
751reached, or until an error is signaled and not handled.
752
753By default, @code{eval-region} does not produce any output. However,
754if @var{stream} is non-@code{nil}, any output produced by output
755functions (@pxref{Output Functions}), as well as the values that
756result from evaluating the expressions in the region are printed using
757@var{stream}. @xref{Output Streams}.
758
759If @var{read-function} is non-@code{nil}, it should be a function,
760which is used instead of @code{read} to read expressions one by one.
761This function is called with one argument, the stream for reading
762input. You can also use the variable @code{load-read-function}
763(@pxref{Definition of load-read-function,, How Programs Do Loading})
764to specify this function, but it is more robust to use the
765@var{read-function} argument.
766
767@code{eval-region} does not move point. It always returns @code{nil}.
768@end deffn
769
770@cindex evaluation of buffer contents
771@deffn Command eval-buffer &optional buffer-or-name stream filename unibyte print
772This is similar to @code{eval-region}, but the arguments provide
773different optional features. @code{eval-buffer} operates on the
774entire accessible portion of buffer @var{buffer-or-name}.
775@var{buffer-or-name} can be a buffer, a buffer name (a string), or
776@code{nil} (or omitted), which means to use the current buffer.
777@var{stream} is used as in @code{eval-region}, unless @var{stream} is
778@code{nil} and @var{print} non-@code{nil}. In that case, values that
779result from evaluating the expressions are still discarded, but the
780output of the output functions is printed in the echo area.
781@var{filename} is the file name to use for @code{load-history}
782(@pxref{Unloading}), and defaults to @code{buffer-file-name}
783(@pxref{Buffer File Name}). If @var{unibyte} is non-@code{nil},
784@code{read} converts strings to unibyte whenever possible.
785
786@findex eval-current-buffer
787@code{eval-current-buffer} is an alias for this command.
788@end deffn
789
01f17ae2 790@defopt max-lisp-eval-depth
b8d4c8d0
GM
791@anchor{Definition of max-lisp-eval-depth}
792This variable defines the maximum depth allowed in calls to @code{eval},
793@code{apply}, and @code{funcall} before an error is signaled (with error
794message @code{"Lisp nesting exceeds max-lisp-eval-depth"}).
795
796This limit, with the associated error when it is exceeded, is one way
797Emacs Lisp avoids infinite recursion on an ill-defined function. If
798you increase the value of @code{max-lisp-eval-depth} too much, such
799code can cause stack overflow instead.
800@cindex Lisp nesting error
801
802The depth limit counts internal uses of @code{eval}, @code{apply}, and
803@code{funcall}, such as for calling the functions mentioned in Lisp
804expressions, and recursive evaluation of function call arguments and
805function body forms, as well as explicit calls in Lisp code.
806
a5b99fab
CY
807The default value of this variable is 400. If you set it to a value
808less than 100, Lisp will reset it to 100 if the given value is
809reached. Entry to the Lisp debugger increases the value, if there is
810little room left, to make sure the debugger itself has room to
811execute.
b8d4c8d0
GM
812
813@code{max-specpdl-size} provides another limit on nesting.
814@xref{Definition of max-specpdl-size,, Local Variables}.
01f17ae2 815@end defopt
b8d4c8d0
GM
816
817@defvar values
818The value of this variable is a list of the values returned by all the
819expressions that were read, evaluated, and printed from buffers
820(including the minibuffer) by the standard Emacs commands which do
821this. (Note that this does @emph{not} include evaluation in
2bb0eca1 822@file{*ielm*} buffers, nor evaluation using @kbd{C-j} in
b8d4c8d0
GM
823@code{lisp-interaction-mode}.) The elements are ordered most recent
824first.
825
826@example
827@group
828(setq x 1)
829 @result{} 1
830@end group
831@group
832(list 'A (1+ 2) auto-save-default)
833 @result{} (A 3 t)
834@end group
835@group
836values
837 @result{} ((A 3 t) 1 @dots{})
838@end group
839@end example
840
841This variable is useful for referring back to values of forms recently
842evaluated. It is generally a bad idea to print the value of
843@code{values} itself, since this may be very long. Instead, examine
844particular elements, like this:
845
846@example
847@group
848;; @r{Refer to the most recent evaluation result.}
849(nth 0 values)
850 @result{} (A 3 t)
851@end group
852@group
853;; @r{That put a new element on,}
854;; @r{so all elements move back one.}
855(nth 1 values)
856 @result{} (A 3 t)
857@end group
858@group
859;; @r{This gets the element that was next-to-most-recent}
860;; @r{before this example.}
861(nth 3 values)
862 @result{} 1
863@end group
864@end example
865@end defvar