Merge from emacs-23; up to 2010-06-16T23:27:20Z!jay.p.belanger@gmail.com.
[bpt/emacs.git] / doc / lispref / variables.texi
1 @c -*-texinfo-*-
2 @c This is part of the GNU Emacs Lisp Reference Manual.
3 @c Copyright (C) 1990-1995, 1998-2011 Free Software Foundation, Inc.
4 @c See the file elisp.texi for copying conditions.
5 @setfilename ../../info/variables
6 @node Variables, Functions, Control Structures, Top
7 @chapter Variables
8 @cindex variable
9
10 A @dfn{variable} is a name used in a program to stand for a value.
11 Nearly all programming languages have variables of some sort. In the
12 text of a Lisp program, variables are written using the syntax for
13 symbols.
14
15 In Lisp, unlike most programming languages, programs are represented
16 primarily as Lisp objects and only secondarily as text. The Lisp
17 objects used for variables are symbols: the symbol name is the
18 variable name, and the variable's value is stored in the value cell of
19 the symbol. The use of a symbol as a variable is independent of its
20 use as a function name. @xref{Symbol Components}.
21
22 The textual form of a Lisp program is given by the read syntax of
23 the Lisp objects that constitute the program. Hence, a variable in a
24 textual Lisp program is written using the read syntax for the symbol
25 representing the variable.
26
27 @menu
28 * Global Variables:: Variable values that exist permanently, everywhere.
29 * Constant Variables:: Certain "variables" have values that never change.
30 * Local Variables:: Variable values that exist only temporarily.
31 * Void Variables:: Symbols that lack values.
32 * Defining Variables:: A definition says a symbol is used as a variable.
33 * Tips for Defining:: Things you should think about when you
34 define a variable.
35 * Accessing Variables:: Examining values of variables whose names
36 are known only at run time.
37 * Setting Variables:: Storing new values in variables.
38 * Variable Scoping:: How Lisp chooses among local and global values.
39 * Buffer-Local Variables:: Variable values in effect only in one buffer.
40 * File Local Variables:: Handling local variable lists in files.
41 * Directory Local Variables:: Local variables common to all files in a directory.
42 * Frame-Local Variables:: Frame-local bindings for variables.
43 * Variable Aliases:: Variables that are aliases for other variables.
44 * Variables with Restricted Values:: Non-constant variables whose value can
45 @emph{not} be an arbitrary Lisp object.
46 @end menu
47
48 @node Global Variables
49 @section Global Variables
50 @cindex global variable
51
52 The simplest way to use a variable is @dfn{globally}. This means that
53 the variable has just one value at a time, and this value is in effect
54 (at least for the moment) throughout the Lisp system. The value remains
55 in effect until you specify a new one. When a new value replaces the
56 old one, no trace of the old value remains in the variable.
57
58 You specify a value for a symbol with @code{setq}. For example,
59
60 @example
61 (setq x '(a b))
62 @end example
63
64 @noindent
65 gives the variable @code{x} the value @code{(a b)}. Note that
66 @code{setq} is a special form (@pxref{Special Forms}); it does not
67 evaluate its first argument, the name of the variable, but it does
68 evaluate the second argument, the new value.
69
70 Once the variable has a value, you can refer to it by using the
71 symbol itself as an expression. Thus,
72
73 @example
74 @group
75 x @result{} (a b)
76 @end group
77 @end example
78
79 @noindent
80 assuming the @code{setq} form shown above has already been executed.
81
82 If you do set the same variable again, the new value replaces the old
83 one:
84
85 @example
86 @group
87 x
88 @result{} (a b)
89 @end group
90 @group
91 (setq x 4)
92 @result{} 4
93 @end group
94 @group
95 x
96 @result{} 4
97 @end group
98 @end example
99
100 @node Constant Variables
101 @section Variables that Never Change
102 @cindex @code{setting-constant} error
103 @cindex keyword symbol
104 @cindex variable with constant value
105 @cindex constant variables
106 @cindex symbol that evaluates to itself
107 @cindex symbol with constant value
108
109 In Emacs Lisp, certain symbols normally evaluate to themselves. These
110 include @code{nil} and @code{t}, as well as any symbol whose name starts
111 with @samp{:} (these are called @dfn{keywords}). These symbols cannot
112 be rebound, nor can their values be changed. Any attempt to set or bind
113 @code{nil} or @code{t} signals a @code{setting-constant} error. The
114 same is true for a keyword (a symbol whose name starts with @samp{:}),
115 if it is interned in the standard obarray, except that setting such a
116 symbol to itself is not an error.
117
118 @example
119 @group
120 nil @equiv{} 'nil
121 @result{} nil
122 @end group
123 @group
124 (setq nil 500)
125 @error{} Attempt to set constant symbol: nil
126 @end group
127 @end example
128
129 @defun keywordp object
130 function returns @code{t} if @var{object} is a symbol whose name
131 starts with @samp{:}, interned in the standard obarray, and returns
132 @code{nil} otherwise.
133 @end defun
134
135 These constants are fundamentally different from the ``constants''
136 defined using the @code{defconst} special form (@pxref{Defining
137 Variables}). A @code{defconst} form serves to inform human readers
138 that you do not intend to change the value of a variable, but Emacs
139 does not raise an error if you actually change it.
140
141 @node Local Variables
142 @section Local Variables
143 @cindex binding local variables
144 @cindex local variables
145 @cindex local binding
146 @cindex global binding
147
148 Global variables have values that last until explicitly superseded
149 with new values. Sometimes it is useful to create variable values that
150 exist temporarily---only until a certain part of the program finishes.
151 These values are called @dfn{local}, and the variables so used are
152 called @dfn{local variables}.
153
154 For example, when a function is called, its argument variables receive
155 new local values that last until the function exits. The @code{let}
156 special form explicitly establishes new local values for specified
157 variables; these last until exit from the @code{let} form.
158
159 @cindex shadowing of variables
160 Establishing a local value saves away the variable's previous value
161 (or lack of one). We say that the previous value is @dfn{shadowed}
162 and @dfn{not visible}. Both global and local values may be shadowed
163 (@pxref{Scope}). After the life span of the local value is over, the
164 previous value (or lack of one) is restored.
165
166 If you set a variable (such as with @code{setq}) while it is local,
167 this replaces the local value; it does not alter the global value, or
168 previous local values, that are shadowed. To model this behavior, we
169 speak of a @dfn{local binding} of the variable as well as a local value.
170
171 The local binding is a conceptual place that holds a local value.
172 Entering a function, or a special form such as @code{let}, creates the
173 local binding; exiting the function or the @code{let} removes the
174 local binding. While the local binding lasts, the variable's value is
175 stored within it. Using @code{setq} or @code{set} while there is a
176 local binding stores a different value into the local binding; it does
177 not create a new binding.
178
179 We also speak of the @dfn{global binding}, which is where
180 (conceptually) the global value is kept.
181
182 @cindex current binding
183 A variable can have more than one local binding at a time (for
184 example, if there are nested @code{let} forms that bind it). In such a
185 case, the most recently created local binding that still exists is the
186 @dfn{current binding} of the variable. (This rule is called
187 @dfn{dynamic scoping}; see @ref{Variable Scoping}.) If there are no
188 local bindings, the variable's global binding is its current binding.
189 We sometimes call the current binding the @dfn{most-local existing
190 binding}, for emphasis. Ordinary evaluation of a symbol always returns
191 the value of its current binding.
192
193 The special forms @code{let} and @code{let*} exist to create
194 local bindings.
195
196 @defspec let (bindings@dots{}) forms@dots{}
197 This special form binds variables according to @var{bindings} and then
198 evaluates all of the @var{forms} in textual order. The @code{let}-form
199 returns the value of the last form in @var{forms}.
200
201 Each of the @var{bindings} is either @w{(i) a} symbol, in which case
202 that symbol is bound to @code{nil}; or @w{(ii) a} list of the form
203 @code{(@var{symbol} @var{value-form})}, in which case @var{symbol} is
204 bound to the result of evaluating @var{value-form}. If @var{value-form}
205 is omitted, @code{nil} is used.
206
207 All of the @var{value-form}s in @var{bindings} are evaluated in the
208 order they appear and @emph{before} binding any of the symbols to them.
209 Here is an example of this: @code{z} is bound to the old value of
210 @code{y}, which is 2, not the new value of @code{y}, which is 1.
211
212 @example
213 @group
214 (setq y 2)
215 @result{} 2
216 @end group
217 @group
218 (let ((y 1)
219 (z y))
220 (list y z))
221 @result{} (1 2)
222 @end group
223 @end example
224 @end defspec
225
226 @defspec let* (bindings@dots{}) forms@dots{}
227 This special form is like @code{let}, but it binds each variable right
228 after computing its local value, before computing the local value for
229 the next variable. Therefore, an expression in @var{bindings} can
230 reasonably refer to the preceding symbols bound in this @code{let*}
231 form. Compare the following example with the example above for
232 @code{let}.
233
234 @example
235 @group
236 (setq y 2)
237 @result{} 2
238 @end group
239 @group
240 (let* ((y 1)
241 (z y)) ; @r{Use the just-established value of @code{y}.}
242 (list y z))
243 @result{} (1 1)
244 @end group
245 @end example
246 @end defspec
247
248 Here is a complete list of the other facilities that create local
249 bindings:
250
251 @itemize @bullet
252 @item
253 Function calls (@pxref{Functions}).
254
255 @item
256 Macro calls (@pxref{Macros}).
257
258 @item
259 @code{condition-case} (@pxref{Errors}).
260 @end itemize
261
262 Variables can also have buffer-local bindings (@pxref{Buffer-Local
263 Variables}); a few variables have terminal-local bindings
264 (@pxref{Multiple Terminals}). These kinds of bindings work somewhat
265 like ordinary local bindings, but they are localized depending on
266 ``where'' you are in Emacs, rather than localized in time.
267
268 @defopt max-specpdl-size
269 @anchor{Definition of max-specpdl-size}
270 @cindex variable limit error
271 @cindex evaluation error
272 @cindex infinite recursion
273 This variable defines the limit on the total number of local variable
274 bindings and @code{unwind-protect} cleanups (see @ref{Cleanups,,
275 Cleaning Up from Nonlocal Exits}) that are allowed before Emacs
276 signals an error (with data @code{"Variable binding depth exceeds
277 max-specpdl-size"}).
278
279 This limit, with the associated error when it is exceeded, is one way
280 that Lisp avoids infinite recursion on an ill-defined function.
281 @code{max-lisp-eval-depth} provides another limit on depth of nesting.
282 @xref{Definition of max-lisp-eval-depth,, Eval}.
283
284 The default value is 1000. Entry to the Lisp debugger increases the
285 value, if there is little room left, to make sure the debugger itself
286 has room to execute.
287 @end defopt
288
289 @node Void Variables
290 @section When a Variable is ``Void''
291 @cindex @code{void-variable} error
292 @cindex void variable
293
294 If you have never given a symbol any value as a global variable, we
295 say that that symbol's global value is @dfn{void}. In other words, the
296 symbol's value cell does not have any Lisp object in it. If you try to
297 evaluate the symbol, you get a @code{void-variable} error rather than
298 a value.
299
300 Note that a value of @code{nil} is not the same as void. The symbol
301 @code{nil} is a Lisp object and can be the value of a variable just as any
302 other object can be; but it is @emph{a value}. A void variable does not
303 have any value.
304
305 After you have given a variable a value, you can make it void once more
306 using @code{makunbound}.
307
308 @defun makunbound symbol
309 This function makes the current variable binding of @var{symbol} void.
310 Subsequent attempts to use this symbol's value as a variable will signal
311 the error @code{void-variable}, unless and until you set it again.
312
313 @code{makunbound} returns @var{symbol}.
314
315 @example
316 @group
317 (makunbound 'x) ; @r{Make the global value of @code{x} void.}
318 @result{} x
319 @end group
320 @group
321 x
322 @error{} Symbol's value as variable is void: x
323 @end group
324 @end example
325
326 If @var{symbol} is locally bound, @code{makunbound} affects the most
327 local existing binding. This is the only way a symbol can have a void
328 local binding, since all the constructs that create local bindings
329 create them with values. In this case, the voidness lasts at most as
330 long as the binding does; when the binding is removed due to exit from
331 the construct that made it, the previous local or global binding is
332 reexposed as usual, and the variable is no longer void unless the newly
333 reexposed binding was void all along.
334
335 @smallexample
336 @group
337 (setq x 1) ; @r{Put a value in the global binding.}
338 @result{} 1
339 (let ((x 2)) ; @r{Locally bind it.}
340 (makunbound 'x) ; @r{Void the local binding.}
341 x)
342 @error{} Symbol's value as variable is void: x
343 @end group
344 @group
345 x ; @r{The global binding is unchanged.}
346 @result{} 1
347
348 (let ((x 2)) ; @r{Locally bind it.}
349 (let ((x 3)) ; @r{And again.}
350 (makunbound 'x) ; @r{Void the innermost-local binding.}
351 x)) ; @r{And refer: it's void.}
352 @error{} Symbol's value as variable is void: x
353 @end group
354
355 @group
356 (let ((x 2))
357 (let ((x 3))
358 (makunbound 'x)) ; @r{Void inner binding, then remove it.}
359 x) ; @r{Now outer @code{let} binding is visible.}
360 @result{} 2
361 @end group
362 @end smallexample
363 @end defun
364
365 A variable that has been made void with @code{makunbound} is
366 indistinguishable from one that has never received a value and has
367 always been void.
368
369 You can use the function @code{boundp} to test whether a variable is
370 currently void.
371
372 @defun boundp variable
373 @code{boundp} returns @code{t} if @var{variable} (a symbol) is not void;
374 more precisely, if its current binding is not void. It returns
375 @code{nil} otherwise.
376
377 @smallexample
378 @group
379 (boundp 'abracadabra) ; @r{Starts out void.}
380 @result{} nil
381 @end group
382 @group
383 (let ((abracadabra 5)) ; @r{Locally bind it.}
384 (boundp 'abracadabra))
385 @result{} t
386 @end group
387 @group
388 (boundp 'abracadabra) ; @r{Still globally void.}
389 @result{} nil
390 @end group
391 @group
392 (setq abracadabra 5) ; @r{Make it globally nonvoid.}
393 @result{} 5
394 @end group
395 @group
396 (boundp 'abracadabra)
397 @result{} t
398 @end group
399 @end smallexample
400 @end defun
401
402 @node Defining Variables
403 @section Defining Global Variables
404 @cindex variable definition
405
406 You may announce your intention to use a symbol as a global variable
407 with a @dfn{variable definition}: a special form, either @code{defconst}
408 or @code{defvar}.
409
410 In Emacs Lisp, definitions serve three purposes. First, they inform
411 people who read the code that certain symbols are @emph{intended} to be
412 used a certain way (as variables). Second, they inform the Lisp system
413 of these things, supplying a value and documentation. Third, they
414 provide information to utilities such as @code{etags} and
415 @code{make-docfile}, which create data bases of the functions and
416 variables in a program.
417
418 The difference between @code{defconst} and @code{defvar} is primarily
419 a matter of intent, serving to inform human readers of whether the value
420 should ever change. Emacs Lisp does not restrict the ways in which a
421 variable can be used based on @code{defconst} or @code{defvar}
422 declarations. However, it does make a difference for initialization:
423 @code{defconst} unconditionally initializes the variable, while
424 @code{defvar} initializes it only if it is void.
425
426 @ignore
427 One would expect user option variables to be defined with
428 @code{defconst}, since programs do not change them. Unfortunately, this
429 has bad results if the definition is in a library that is not preloaded:
430 @code{defconst} would override any prior value when the library is
431 loaded. Users would like to be able to set user options in their init
432 files, and override the default values given in the definitions. For
433 this reason, user options must be defined with @code{defvar}.
434 @end ignore
435
436 @defspec defvar symbol [value [doc-string]]
437 This special form defines @var{symbol} as a variable and can also
438 initialize and document it. The definition informs a person reading
439 your code that @var{symbol} is used as a variable that might be set or
440 changed. It also declares this variable as @dfn{special}, meaning that it
441 should always use dynamic scoping rules. Note that @var{symbol} is not
442 evaluated; the symbol to be defined must appear explicitly in the
443 @code{defvar}.
444
445 If @var{symbol} is void and @var{value} is specified, @code{defvar}
446 evaluates it and sets @var{symbol} to the result. But if @var{symbol}
447 already has a value (i.e., it is not void), @var{value} is not even
448 evaluated, and @var{symbol}'s value remains unchanged.
449 If @var{value} is omitted, the value of @var{symbol} is not changed in any
450 case; instead, the only effect of @code{defvar} is to declare locally that this
451 variable exists elsewhere and should hence always use dynamic scoping rules.
452
453 If @var{symbol} has a buffer-local binding in the current buffer,
454 @code{defvar} operates on the default value, which is buffer-independent,
455 not the current (buffer-local) binding. It sets the default value if
456 the default value is void. @xref{Buffer-Local Variables}.
457
458 When you evaluate a top-level @code{defvar} form with @kbd{C-M-x} in
459 Emacs Lisp mode (@code{eval-defun}), a special feature of
460 @code{eval-defun} arranges to set the variable unconditionally, without
461 testing whether its value is void.
462
463 If the @var{doc-string} argument appears, it specifies the documentation
464 for the variable. (This opportunity to specify documentation is one of
465 the main benefits of defining the variable.) The documentation is
466 stored in the symbol's @code{variable-documentation} property. The
467 Emacs help functions (@pxref{Documentation}) look for this property.
468
469 If the documentation string begins with the character @samp{*}, Emacs
470 allows users to set it interactively using the @code{set-variable}
471 command. However, you should nearly always use @code{defcustom}
472 instead of @code{defvar} to define such variables, so that users can
473 use @kbd{M-x customize} and related commands to set them. In that
474 case, it is not necessary to begin the documentation string with
475 @samp{*}. @xref{Customization}.
476
477 Here are some examples. This form defines @code{foo} but does not
478 initialize it:
479
480 @example
481 @group
482 (defvar foo)
483 @result{} foo
484 @end group
485 @end example
486
487 This example initializes the value of @code{bar} to @code{23}, and gives
488 it a documentation string:
489
490 @example
491 @group
492 (defvar bar 23
493 "The normal weight of a bar.")
494 @result{} bar
495 @end group
496 @end example
497
498 The following form changes the documentation string for @code{bar},
499 making it a user option, but does not change the value, since @code{bar}
500 already has a value. (The addition @code{(1+ nil)} would get an error
501 if it were evaluated, but since it is not evaluated, there is no error.)
502
503 @example
504 @group
505 (defvar bar (1+ nil)
506 "*The normal weight of a bar.")
507 @result{} bar
508 @end group
509 @group
510 bar
511 @result{} 23
512 @end group
513 @end example
514
515 Here is an equivalent expression for the @code{defvar} special form:
516
517 @example
518 @group
519 (defvar @var{symbol} @var{value} @var{doc-string})
520 @equiv{}
521 (progn
522 (if (not (boundp '@var{symbol}))
523 (setq @var{symbol} @var{value}))
524 (if '@var{doc-string}
525 (put '@var{symbol} 'variable-documentation '@var{doc-string}))
526 '@var{symbol})
527 @end group
528 @end example
529
530 The @code{defvar} form returns @var{symbol}, but it is normally used
531 at top level in a file where its value does not matter.
532 @end defspec
533
534 @cindex constant variables
535 @defspec defconst symbol value [doc-string]
536 This special form defines @var{symbol} as a value and initializes it.
537 It informs a person reading your code that @var{symbol} has a standard
538 global value, established here, that should not be changed by the user
539 or by other programs. Note that @var{symbol} is not evaluated; the
540 symbol to be defined must appear explicitly in the @code{defconst}.
541
542 @code{defconst} always evaluates @var{value}, and sets the value of
543 @var{symbol} to the result. If @var{symbol} does have a buffer-local
544 binding in the current buffer, @code{defconst} sets the default value,
545 not the buffer-local value. (But you should not be making
546 buffer-local bindings for a symbol that is defined with
547 @code{defconst}.)
548
549 An example of the use of @code{defconst} is Emacs' definition of
550 @code{float-pi}---the mathematical constant @math{pi}, which ought not
551 to be changed by anyone (attempts by the Indiana State Legislature
552 notwithstanding). As the second form illustrates, however,
553 @code{defconst} is only advisory.
554
555 @example
556 @group
557 (defconst float-pi 3.141592653589793 "The value of Pi.")
558 @result{} float-pi
559 @end group
560 @group
561 (setq float-pi 3)
562 @result{} float-pi
563 @end group
564 @group
565 float-pi
566 @result{} 3
567 @end group
568 @end example
569 @end defspec
570
571 @defun user-variable-p variable
572 @cindex user option
573 This function returns @code{t} if @var{variable} is a user option---a
574 variable intended to be set by the user for customization---and
575 @code{nil} otherwise. (Variables other than user options exist for the
576 internal purposes of Lisp programs, and users need not know about them.)
577
578 User option variables are distinguished from other variables either
579 though being declared using @code{defcustom}@footnote{They may also be
580 declared equivalently in @file{cus-start.el}.} or by the first character
581 of their @code{variable-documentation} property. If the property exists
582 and is a string, and its first character is @samp{*}, then the variable
583 is a user option. Aliases of user options are also user options.
584 @end defun
585
586 @cindex @code{variable-interactive} property
587 @findex set-variable
588 If a user option variable has a @code{variable-interactive} property,
589 the @code{set-variable} command uses that value to control reading the
590 new value for the variable. The property's value is used as if it were
591 specified in @code{interactive} (@pxref{Using Interactive}). However,
592 this feature is largely obsoleted by @code{defcustom}
593 (@pxref{Customization}).
594
595 @strong{Warning:} If the @code{defconst} and @code{defvar} special
596 forms are used while the variable has a local binding (made with
597 @code{let}, or a function argument), they set the local-binding's
598 value; the top-level binding is not changed. This is not what you
599 usually want. To prevent it, use these special forms at top level in
600 a file, where normally no local binding is in effect, and make sure to
601 load the file before making a local binding for the variable.
602
603 @node Tips for Defining
604 @section Tips for Defining Variables Robustly
605
606 When you define a variable whose value is a function, or a list of
607 functions, use a name that ends in @samp{-function} or
608 @samp{-functions}, respectively.
609
610 There are several other variable name conventions;
611 here is a complete list:
612
613 @table @samp
614 @item @dots{}-hook
615 The variable is a normal hook (@pxref{Hooks}).
616
617 @item @dots{}-function
618 The value is a function.
619
620 @item @dots{}-functions
621 The value is a list of functions.
622
623 @item @dots{}-form
624 The value is a form (an expression).
625
626 @item @dots{}-forms
627 The value is a list of forms (expressions).
628
629 @item @dots{}-predicate
630 The value is a predicate---a function of one argument that returns
631 non-@code{nil} for ``good'' arguments and @code{nil} for ``bad''
632 arguments.
633
634 @item @dots{}-flag
635 The value is significant only as to whether it is @code{nil} or not.
636 Since such variables often end up acquiring more values over time,
637 this convention is not strongly recommended.
638
639 @item @dots{}-program
640 The value is a program name.
641
642 @item @dots{}-command
643 The value is a whole shell command.
644
645 @item @dots{}-switches
646 The value specifies options for a command.
647 @end table
648
649 When you define a variable, always consider whether you should mark
650 it as ``safe'' or ``risky''; see @ref{File Local Variables}.
651
652 When defining and initializing a variable that holds a complicated
653 value (such as a keymap with bindings in it), it's best to put the
654 entire computation of the value into the @code{defvar}, like this:
655
656 @example
657 (defvar my-mode-map
658 (let ((map (make-sparse-keymap)))
659 (define-key map "\C-c\C-a" 'my-command)
660 @dots{}
661 map)
662 @var{docstring})
663 @end example
664
665 @noindent
666 This method has several benefits. First, if the user quits while
667 loading the file, the variable is either still uninitialized or
668 initialized properly, never in-between. If it is still uninitialized,
669 reloading the file will initialize it properly. Second, reloading the
670 file once the variable is initialized will not alter it; that is
671 important if the user has run hooks to alter part of the contents (such
672 as, to rebind keys). Third, evaluating the @code{defvar} form with
673 @kbd{C-M-x} @emph{will} reinitialize the map completely.
674
675 Putting so much code in the @code{defvar} form has one disadvantage:
676 it puts the documentation string far away from the line which names the
677 variable. Here's a safe way to avoid that:
678
679 @example
680 (defvar my-mode-map nil
681 @var{docstring})
682 (unless my-mode-map
683 (let ((map (make-sparse-keymap)))
684 (define-key map "\C-c\C-a" 'my-command)
685 @dots{}
686 (setq my-mode-map map)))
687 @end example
688
689 @noindent
690 This has all the same advantages as putting the initialization inside
691 the @code{defvar}, except that you must type @kbd{C-M-x} twice, once on
692 each form, if you do want to reinitialize the variable.
693
694 But be careful not to write the code like this:
695
696 @example
697 (defvar my-mode-map nil
698 @var{docstring})
699 (unless my-mode-map
700 (setq my-mode-map (make-sparse-keymap))
701 (define-key my-mode-map "\C-c\C-a" 'my-command)
702 @dots{})
703 @end example
704
705 @noindent
706 This code sets the variable, then alters it, but it does so in more than
707 one step. If the user quits just after the @code{setq}, that leaves the
708 variable neither correctly initialized nor void nor @code{nil}. Once
709 that happens, reloading the file will not initialize the variable; it
710 will remain incomplete.
711
712 @node Accessing Variables
713 @section Accessing Variable Values
714
715 The usual way to reference a variable is to write the symbol which
716 names it (@pxref{Symbol Forms}). This requires you to specify the
717 variable name when you write the program. Usually that is exactly what
718 you want to do. Occasionally you need to choose at run time which
719 variable to reference; then you can use @code{symbol-value}.
720
721 @defun symbol-value symbol
722 This function returns the value of @var{symbol}. This is the value in
723 the innermost local binding of the symbol, or its global value if it
724 has no local bindings.
725
726 @example
727 @group
728 (setq abracadabra 5)
729 @result{} 5
730 @end group
731 @group
732 (setq foo 9)
733 @result{} 9
734 @end group
735
736 @group
737 ;; @r{Here the symbol @code{abracadabra}}
738 ;; @r{is the symbol whose value is examined.}
739 (let ((abracadabra 'foo))
740 (symbol-value 'abracadabra))
741 @result{} foo
742 @end group
743
744 @group
745 ;; @r{Here, the value of @code{abracadabra},}
746 ;; @r{which is @code{foo},}
747 ;; @r{is the symbol whose value is examined.}
748 (let ((abracadabra 'foo))
749 (symbol-value abracadabra))
750 @result{} 9
751 @end group
752
753 @group
754 (symbol-value 'abracadabra)
755 @result{} 5
756 @end group
757 @end example
758
759 A @code{void-variable} error is signaled if the current binding of
760 @var{symbol} is void.
761 @end defun
762
763 @node Setting Variables
764 @section How to Alter a Variable Value
765
766 The usual way to change the value of a variable is with the special
767 form @code{setq}. When you need to compute the choice of variable at
768 run time, use the function @code{set}.
769
770 @defspec setq [symbol form]@dots{}
771 This special form is the most common method of changing a variable's
772 value. Each @var{symbol} is given a new value, which is the result of
773 evaluating the corresponding @var{form}. The most-local existing
774 binding of the symbol is changed.
775
776 @code{setq} does not evaluate @var{symbol}; it sets the symbol that you
777 write. We say that this argument is @dfn{automatically quoted}. The
778 @samp{q} in @code{setq} stands for ``quoted.''
779
780 The value of the @code{setq} form is the value of the last @var{form}.
781
782 @example
783 @group
784 (setq x (1+ 2))
785 @result{} 3
786 @end group
787 x ; @r{@code{x} now has a global value.}
788 @result{} 3
789 @group
790 (let ((x 5))
791 (setq x 6) ; @r{The local binding of @code{x} is set.}
792 x)
793 @result{} 6
794 @end group
795 x ; @r{The global value is unchanged.}
796 @result{} 3
797 @end example
798
799 Note that the first @var{form} is evaluated, then the first
800 @var{symbol} is set, then the second @var{form} is evaluated, then the
801 second @var{symbol} is set, and so on:
802
803 @example
804 @group
805 (setq x 10 ; @r{Notice that @code{x} is set before}
806 y (1+ x)) ; @r{the value of @code{y} is computed.}
807 @result{} 11
808 @end group
809 @end example
810 @end defspec
811
812 @defun set symbol value
813 This function sets @var{symbol}'s value to @var{value}, then returns
814 @var{value}. Since @code{set} is a function, the expression written for
815 @var{symbol} is evaluated to obtain the symbol to set.
816
817 The most-local existing binding of the variable is the binding that is
818 set; shadowed bindings are not affected.
819
820 @example
821 @group
822 (set one 1)
823 @error{} Symbol's value as variable is void: one
824 @end group
825 @group
826 (set 'one 1)
827 @result{} 1
828 @end group
829 @group
830 (set 'two 'one)
831 @result{} one
832 @end group
833 @group
834 (set two 2) ; @r{@code{two} evaluates to symbol @code{one}.}
835 @result{} 2
836 @end group
837 @group
838 one ; @r{So it is @code{one} that was set.}
839 @result{} 2
840 (let ((one 1)) ; @r{This binding of @code{one} is set,}
841 (set 'one 3) ; @r{not the global value.}
842 one)
843 @result{} 3
844 @end group
845 @group
846 one
847 @result{} 2
848 @end group
849 @end example
850
851 If @var{symbol} is not actually a symbol, a @code{wrong-type-argument}
852 error is signaled.
853
854 @example
855 (set '(x y) 'z)
856 @error{} Wrong type argument: symbolp, (x y)
857 @end example
858
859 Logically speaking, @code{set} is a more fundamental primitive than
860 @code{setq}. Any use of @code{setq} can be trivially rewritten to use
861 @code{set}; @code{setq} could even be defined as a macro, given the
862 availability of @code{set}. However, @code{set} itself is rarely used;
863 beginners hardly need to know about it. It is useful only for choosing
864 at run time which variable to set. For example, the command
865 @code{set-variable}, which reads a variable name from the user and then
866 sets the variable, needs to use @code{set}.
867
868 @cindex CL note---@code{set} local
869 @quotation
870 @b{Common Lisp note:} In Common Lisp, @code{set} always changes the
871 symbol's ``special'' or dynamic value, ignoring any lexical bindings.
872 In Emacs Lisp, all variables and all bindings are dynamic, so @code{set}
873 always affects the most local existing binding.
874 @end quotation
875 @end defun
876
877 @node Variable Scoping
878 @section Scoping Rules for Variable Bindings
879
880 A given symbol @code{foo} can have several local variable bindings,
881 established at different places in the Lisp program, as well as a global
882 binding. The most recently established binding takes precedence over
883 the others.
884
885 @cindex scope
886 @cindex extent
887 @cindex dynamic scoping
888 @cindex lexical scoping
889 By default, local bindings in Emacs Lisp have @dfn{indefinite scope} and
890 @dfn{dynamic extent}. @dfn{Scope} refers to @emph{where} textually in
891 the source code the binding can be accessed. ``Indefinite scope'' means
892 that any part of the program can potentially access the variable
893 binding. @dfn{Extent} refers to @emph{when}, as the program is
894 executing, the binding exists. ``Dynamic extent'' means that the binding
895 lasts as long as the activation of the construct that established it.
896
897 The combination of dynamic extent and indefinite scope is called
898 @dfn{dynamic scoping}. By contrast, most programming languages use
899 @dfn{lexical scoping}, in which references to a local variable must be
900 located textually within the function or block that binds the variable.
901 Emacs can also support lexical scoping, upon request (@pxref{Lexical
902 Binding}).
903
904 @cindex CL note---special variables
905 @quotation
906 @b{Common Lisp note:} Variables declared ``special'' in Common Lisp are
907 dynamically scoped, like all variables in Emacs Lisp.
908 @end quotation
909
910 @menu
911 * Scope:: Scope means where in the program a value is visible.
912 Comparison with other languages.
913 * Extent:: Extent means how long in time a value exists.
914 * Impl of Scope:: Two ways to implement dynamic scoping.
915 * Using Scoping:: How to use dynamic scoping carefully and avoid problems.
916 * Lexical Binding:: Use of lexical scoping.
917 @end menu
918
919 @node Scope
920 @subsection Scope
921
922 Emacs Lisp uses @dfn{indefinite scope} for local variable bindings.
923 This means that any function anywhere in the program text might access a
924 given binding of a variable. Consider the following function
925 definitions:
926
927 @example
928 @group
929 (defun binder (x) ; @r{@code{x} is bound in @code{binder}.}
930 (foo 5)) ; @r{@code{foo} is some other function.}
931 @end group
932
933 @group
934 (defun user () ; @r{@code{x} is used ``free'' in @code{user}.}
935 (list x))
936 @end group
937 @end example
938
939 In a lexically scoped language, the binding of @code{x} in
940 @code{binder} would never be accessible in @code{user}, because
941 @code{user} is not textually contained within the function
942 @code{binder}. However, in dynamically-scoped Emacs Lisp, @code{user}
943 may or may not refer to the binding of @code{x} established in
944 @code{binder}, depending on the circumstances:
945
946 @itemize @bullet
947 @item
948 If we call @code{user} directly without calling @code{binder} at all,
949 then whatever binding of @code{x} is found, it cannot come from
950 @code{binder}.
951
952 @item
953 If we define @code{foo} as follows and then call @code{binder}, then the
954 binding made in @code{binder} will be seen in @code{user}:
955
956 @example
957 @group
958 (defun foo (lose)
959 (user))
960 @end group
961 @end example
962
963 @item
964 However, if we define @code{foo} as follows and then call @code{binder},
965 then the binding made in @code{binder} @emph{will not} be seen in
966 @code{user}:
967
968 @example
969 (defun foo (x)
970 (user))
971 @end example
972
973 @noindent
974 Here, when @code{foo} is called by @code{binder}, it binds @code{x}.
975 (The binding in @code{foo} is said to @dfn{shadow} the one made in
976 @code{binder}.) Therefore, @code{user} will access the @code{x} bound
977 by @code{foo} instead of the one bound by @code{binder}.
978 @end itemize
979
980 Emacs Lisp used dynamic scoping by default because simple implementations of
981 lexical scoping are slow. In addition, every Lisp system needs to offer
982 dynamic scoping at least as an option; if lexical scoping is the norm, there
983 must be a way to specify dynamic scoping instead for a particular variable.
984 Nowadays, Emacs offers both, but the default is still to use exclusively
985 dynamic scoping.
986
987 @node Extent
988 @subsection Extent
989
990 @dfn{Extent} refers to the time during program execution that a
991 variable name is valid. In Emacs Lisp, a variable is valid only while
992 the form that bound it is executing. This is called @dfn{dynamic
993 extent}. ``Local'' or ``automatic'' variables in most languages,
994 including C and Pascal, have dynamic extent.
995
996 One alternative to dynamic extent is @dfn{indefinite extent}. This
997 means that a variable binding can live on past the exit from the form
998 that made the binding. Common Lisp and Scheme, for example, support
999 this, but Emacs Lisp does not.
1000
1001 To illustrate this, the function below, @code{make-add}, returns a
1002 function that purports to add @var{n} to its own argument @var{m}. This
1003 would work in Common Lisp, but it does not do the job in Emacs Lisp,
1004 because after the call to @code{make-add} exits, the variable @code{n}
1005 is no longer bound to the actual argument 2.
1006
1007 @example
1008 (defun make-add (n)
1009 (function (lambda (m) (+ n m)))) ; @r{Return a function.}
1010 @result{} make-add
1011 (fset 'add2 (make-add 2)) ; @r{Define function @code{add2}}
1012 ; @r{with @code{(make-add 2)}.}
1013 @result{} (lambda (m) (+ n m))
1014 (add2 4) ; @r{Try to add 2 to 4.}
1015 @error{} Symbol's value as variable is void: n
1016 @end example
1017
1018 @cindex closures not available
1019 Some Lisp dialects have ``closures,'' objects that are like functions
1020 but record additional variable bindings. Emacs Lisp does not have
1021 closures.
1022
1023 @node Impl of Scope
1024 @subsection Implementation of Dynamic Scoping
1025 @cindex deep binding
1026
1027 A simple sample implementation (which is not how Emacs Lisp actually
1028 works) may help you understand dynamic binding. This technique is
1029 called @dfn{deep binding} and was used in early Lisp systems.
1030
1031 Suppose there is a stack of bindings, which are variable-value pairs.
1032 At entry to a function or to a @code{let} form, we can push bindings
1033 onto the stack for the arguments or local variables created there. We
1034 can pop those bindings from the stack at exit from the binding
1035 construct.
1036
1037 We can find the value of a variable by searching the stack from top to
1038 bottom for a binding for that variable; the value from that binding is
1039 the value of the variable. To set the variable, we search for the
1040 current binding, then store the new value into that binding.
1041
1042 As you can see, a function's bindings remain in effect as long as it
1043 continues execution, even during its calls to other functions. That is
1044 why we say the extent of the binding is dynamic. And any other function
1045 can refer to the bindings, if it uses the same variables while the
1046 bindings are in effect. That is why we say the scope is indefinite.
1047
1048 @cindex shallow binding
1049 The actual implementation of variable scoping in GNU Emacs Lisp uses a
1050 technique called @dfn{shallow binding}. Each variable has a standard
1051 place in which its current value is always found---the value cell of the
1052 symbol.
1053
1054 In shallow binding, setting the variable works by storing a value in
1055 the value cell. Creating a new binding works by pushing the old value
1056 (belonging to a previous binding) onto a stack, and storing the new
1057 local value in the value cell. Eliminating a binding works by popping
1058 the old value off the stack, into the value cell.
1059
1060 We use shallow binding because it has the same results as deep
1061 binding, but runs faster, since there is never a need to search for a
1062 binding.
1063
1064 @node Using Scoping
1065 @subsection Proper Use of Dynamic Scoping
1066
1067 Binding a variable in one function and using it in another is a
1068 powerful technique, but if used without restraint, it can make programs
1069 hard to understand. There are two clean ways to use this technique:
1070
1071 @itemize @bullet
1072 @item
1073 Use or bind the variable only in a few related functions, written close
1074 together in one file. Such a variable is used for communication within
1075 one program.
1076
1077 You should write comments to inform other programmers that they can see
1078 all uses of the variable before them, and to advise them not to add uses
1079 elsewhere.
1080
1081 @item
1082 Give the variable a well-defined, documented meaning, and make all
1083 appropriate functions refer to it (but not bind it or set it) wherever
1084 that meaning is relevant. For example, the variable
1085 @code{case-fold-search} is defined as ``non-@code{nil} means ignore case
1086 when searching''; various search and replace functions refer to it
1087 directly or through their subroutines, but do not bind or set it.
1088
1089 Then you can bind the variable in other programs, knowing reliably what
1090 the effect will be.
1091 @end itemize
1092
1093 In either case, you should define the variable with @code{defvar}.
1094 This helps other people understand your program by telling them to look
1095 for inter-function usage. It also avoids a warning from the byte
1096 compiler. Choose the variable's name to avoid name conflicts---don't
1097 use short names like @code{x}.
1098
1099
1100 @node Lexical Binding
1101 @subsection Use of Lexical Scoping
1102
1103 Emacs Lisp can be evaluated in two different modes: in dynamic binding mode or
1104 lexical binding mode. In dynamic binding mode, all local variables use dynamic
1105 scoping, whereas in lexical binding mode variables that have been declared
1106 @dfn{special} (i.e., declared with @code{defvar} or @code{defconst}) use
1107 dynamic scoping and all others use lexical scoping.
1108
1109 @defvar lexical-binding
1110 When non-nil, evaluation of Lisp code uses lexical scoping for non-special
1111 local variables instead of dynamic scoping. If nil, dynamic scoping is used
1112 for all local variables. This variable is typically set for a whole Elisp file
1113 via file local variables (@pxref{File Local Variables}).
1114 @end defvar
1115
1116 @defun special-variable-p SYMBOL
1117 Return whether SYMBOL has been declared as a special variable, via
1118 @code{defvar} or @code{defconst}.
1119 @end defun
1120
1121 The use of a special variable as a formal argument in a function is generally
1122 discouraged and its behavior in lexical binding mode is unspecified (it may use
1123 lexical scoping sometimes and dynamic scoping other times).
1124
1125 Functions like @code{symbol-value}, @code{boundp}, or @code{set} only know
1126 about dynamically scoped variables, so you cannot get the value of a lexical
1127 variable via @code{symbol-value} and neither can you change it via @code{set}.
1128 Another particularity is that code in the body of a @code{defun} or
1129 @code{defmacro} cannot refer to surrounding lexical variables.
1130
1131 Evaluation of a @code{lambda} expression in lexical binding mode will not just
1132 return that lambda expression unchanged, as in the dynamic binding case, but
1133 will instead construct a new object that remembers the current lexical
1134 environment in which that lambda expression was defined, so that the function
1135 body can later be evaluated in the proper context. Those objects are called
1136 @dfn{closures}. They are also functions, in the sense that they are accepted
1137 by @code{funcall}, and they are represented by a cons cell whose @code{car} is
1138 the symbol @code{closure}.
1139
1140 @menu
1141 * Converting to Lexical Binding:: How to start using lexical scoping
1142 @end menu
1143
1144 @node Converting to Lexical Binding
1145 @subsubsection Converting a package to use lexical scoping
1146
1147 Lexical scoping, as currently implemented, does not bring many significant
1148 benefits, unless you are a seasoned functional programmer addicted to
1149 higher-order functions. But its importance will increase in the future:
1150 lexical scoping opens up a lot more opportunities for optimization, so
1151 lexically scoped code is likely to run faster in future Emacs versions, and it
1152 is much more friendly to concurrency, which we want to add in the near future.
1153
1154 Converting a package to lexical binding is usually pretty easy and should not
1155 break backward compatibility: just add a file-local variable setting
1156 @code{lexical-binding} to @code{t} and add declarations of the form
1157 @code{(defvar @var{VAR})} for every variable which still needs to use
1158 dynamic scoping.
1159
1160 To find which variables need this declaration, the simplest solution is to
1161 check the byte-compiler's warnings. The byte-compiler will usually find those
1162 variables either because they are used outside of a let-binding (leading to
1163 warnings about reference or assignment to ``free variable @var{VAR}'') or
1164 because they are let-bound but not used within the let-binding (leading to
1165 warnings about ``unused lexical variable @var{VAR}'').
1166
1167 In cases where a dynamically scoped variable was bound as a function argument,
1168 you will also need to move this binding to a @code{let}. These cases are also
1169 flagged by the byte-compiler.
1170
1171 To silence byte-compiler warnings about unused variables, just use a variable
1172 name that start with an underscore, which the byte-compiler interpret as an
1173 indication that this is a variable known not to be used.
1174
1175 In most cases, the resulting code will then work with either setting of
1176 @code{lexical-binding}, so it can still be used with older Emacsen (which will
1177 simply ignore the @code{lexical-binding} variable setting).
1178
1179 @node Buffer-Local Variables
1180 @section Buffer-Local Variables
1181 @cindex variable, buffer-local
1182 @cindex buffer-local variables
1183
1184 Global and local variable bindings are found in most programming
1185 languages in one form or another. Emacs, however, also supports
1186 additional, unusual kinds of variable binding, such as
1187 @dfn{buffer-local} bindings, which apply only in one buffer. Having
1188 different values for a variable in different buffers is an important
1189 customization method. (Variables can also have bindings that are
1190 local to each terminal, or to each frame. @xref{Multiple Terminals},
1191 and @xref{Frame-Local Variables}.)
1192
1193 @menu
1194 * Intro to Buffer-Local:: Introduction and concepts.
1195 * Creating Buffer-Local:: Creating and destroying buffer-local bindings.
1196 * Default Value:: The default value is seen in buffers
1197 that don't have their own buffer-local values.
1198 @end menu
1199
1200 @node Intro to Buffer-Local
1201 @subsection Introduction to Buffer-Local Variables
1202
1203 A buffer-local variable has a buffer-local binding associated with a
1204 particular buffer. The binding is in effect when that buffer is
1205 current; otherwise, it is not in effect. If you set the variable while
1206 a buffer-local binding is in effect, the new value goes in that binding,
1207 so its other bindings are unchanged. This means that the change is
1208 visible only in the buffer where you made it.
1209
1210 The variable's ordinary binding, which is not associated with any
1211 specific buffer, is called the @dfn{default binding}. In most cases,
1212 this is the global binding.
1213
1214 A variable can have buffer-local bindings in some buffers but not in
1215 other buffers. The default binding is shared by all the buffers that
1216 don't have their own bindings for the variable. (This includes all
1217 newly-created buffers.) If you set the variable in a buffer that does
1218 not have a buffer-local binding for it, this sets the default binding,
1219 so the new value is visible in all the buffers that see the default
1220 binding.
1221
1222 The most common use of buffer-local bindings is for major modes to change
1223 variables that control the behavior of commands. For example, C mode and
1224 Lisp mode both set the variable @code{paragraph-start} to specify that only
1225 blank lines separate paragraphs. They do this by making the variable
1226 buffer-local in the buffer that is being put into C mode or Lisp mode, and
1227 then setting it to the new value for that mode. @xref{Major Modes}.
1228
1229 The usual way to make a buffer-local binding is with
1230 @code{make-local-variable}, which is what major mode commands typically
1231 use. This affects just the current buffer; all other buffers (including
1232 those yet to be created) will continue to share the default value unless
1233 they are explicitly given their own buffer-local bindings.
1234
1235 @cindex automatically buffer-local
1236 A more powerful operation is to mark the variable as
1237 @dfn{automatically buffer-local} by calling
1238 @code{make-variable-buffer-local}. You can think of this as making the
1239 variable local in all buffers, even those yet to be created. More
1240 precisely, the effect is that setting the variable automatically makes
1241 the variable local to the current buffer if it is not already so. All
1242 buffers start out by sharing the default value of the variable as usual,
1243 but setting the variable creates a buffer-local binding for the current
1244 buffer. The new value is stored in the buffer-local binding, leaving
1245 the default binding untouched. This means that the default value cannot
1246 be changed with @code{setq} in any buffer; the only way to change it is
1247 with @code{setq-default}.
1248
1249 @strong{Warning:} When a variable has buffer-local
1250 bindings in one or more buffers, @code{let} rebinds the binding that's
1251 currently in effect. For instance, if the current buffer has a
1252 buffer-local value, @code{let} temporarily rebinds that. If no
1253 buffer-local bindings are in effect, @code{let} rebinds
1254 the default value. If inside the @code{let} you then change to a
1255 different current buffer in which a different binding is in effect,
1256 you won't see the @code{let} binding any more. And if you exit the
1257 @code{let} while still in the other buffer, you won't see the
1258 unbinding occur (though it will occur properly). Here is an example
1259 to illustrate:
1260
1261 @example
1262 @group
1263 (setq foo 'g)
1264 (set-buffer "a")
1265 (make-local-variable 'foo)
1266 @end group
1267 (setq foo 'a)
1268 (let ((foo 'temp))
1269 ;; foo @result{} 'temp ; @r{let binding in buffer @samp{a}}
1270 (set-buffer "b")
1271 ;; foo @result{} 'g ; @r{the global value since foo is not local in @samp{b}}
1272 @var{body}@dots{})
1273 @group
1274 foo @result{} 'g ; @r{exiting restored the local value in buffer @samp{a},}
1275 ; @r{but we don't see that in buffer @samp{b}}
1276 @end group
1277 @group
1278 (set-buffer "a") ; @r{verify the local value was restored}
1279 foo @result{} 'a
1280 @end group
1281 @end example
1282
1283 Note that references to @code{foo} in @var{body} access the
1284 buffer-local binding of buffer @samp{b}.
1285
1286 When a file specifies local variable values, these become buffer-local
1287 values when you visit the file. @xref{File Variables,,, emacs, The
1288 GNU Emacs Manual}.
1289
1290 A buffer-local variable cannot be made frame-local
1291 (@pxref{Frame-Local Variables}) or terminal-local (@pxref{Multiple
1292 Terminals}).
1293
1294 @node Creating Buffer-Local
1295 @subsection Creating and Deleting Buffer-Local Bindings
1296
1297 @deffn Command make-local-variable variable
1298 This function creates a buffer-local binding in the current buffer for
1299 @var{variable} (a symbol). Other buffers are not affected. The value
1300 returned is @var{variable}.
1301
1302 The buffer-local value of @var{variable} starts out as the same value
1303 @var{variable} previously had. If @var{variable} was void, it remains
1304 void.
1305
1306 @example
1307 @group
1308 ;; @r{In buffer @samp{b1}:}
1309 (setq foo 5) ; @r{Affects all buffers.}
1310 @result{} 5
1311 @end group
1312 @group
1313 (make-local-variable 'foo) ; @r{Now it is local in @samp{b1}.}
1314 @result{} foo
1315 @end group
1316 @group
1317 foo ; @r{That did not change}
1318 @result{} 5 ; @r{the value.}
1319 @end group
1320 @group
1321 (setq foo 6) ; @r{Change the value}
1322 @result{} 6 ; @r{in @samp{b1}.}
1323 @end group
1324 @group
1325 foo
1326 @result{} 6
1327 @end group
1328
1329 @group
1330 ;; @r{In buffer @samp{b2}, the value hasn't changed.}
1331 (with-current-buffer "b2"
1332 foo)
1333 @result{} 5
1334 @end group
1335 @end example
1336
1337 Making a variable buffer-local within a @code{let}-binding for that
1338 variable does not work reliably, unless the buffer in which you do this
1339 is not current either on entry to or exit from the @code{let}. This is
1340 because @code{let} does not distinguish between different kinds of
1341 bindings; it knows only which variable the binding was made for.
1342
1343 If the variable is terminal-local (@pxref{Multiple Terminals}), or
1344 frame-local (@pxref{Frame-Local Variables}), this function signals an
1345 error. Such variables cannot have buffer-local bindings as well.
1346
1347 @strong{Warning:} do not use @code{make-local-variable} for a hook
1348 variable. The hook variables are automatically made buffer-local as
1349 needed if you use the @var{local} argument to @code{add-hook} or
1350 @code{remove-hook}.
1351 @end deffn
1352
1353 @deffn Command make-variable-buffer-local variable
1354 This function marks @var{variable} (a symbol) automatically
1355 buffer-local, so that any subsequent attempt to set it will make it
1356 local to the current buffer at the time.
1357
1358 A peculiar wrinkle of this feature is that binding the variable (with
1359 @code{let} or other binding constructs) does not create a buffer-local
1360 binding for it. Only setting the variable (with @code{set} or
1361 @code{setq}), while the variable does not have a @code{let}-style
1362 binding that was made in the current buffer, does so.
1363
1364 If @var{variable} does not have a default value, then calling this
1365 command will give it a default value of @code{nil}. If @var{variable}
1366 already has a default value, that value remains unchanged.
1367 Subsequently calling @code{makunbound} on @var{variable} will result
1368 in a void buffer-local value and leave the default value unaffected.
1369
1370 The value returned is @var{variable}.
1371
1372 @strong{Warning:} Don't assume that you should use
1373 @code{make-variable-buffer-local} for user-option variables, simply
1374 because users @emph{might} want to customize them differently in
1375 different buffers. Users can make any variable local, when they wish
1376 to. It is better to leave the choice to them.
1377
1378 The time to use @code{make-variable-buffer-local} is when it is crucial
1379 that no two buffers ever share the same binding. For example, when a
1380 variable is used for internal purposes in a Lisp program which depends
1381 on having separate values in separate buffers, then using
1382 @code{make-variable-buffer-local} can be the best solution.
1383 @end deffn
1384
1385 @defun local-variable-p variable &optional buffer
1386 This returns @code{t} if @var{variable} is buffer-local in buffer
1387 @var{buffer} (which defaults to the current buffer); otherwise,
1388 @code{nil}.
1389 @end defun
1390
1391 @defun local-variable-if-set-p variable &optional buffer
1392 This returns @code{t} if @var{variable} will become buffer-local in
1393 buffer @var{buffer} (which defaults to the current buffer) if it is
1394 set there.
1395 @end defun
1396
1397 @defun buffer-local-value variable buffer
1398 This function returns the buffer-local binding of @var{variable} (a
1399 symbol) in buffer @var{buffer}. If @var{variable} does not have a
1400 buffer-local binding in buffer @var{buffer}, it returns the default
1401 value (@pxref{Default Value}) of @var{variable} instead.
1402 @end defun
1403
1404 @defun buffer-local-variables &optional buffer
1405 This function returns a list describing the buffer-local variables in
1406 buffer @var{buffer}. (If @var{buffer} is omitted, the current buffer is
1407 used.) It returns an association list (@pxref{Association Lists}) in
1408 which each element contains one buffer-local variable and its value.
1409 However, when a variable's buffer-local binding in @var{buffer} is void,
1410 then the variable appears directly in the resulting list.
1411
1412 @example
1413 @group
1414 (make-local-variable 'foobar)
1415 (makunbound 'foobar)
1416 (make-local-variable 'bind-me)
1417 (setq bind-me 69)
1418 @end group
1419 (setq lcl (buffer-local-variables))
1420 ;; @r{First, built-in variables local in all buffers:}
1421 @result{} ((mark-active . nil)
1422 (buffer-undo-list . nil)
1423 (mode-name . "Fundamental")
1424 @dots{}
1425 @group
1426 ;; @r{Next, non-built-in buffer-local variables.}
1427 ;; @r{This one is buffer-local and void:}
1428 foobar
1429 ;; @r{This one is buffer-local and nonvoid:}
1430 (bind-me . 69))
1431 @end group
1432 @end example
1433
1434 Note that storing new values into the @sc{cdr}s of cons cells in this
1435 list does @emph{not} change the buffer-local values of the variables.
1436 @end defun
1437
1438 @deffn Command kill-local-variable variable
1439 This function deletes the buffer-local binding (if any) for
1440 @var{variable} (a symbol) in the current buffer. As a result, the
1441 default binding of @var{variable} becomes visible in this buffer. This
1442 typically results in a change in the value of @var{variable}, since the
1443 default value is usually different from the buffer-local value just
1444 eliminated.
1445
1446 If you kill the buffer-local binding of a variable that automatically
1447 becomes buffer-local when set, this makes the default value visible in
1448 the current buffer. However, if you set the variable again, that will
1449 once again create a buffer-local binding for it.
1450
1451 @code{kill-local-variable} returns @var{variable}.
1452
1453 This function is a command because it is sometimes useful to kill one
1454 buffer-local variable interactively, just as it is useful to create
1455 buffer-local variables interactively.
1456 @end deffn
1457
1458 @defun kill-all-local-variables
1459 This function eliminates all the buffer-local variable bindings of the
1460 current buffer except for variables marked as ``permanent'' and local
1461 hook functions that have a non-@code{nil} @code{permanent-local-hook}
1462 property (@pxref{Setting Hooks}). As a result, the buffer will see
1463 the default values of most variables.
1464
1465 This function also resets certain other information pertaining to the
1466 buffer: it sets the local keymap to @code{nil}, the syntax table to the
1467 value of @code{(standard-syntax-table)}, the case table to
1468 @code{(standard-case-table)}, and the abbrev table to the value of
1469 @code{fundamental-mode-abbrev-table}.
1470
1471 The very first thing this function does is run the normal hook
1472 @code{change-major-mode-hook} (see below).
1473
1474 Every major mode command begins by calling this function, which has the
1475 effect of switching to Fundamental mode and erasing most of the effects
1476 of the previous major mode. To ensure that this does its job, the
1477 variables that major modes set should not be marked permanent.
1478
1479 @code{kill-all-local-variables} returns @code{nil}.
1480 @end defun
1481
1482 @defvar change-major-mode-hook
1483 The function @code{kill-all-local-variables} runs this normal hook
1484 before it does anything else. This gives major modes a way to arrange
1485 for something special to be done if the user switches to a different
1486 major mode. It is also useful for buffer-specific minor modes
1487 that should be forgotten if the user changes the major mode.
1488
1489 For best results, make this variable buffer-local, so that it will
1490 disappear after doing its job and will not interfere with the
1491 subsequent major mode. @xref{Hooks}.
1492 @end defvar
1493
1494 @c Emacs 19 feature
1495 @cindex permanent local variable
1496 A buffer-local variable is @dfn{permanent} if the variable name (a
1497 symbol) has a @code{permanent-local} property that is non-@code{nil}.
1498 Such variables are unaffected by @code{kill-all-local-variables}, and
1499 their local bindings are therefore not cleared by changing major modes.
1500 Permanent locals are appropriate for data pertaining to where the file
1501 came from or how to save it, rather than with how to edit the contents.
1502
1503 @node Default Value
1504 @subsection The Default Value of a Buffer-Local Variable
1505 @cindex default value
1506
1507 The global value of a variable with buffer-local bindings is also
1508 called the @dfn{default} value, because it is the value that is in
1509 effect whenever neither the current buffer nor the selected frame has
1510 its own binding for the variable.
1511
1512 The functions @code{default-value} and @code{setq-default} access and
1513 change a variable's default value regardless of whether the current
1514 buffer has a buffer-local binding. For example, you could use
1515 @code{setq-default} to change the default setting of
1516 @code{paragraph-start} for most buffers; and this would work even when
1517 you are in a C or Lisp mode buffer that has a buffer-local value for
1518 this variable.
1519
1520 @c Emacs 19 feature
1521 The special forms @code{defvar} and @code{defconst} also set the
1522 default value (if they set the variable at all), rather than any
1523 buffer-local value.
1524
1525 @defun default-value symbol
1526 This function returns @var{symbol}'s default value. This is the value
1527 that is seen in buffers and frames that do not have their own values for
1528 this variable. If @var{symbol} is not buffer-local, this is equivalent
1529 to @code{symbol-value} (@pxref{Accessing Variables}).
1530 @end defun
1531
1532 @c Emacs 19 feature
1533 @defun default-boundp symbol
1534 The function @code{default-boundp} tells you whether @var{symbol}'s
1535 default value is nonvoid. If @code{(default-boundp 'foo)} returns
1536 @code{nil}, then @code{(default-value 'foo)} would get an error.
1537
1538 @code{default-boundp} is to @code{default-value} as @code{boundp} is to
1539 @code{symbol-value}.
1540 @end defun
1541
1542 @defspec setq-default [symbol form]@dots{}
1543 This special form gives each @var{symbol} a new default value, which is
1544 the result of evaluating the corresponding @var{form}. It does not
1545 evaluate @var{symbol}, but does evaluate @var{form}. The value of the
1546 @code{setq-default} form is the value of the last @var{form}.
1547
1548 If a @var{symbol} is not buffer-local for the current buffer, and is not
1549 marked automatically buffer-local, @code{setq-default} has the same
1550 effect as @code{setq}. If @var{symbol} is buffer-local for the current
1551 buffer, then this changes the value that other buffers will see (as long
1552 as they don't have a buffer-local value), but not the value that the
1553 current buffer sees.
1554
1555 @example
1556 @group
1557 ;; @r{In buffer @samp{foo}:}
1558 (make-local-variable 'buffer-local)
1559 @result{} buffer-local
1560 @end group
1561 @group
1562 (setq buffer-local 'value-in-foo)
1563 @result{} value-in-foo
1564 @end group
1565 @group
1566 (setq-default buffer-local 'new-default)
1567 @result{} new-default
1568 @end group
1569 @group
1570 buffer-local
1571 @result{} value-in-foo
1572 @end group
1573 @group
1574 (default-value 'buffer-local)
1575 @result{} new-default
1576 @end group
1577
1578 @group
1579 ;; @r{In (the new) buffer @samp{bar}:}
1580 buffer-local
1581 @result{} new-default
1582 @end group
1583 @group
1584 (default-value 'buffer-local)
1585 @result{} new-default
1586 @end group
1587 @group
1588 (setq buffer-local 'another-default)
1589 @result{} another-default
1590 @end group
1591 @group
1592 (default-value 'buffer-local)
1593 @result{} another-default
1594 @end group
1595
1596 @group
1597 ;; @r{Back in buffer @samp{foo}:}
1598 buffer-local
1599 @result{} value-in-foo
1600 (default-value 'buffer-local)
1601 @result{} another-default
1602 @end group
1603 @end example
1604 @end defspec
1605
1606 @defun set-default symbol value
1607 This function is like @code{setq-default}, except that @var{symbol} is
1608 an ordinary evaluated argument.
1609
1610 @example
1611 @group
1612 (set-default (car '(a b c)) 23)
1613 @result{} 23
1614 @end group
1615 @group
1616 (default-value 'a)
1617 @result{} 23
1618 @end group
1619 @end example
1620 @end defun
1621
1622 @node File Local Variables
1623 @section File Local Variables
1624 @cindex file local variables
1625
1626 A file can specify local variable values; Emacs uses these to create
1627 buffer-local bindings for those variables in the buffer visiting that
1628 file. @xref{File variables, , Local Variables in Files, emacs, The
1629 GNU Emacs Manual}, for basic information about file-local variables.
1630 This section describes the functions and variables that affect how
1631 file-local variables are processed.
1632
1633 If a file-local variable could specify an arbitrary function or Lisp
1634 expression that would be called later, visiting a file could take over
1635 your Emacs. Emacs protects against this by automatically setting only
1636 those file-local variables whose specified values are known to be
1637 safe. Other file-local variables are set only if the user agrees.
1638
1639 For additional safety, @code{read-circle} is temporarily bound to
1640 @code{nil} when Emacs reads file-local variables (@pxref{Input
1641 Functions}). This prevents the Lisp reader from recognizing circular
1642 and shared Lisp structures (@pxref{Circular Objects}).
1643
1644 @defopt enable-local-variables
1645 This variable controls whether to process file-local variables.
1646 The possible values are:
1647
1648 @table @asis
1649 @item @code{t} (the default)
1650 Set the safe variables, and query (once) about any unsafe variables.
1651 @item @code{:safe}
1652 Set only the safe variables and do not query.
1653 @item @code{:all}
1654 Set all the variables and do not query.
1655 @item @code{nil}
1656 Don't set any variables.
1657 @item anything else
1658 Query (once) about all the variables.
1659 @end table
1660 @end defopt
1661
1662 @defun hack-local-variables &optional mode-only
1663 This function parses, and binds or evaluates as appropriate, any local
1664 variables specified by the contents of the current buffer. The variable
1665 @code{enable-local-variables} has its effect here. However, this
1666 function does not look for the @samp{mode:} local variable in the
1667 @w{@samp{-*-}} line. @code{set-auto-mode} does that, also taking
1668 @code{enable-local-variables} into account (@pxref{Auto Major Mode}).
1669
1670 This function works by walking the alist stored in
1671 @code{file-local-variables-alist} and applying each local variable in
1672 turn. It calls @code{before-hack-local-variables-hook} and
1673 @code{hack-local-variables-hook} before and after applying the
1674 variables, respectively. It only calls the before-hook if the alist
1675 is non-@code{nil}; it always calls the other hook. This
1676 function ignores a @samp{mode} element if it specifies the same major
1677 mode as the buffer already has.
1678
1679 If the optional argument @var{mode-only} is non-@code{nil}, then all
1680 this function does is return a symbol specifying the major mode,
1681 if the @w{@samp{-*-}} line or the local variables list specifies one,
1682 and @code{nil} otherwise. It does not set the mode nor any other
1683 file-local variable.
1684 @end defun
1685
1686 @defvar file-local-variables-alist
1687 This buffer-local variable holds the alist of file-local variable
1688 settings. Each element of the alist is of the form
1689 @w{@code{(@var{var} . @var{value})}}, where @var{var} is a symbol of
1690 the local variable and @var{value} is its value. When Emacs visits a
1691 file, it first collects all the file-local variables into this alist,
1692 and then the @code{hack-local-variables} function applies them one by
1693 one.
1694 @end defvar
1695
1696 @defvar before-hack-local-variables-hook
1697 Emacs calls this hook immediately before applying file-local variables
1698 stored in @code{file-local-variables-alist}.
1699 @end defvar
1700
1701 @defvar hack-local-variables-hook
1702 Emacs calls this hook immediately after it finishes applying
1703 file-local variables stored in @code{file-local-variables-alist}.
1704 @end defvar
1705
1706 @cindex safe local variable
1707 You can specify safe values for a variable with a
1708 @code{safe-local-variable} property. The property has to be a
1709 function of one argument; any value is safe if the function returns
1710 non-@code{nil} given that value. Many commonly-encountered file
1711 variables have @code{safe-local-variable} properties; these include
1712 @code{fill-column}, @code{fill-prefix}, and @code{indent-tabs-mode}.
1713 For boolean-valued variables that are safe, use @code{booleanp} as the
1714 property value. Lambda expressions should be quoted so that
1715 @code{describe-variable} can display the predicate.
1716
1717 @defopt safe-local-variable-values
1718 This variable provides another way to mark some variable values as
1719 safe. It is a list of cons cells @code{(@var{var} . @var{val})},
1720 where @var{var} is a variable name and @var{val} is a value which is
1721 safe for that variable.
1722
1723 When Emacs asks the user whether or not to obey a set of file-local
1724 variable specifications, the user can choose to mark them as safe.
1725 Doing so adds those variable/value pairs to
1726 @code{safe-local-variable-values}, and saves it to the user's custom
1727 file.
1728 @end defopt
1729
1730 @defun safe-local-variable-p sym val
1731 This function returns non-@code{nil} if it is safe to give @var{sym}
1732 the value @var{val}, based on the above criteria.
1733 @end defun
1734
1735 @c @cindex risky local variable Duplicates risky-local-variable
1736 Some variables are considered @dfn{risky}. A variable whose name
1737 ends in any of @samp{-command}, @samp{-frame-alist}, @samp{-function},
1738 @samp{-functions}, @samp{-hook}, @samp{-hooks}, @samp{-form},
1739 @samp{-forms}, @samp{-map}, @samp{-map-alist}, @samp{-mode-alist},
1740 @samp{-program}, or @samp{-predicate} is considered risky. The
1741 variables @samp{font-lock-keywords}, @samp{font-lock-keywords}
1742 followed by a digit, and @samp{font-lock-syntactic-keywords} are also
1743 considered risky. Finally, any variable whose name has a
1744 non-@code{nil} @code{risky-local-variable} property is considered
1745 risky.
1746
1747 @defun risky-local-variable-p sym
1748 This function returns non-@code{nil} if @var{sym} is a risky variable,
1749 based on the above criteria.
1750 @end defun
1751
1752 If a variable is risky, it will not be entered automatically into
1753 @code{safe-local-variable-values} as described above. Therefore,
1754 Emacs will always query before setting a risky variable, unless the
1755 user explicitly allows the setting by customizing
1756 @code{safe-local-variable-values} directly.
1757
1758 @defvar ignored-local-variables
1759 This variable holds a list of variables that should not be given local
1760 values by files. Any value specified for one of these variables is
1761 completely ignored.
1762 @end defvar
1763
1764 The @samp{Eval:} ``variable'' is also a potential loophole, so Emacs
1765 normally asks for confirmation before handling it.
1766
1767 @defopt enable-local-eval
1768 This variable controls processing of @samp{Eval:} in @samp{-*-} lines
1769 or local variables
1770 lists in files being visited. A value of @code{t} means process them
1771 unconditionally; @code{nil} means ignore them; anything else means ask
1772 the user what to do for each file. The default value is @code{maybe}.
1773 @end defopt
1774
1775 @defopt safe-local-eval-forms
1776 This variable holds a list of expressions that are safe to
1777 evaluate when found in the @samp{Eval:} ``variable'' in a file
1778 local variables list.
1779 @end defopt
1780
1781 If the expression is a function call and the function has a
1782 @code{safe-local-eval-function} property, the property value
1783 determines whether the expression is safe to evaluate. The property
1784 value can be a predicate to call to test the expression, a list of
1785 such predicates (it's safe if any predicate succeeds), or @code{t}
1786 (always safe provided the arguments are constant).
1787
1788 Text properties are also potential loopholes, since their values
1789 could include functions to call. So Emacs discards all text
1790 properties from string values specified for file-local variables.
1791
1792 @node Directory Local Variables
1793 @section Directory Local Variables
1794 @cindex directory local variables
1795
1796 A directory can specify local variable values common to all files in
1797 that directory; Emacs uses these to create buffer-local bindings for
1798 those variables in buffers visiting any file in that directory. This
1799 is useful when the files in the directory belong to some @dfn{project}
1800 and therefore share the same local variables.
1801
1802 There are two different methods for specifying directory local
1803 variables: by putting them in a special file, or by defining a
1804 @dfn{project class} for that directory.
1805
1806 @defvr Constant dir-locals-file
1807 This constant is the name of the file where Emacs expects to find the
1808 directory-local variables. The name of the file is
1809 @file{.dir-locals.el}@footnote{
1810 The MS-DOS version of Emacs uses @file{_dir-locals.el} instead, due to
1811 limitations of the DOS filesystems.
1812 }. A file by that name in a directory causes Emacs to apply its
1813 settings to any file in that directory or any of its subdirectories
1814 (optionally, you can exclude subdirectories; see below).
1815 If some of the subdirectories have their own @file{.dir-locals.el}
1816 files, Emacs uses the settings from the deepest file it finds starting
1817 from the file's directory and moving up the directory tree. The file
1818 specifies local variables as a specially formatted list; see
1819 @ref{Directory Variables, , Per-directory Local Variables, emacs, The
1820 GNU Emacs Manual}, for more details.
1821 @end defvr
1822
1823 @defun hack-dir-local-variables
1824 This function reads the @code{.dir-locals.el} file and stores the
1825 directory-local variables in @code{file-local-variables-alist} that is
1826 local to the buffer visiting any file in the directory, without
1827 applying them. It also stores the directory-local settings in
1828 @code{dir-locals-class-alist}, where it defines a special class for
1829 the directory in which @file{.dir-locals.el} file was found. This
1830 function works by calling @code{dir-locals-set-class-variables} and
1831 @code{dir-locals-set-directory-class}, described below.
1832 @end defun
1833
1834 @defun dir-locals-set-class-variables class variables
1835 This function defines a set of variable settings for the named
1836 @var{class}, which is a symbol. You can later assign the class to one
1837 or more directories, and Emacs will apply those variable settings to
1838 all files in those directories. The list in @var{variables} can be of
1839 one of the two forms: @code{(@var{major-mode} . @var{alist})} or
1840 @code{(@var{directory} . @var{list})}. With the first form, if the
1841 file's buffer turns on a mode that is derived from @var{major-mode},
1842 then the all the variables in the associated @var{alist} are applied;
1843 @var{alist} should be of the form @code{(@var{name} . @var{value})}.
1844 A special value @code{nil} for @var{major-mode} means the settings are
1845 applicable to any mode. In @var{alist}, you can use a special
1846 @var{name}: @code{subdirs}. If the associated value is
1847 @code{nil}, the alist is only applied to files in the relevant
1848 directory, not to those in any subdirectories.
1849
1850 With the second form of @var{variables}, if @var{directory} is the
1851 initial substring of the file's directory, then @var{list} is applied
1852 recursively by following the above rules; @var{list} should be of one
1853 of the two forms accepted by this function in @var{variables}.
1854 @end defun
1855
1856 @defun dir-locals-set-directory-class directory class &optional mtime
1857 This function assigns @var{class} to all the files in @code{directory}
1858 and its subdirectories. Thereafter, all the variable settings
1859 specified for @var{class} will be applied to any visited file in
1860 @var{directory} and its children. @var{class} must have been already
1861 defined by @code{dir-locals-set-class-variables}.
1862
1863 Emacs uses this function internally when it loads directory variables
1864 from a @code{.dir-locals.el} file. In that case, the optional
1865 argument @var{mtime} holds the file modification time (as returned by
1866 @code{file-attributes}). Emacs uses this time to check stored
1867 local variables are still valid. If you are assigning a class
1868 directly, not via a file, this argument should be @code{nil}.
1869 @end defun
1870
1871 @defvar dir-locals-class-alist
1872 This alist holds the class symbols and the associated variable
1873 settings. It is updated by @code{dir-locals-set-class-variables}.
1874 @end defvar
1875
1876 @defvar dir-locals-directory-cache
1877 This alist holds directory names, their assigned class names, and
1878 modification times of the associated directory local variables file
1879 (if there is one). The function @code{dir-locals-set-directory-class}
1880 updates this list.
1881 @end defvar
1882
1883 @node Frame-Local Variables
1884 @section Frame-Local Values for Variables
1885 @cindex frame-local variables
1886
1887 In addition to buffer-local variable bindings (@pxref{Buffer-Local
1888 Variables}), Emacs supports @dfn{frame-local} bindings. A frame-local
1889 binding for a variable is in effect in a frame for which it was
1890 defined.
1891
1892 In practice, frame-local variables have not proven very useful.
1893 Ordinary frame parameters are generally used instead (@pxref{Frame
1894 Parameters}). The function @code{make-variable-frame-local}, which
1895 was used to define frame-local variables, has been deprecated since
1896 Emacs 22.2. However, you can still define a frame-specific binding
1897 for a variable @var{var} in frame @var{frame}, by setting the
1898 @var{var} frame parameter for that frame:
1899
1900 @lisp
1901 (modify-frame-parameters @var{frame} '((@var{var} . @var{value})))
1902 @end lisp
1903
1904 @noindent
1905 This causes the variable @var{var} to be bound to the specified
1906 @var{value} in the named @var{frame}. To check the frame-specific
1907 values of such variables, use @code{frame-parameter}. @xref{Parameter
1908 Access}.
1909
1910 Note that you cannot have a frame-local binding for a variable that
1911 has a buffer-local binding.
1912
1913 @node Variable Aliases
1914 @section Variable Aliases
1915 @cindex variable aliases
1916
1917 It is sometimes useful to make two variables synonyms, so that both
1918 variables always have the same value, and changing either one also
1919 changes the other. Whenever you change the name of a
1920 variable---either because you realize its old name was not well
1921 chosen, or because its meaning has partly changed---it can be useful
1922 to keep the old name as an @emph{alias} of the new one for
1923 compatibility. You can do this with @code{defvaralias}.
1924
1925 @defun defvaralias new-alias base-variable &optional docstring
1926 This function defines the symbol @var{new-alias} as a variable alias
1927 for symbol @var{base-variable}. This means that retrieving the value
1928 of @var{new-alias} returns the value of @var{base-variable}, and
1929 changing the value of @var{new-alias} changes the value of
1930 @var{base-variable}. The two aliased variable names always share the
1931 same value and the same bindings.
1932
1933 If the @var{docstring} argument is non-@code{nil}, it specifies the
1934 documentation for @var{new-alias}; otherwise, the alias gets the same
1935 documentation as @var{base-variable} has, if any, unless
1936 @var{base-variable} is itself an alias, in which case @var{new-alias} gets
1937 the documentation of the variable at the end of the chain of aliases.
1938
1939 This function returns @var{base-variable}.
1940 @end defun
1941
1942 Variable aliases are convenient for replacing an old name for a
1943 variable with a new name. @code{make-obsolete-variable} declares that
1944 the old name is obsolete and therefore that it may be removed at some
1945 stage in the future.
1946
1947 @defun make-obsolete-variable obsolete-name current-name &optional when
1948 This function makes the byte compiler warn that the variable
1949 @var{obsolete-name} is obsolete. If @var{current-name} is a symbol, it is
1950 the variable's new name; then the warning message says to use
1951 @var{current-name} instead of @var{obsolete-name}. If @var{current-name}
1952 is a string, this is the message and there is no replacement variable.
1953
1954 If provided, @var{when} should be a string indicating when the
1955 variable was first made obsolete---for example, a date or a release
1956 number.
1957 @end defun
1958
1959 You can make two variables synonyms and declare one obsolete at the
1960 same time using the macro @code{define-obsolete-variable-alias}.
1961
1962 @defmac define-obsolete-variable-alias obsolete-name current-name &optional when docstring
1963 This macro marks the variable @var{obsolete-name} as obsolete and also
1964 makes it an alias for the variable @var{current-name}. It is
1965 equivalent to the following:
1966
1967 @example
1968 (defvaralias @var{obsolete-name} @var{current-name} @var{docstring})
1969 (make-obsolete-variable @var{obsolete-name} @var{current-name} @var{when})
1970 @end example
1971 @end defmac
1972
1973 @defun indirect-variable variable
1974 This function returns the variable at the end of the chain of aliases
1975 of @var{variable}. If @var{variable} is not a symbol, or if @var{variable} is
1976 not defined as an alias, the function returns @var{variable}.
1977
1978 This function signals a @code{cyclic-variable-indirection} error if
1979 there is a loop in the chain of symbols.
1980 @end defun
1981
1982 @example
1983 (defvaralias 'foo 'bar)
1984 (indirect-variable 'foo)
1985 @result{} bar
1986 (indirect-variable 'bar)
1987 @result{} bar
1988 (setq bar 2)
1989 bar
1990 @result{} 2
1991 @group
1992 foo
1993 @result{} 2
1994 @end group
1995 (setq foo 0)
1996 bar
1997 @result{} 0
1998 foo
1999 @result{} 0
2000 @end example
2001
2002 @node Variables with Restricted Values
2003 @section Variables with Restricted Values
2004
2005 Ordinary Lisp variables can be assigned any value that is a valid
2006 Lisp object. However, certain Lisp variables are not defined in Lisp,
2007 but in C. Most of these variables are defined in the C code using
2008 @code{DEFVAR_LISP}. Like variables defined in Lisp, these can take on
2009 any value. However, some variables are defined using
2010 @code{DEFVAR_INT} or @code{DEFVAR_BOOL}. @xref{Defining Lisp
2011 variables in C,, Writing Emacs Primitives}, in particular the
2012 description of functions of the type @code{syms_of_@var{filename}},
2013 for a brief discussion of the C implementation.
2014
2015 Variables of type @code{DEFVAR_BOOL} can only take on the values
2016 @code{nil} or @code{t}. Attempting to assign them any other value
2017 will set them to @code{t}:
2018
2019 @example
2020 (let ((display-hourglass 5))
2021 display-hourglass)
2022 @result{} t
2023 @end example
2024
2025 @defvar byte-boolean-vars
2026 This variable holds a list of all variables of type @code{DEFVAR_BOOL}.
2027 @end defvar
2028
2029 Variables of type @code{DEFVAR_INT} can only take on integer values.
2030 Attempting to assign them any other value will result in an error:
2031
2032 @example
2033 (setq window-min-height 5.0)
2034 @error{} Wrong type argument: integerp, 5.0
2035 @end example