mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-21 18:23:59 +00:00
Code Issues Releases Activity

(set_internal): Enter the new arg.

Browse Source
This commit is contained in:
Richard M. Stallman 2000-01-11 22:16:55 +00:00
parent 1fab1775e0
commit 5fd6e27432
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
src/lisp.h
View File

@ -1452,8 +1452,13 @@ extern void defvar_kboard P_ ((char *, int));
If func is zero and symbol is nil, undoing this binding evaluates
the list of forms in old_value; this implements Lisp's unwind-protect
form.
Otherwise, undoing this binding stores old_value as symbol's value; this
undoes the bindings made by a let form or function call. */
Otherwise, the element is a variable binding.
If the symbol field is a symbol, it is an ordinary variable binding.
Otherwise, it should be a cons cell (SYMBOL . BUFFER)
which represents having bound BUFFER's local value.
or (SYMBOL . nil), which represents having bound the default value. */
struct specbinding
{
Lisp_Object symbol, old_value;
@ -1831,7 +1836,7 @@ extern void args_out_of_range_3 P_ ((Lisp_Object, Lisp_Object, Lisp_Object));
extern Lisp_Object wrong_type_argument P_ ((Lisp_Object, Lisp_Object));
extern void store_symval_forwarding P_ ((Lisp_Object, Lisp_Object, Lisp_Object));
extern Lisp_Object do_symval_forwarding P_ ((Lisp_Object));
extern Lisp_Object set_internal P_ ((Lisp_Object, Lisp_Object, int));
extern Lisp_Object set_internal P_ ((Lisp_Object, Lisp_Object, struct buffer *, int));
extern void syms_of_data P_ ((void));
extern void init_data P_ ((void));