aboutsummaryrefslogtreecommitdiffstats
path: root/src/eval.c
diff options
context:
space:
mode:
authorDmitry Antipov2012-08-17 18:24:43 +0400
committerDmitry Antipov2012-08-17 18:24:43 +0400
commita04e2c62ec8ce903310b7c7635c43f42ccab5e2f (patch)
tree79da6e7e7455731a813eb601a158057c66bdcee6 /src/eval.c
parent8223e9280fa69afeeae1a8b51735cbb8393f2e8d (diff)
downloademacs-a04e2c62ec8ce903310b7c7635c43f42ccab5e2f.tar.gz
emacs-a04e2c62ec8ce903310b7c7635c43f42ccab5e2f.zip
Functions to get and set Lisp_Object fields of buffer-local variables.
* lisp.h (blv_found, set_blv_found, blv_value, set_blv_value) (set_blv_where, set_blv_defcell, set_blv_valcell): New functions. (BLV_FOUND, SET_BLV_FOUND, BLV_VALUE, SET_BLV_VALUE): Remove. * data.c, eval.c, frame.c: Adjust users.
Diffstat (limited to 'src/eval.c')
-rw-r--r--src/eval.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/eval.c b/src/eval.c
index f3f14d60e1c..771cd7b160a 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -3169,12 +3169,12 @@ specbind (Lisp_Object symbol, Lisp_Object value)
3169 if (!NILP (Flocal_variable_p (symbol, Qnil))) 3169 if (!NILP (Flocal_variable_p (symbol, Qnil)))
3170 { 3170 {
3171 eassert (sym->redirect != SYMBOL_LOCALIZED 3171 eassert (sym->redirect != SYMBOL_LOCALIZED
3172 || (BLV_FOUND (SYMBOL_BLV (sym)) 3172 || (blv_found (SYMBOL_BLV (sym))
3173 && EQ (cur_buf, SYMBOL_BLV (sym)->where))); 3173 && EQ (cur_buf, SYMBOL_BLV (sym)->where)));
3174 where = cur_buf; 3174 where = cur_buf;
3175 } 3175 }
3176 else if (sym->redirect == SYMBOL_LOCALIZED 3176 else if (sym->redirect == SYMBOL_LOCALIZED
3177 && BLV_FOUND (SYMBOL_BLV (sym))) 3177 && blv_found (SYMBOL_BLV (sym)))
3178 where = SYMBOL_BLV (sym)->where; 3178 where = SYMBOL_BLV (sym)->where;
3179 else 3179 else
3180 where = Qnil; 3180 where = Qnil;