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