mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-05 11:21:04 -08:00
Code Issues Projects Releases Wiki Activity

* data.c (swap_in_symval_forwarding): Formatting tweaked.

Browse source
This commit is contained in:
Jim Blandy 1992-09-29 15:06:46 +00:00
parent 9deb415abc
commit 533984a8ec
1 changed files with 11 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

19
src/data.c
View file

@ -640,14 +640,17 @@ swap_in_symval_forwarding (sym, valcontents)
(REALVALUE BUFFER CURRENT-ALIST-ELEMENT . DEFAULT-VALUE)).
CURRENT-ALIST-ELEMENT is a pointer to an element of BUFFER's
local_var_alist, that being the element whose car is this variable.
Or it can be a pointer to the (CURRENT-ALIST-ELEMENT . DEFAULT-VALUE), if BUFFER
does not have an element in its alist for this variable.
If the current buffer is not BUFFER, we store the current REALVALUE value into
CURRENT-ALIST-ELEMENT, then find the appropriate alist element for
the buffer now current and set up CURRENT-ALIST-ELEMENT.
Then we set REALVALUE out of that element, and store into BUFFER.
local_var_alist, that being the element whose car is this
variable. Or it can be a pointer to the
(CURRENT-ALIST-ELEMENT . DEFAULT-VALUE), if BUFFER does not have
an element in its alist for this variable.
If the current buffer is not BUFFER, we store the current
REALVALUE value into CURRENT-ALIST-ELEMENT, then find the
appropriate alist element for the buffer now current and set up
CURRENT-ALIST-ELEMENT. Then we set REALVALUE out of that
element, and store into BUFFER.
Note that REALVALUE can be a forwarding pointer. */
register Lisp_Object tem1;