Mercurial > emacs

comparison src/buffer.c @ 5703:62dce9e0e175

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Whitespace change.
author Richard M. Stallman <rms@gnu.org>
date Sun, 30 Jan 1994 01:03:56 +0000
parents 3b4bb6d2c922
children 03f8720af7fb
comparison
equal deleted inserted replaced
5702:049d6b5848f6 5703:62dce9e0e175
1210 tem = XCONS (XCONS (XSYMBOL (sym)->value)->cdr)->cdr; 1210 tem = XCONS (XCONS (XSYMBOL (sym)->value)->cdr)->cdr;
1211 /* Store the symbol's current value into the alist entry 1211 /* Store the symbol's current value into the alist entry
1212 it is currently set up for. This is so that, if the 1212 it is currently set up for. This is so that, if the
1213 local is marked permanent, and we make it local again below, 1213 local is marked permanent, and we make it local again below,
1214 we don't lose the value. */ 1214 we don't lose the value. */
1215 XCONS (XCONS (tem)->car)->cdr = 1215 XCONS (XCONS (tem)->car)->cdr
1216 do_symval_forwarding (XCONS (XSYMBOL (sym)->value)->car); 1216 = do_symval_forwarding (XCONS (XSYMBOL (sym)->value)->car);
1217 /* Switch to the symbol's default-value alist entry. */ 1217 /* Switch to the symbol's default-value alist entry. */
1218 XCONS (tem)->car = tem; 1218 XCONS (tem)->car = tem;
1219 /* Mark it as current for the current buffer. */ 1219 /* Mark it as current for the current buffer. */
1220 XCONS (XCONS (XSYMBOL (sym)->value)->cdr)->car = Fcurrent_buffer (); 1220 XCONS (XCONS (XSYMBOL (sym)->value)->cdr)->car = Fcurrent_buffer ();
1221 /* Store the current value into any forwarding in the symbol. */ 1221 /* Store the current value into any forwarding in the symbol. */