diff options
| author | Stefan Monnier | 2016-12-21 15:07:43 -0500 |
|---|---|---|
| committer | Stefan Monnier | 2016-12-21 15:07:43 -0500 |
| commit | a6063ffe5ae395655cb55ba5823c83e306b3161b (patch) | |
| tree | ab44b1db51c5ae4e5ff65533b9eeba79de954460 /src/eval.c | |
| parent | cf6ce9a1fe320ebe5b238af5f7af9416ac954855 (diff) | |
| download | emacs-a6063ffe5ae395655cb55ba5823c83e306b3161b.tar.gz emacs-a6063ffe5ae395655cb55ba5823c83e306b3161b.zip | |
* src/data.c (Fmake_variable_frame_local): Remove
* src/lisp.h (struct Lisp_Buffer_Local_Value): Remove `frame_local'.
* src/data.c (swap_in_symval_forwarding, set_internal)
(set_symbol_trapped_write, make_blv, Fmake_variable_buffer_local)
(Fmake_local_variable, Fkill_local_variable, Flocal_variable_p):
Don't pay attention to ->frame_local any more.
(syms_of_data): Remove Qtrapping_frame_local and don't defsubr
Smake_variable_frame_local.
* etc/NEWS (Incompatible Lisp Changes in Emacs 26.1): Announce removal
of make-variable-frame-local.
* lisp/help-fns.el (describe-variable): Don't handle the now impossible
frame-local case.
* lisp/subr.el (make-variable-frame-local): Remove obsolescence data.
* src/frame.c (store_frame_param):
* src/eval.c (specbind): Don't pay attention to ->frame_local any more.
* src/widget.c (first_frame_p): Remove, unused.
Diffstat (limited to 'src/eval.c')
| -rw-r--r-- | src/eval.c | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/src/eval.c b/src/eval.c index 1d397303393..1313093a533 100644 --- a/src/eval.c +++ b/src/eval.c | |||
| @@ -3283,8 +3283,6 @@ specbind (Lisp_Object symbol, Lisp_Object value) | |||
| 3283 | do_specbind (sym, specpdl_ptr - 1, value, SET_INTERNAL_BIND); | 3283 | do_specbind (sym, specpdl_ptr - 1, value, SET_INTERNAL_BIND); |
| 3284 | break; | 3284 | break; |
| 3285 | case SYMBOL_LOCALIZED: | 3285 | case SYMBOL_LOCALIZED: |
| 3286 | if (SYMBOL_BLV (sym)->frame_local) | ||
| 3287 | error ("Frame-local vars cannot be let-bound"); | ||
| 3288 | case SYMBOL_FORWARDED: | 3286 | case SYMBOL_FORWARDED: |
| 3289 | { | 3287 | { |
| 3290 | Lisp_Object ovalue = find_symbol_value (symbol); | 3288 | Lisp_Object ovalue = find_symbol_value (symbol); |