# HG changeset patch # User Jim Blandy # Date 717779206 0 # Node ID 3790dfbefb306b0c2156e2cda9c9feaaa284a7f6 # Parent c9fc221502e4715d82e1220319e551a8139d1dbb * data.c (swap_in_symval_forwarding): Formatting tweaked. diff -r c9fc221502e4 -r 3790dfbefb30 src/data.c --- a/src/data.c Tue Sep 29 14:29:22 1992 +0000 +++ b/src/data.c Tue Sep 29 15:06:46 1992 +0000 @@ -640,14 +640,17 @@ (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;