mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-16 08:10:43 -08:00
Code Issues Projects Releases Wiki Activity

(Bsave_current_buffer): New macro.

Browse source 
(Fbyte_code): Handle Bsave_current_buffer.
This commit is contained in:
Richard M. Stallman 1996-09-23 04:27:27 +00:00
parent c4de97b454
commit 3b841abc54
1 changed files with 6 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/bytecode.c
View file

@ -130,7 +130,8 @@ Lisp_Object Qbytecode;
#define Bmult 0137
#define Bpoint 0140
#define Bmark 0141 /* no longer generated as of v18 */
/* Was Bmark in v17. */
#define Bsave_current_buffer 0141
#define Bgoto_char 0142
#define Binsert 0143
#define Bpoint_max 0144
@ -537,6 +538,10 @@ If the third argument is incorrect, Emacs may crash.")
record_unwind_protect (save_excursion_restore, save_excursion_save ());
break;
case Bsave_current_buffer:
record_unwind_protect (Fset_buffer, Fcurrent_buffer ());
break;
case Bsave_window_excursion:
TOP = Fsave_window_excursion (TOP);
break;