Mercurial > emacs
comparison src/undo.c @ 28417:4b675266db04
* lisp.h (XCONS, XSTRING, XSYMBOL, XFLOAT, XPROCESS, XWINDOW, XSUBR, XBUFFER):
Verify correct object type before returning pointer, using eassert.
* frame.h (XFRAME): Likewise.
* buffer.c (Frename_buffer, Fset_buffer_multibyte,
swap_out_buffer_local_variables, Fmove_overlay): Don't apply XSYMBOL, XBUFFER,
etc, to values that may be nil or of the wrong type.
* data.c (set_internal): Likewise.
* dispextern.h (WINDOW_WANTS_MODELINE_P, WINDOW_WANTS_HEADER_LINE_P): Likewise.
* fileio.c (auto_save_1): Likewise.
* insdel.c (check_markers): Likewise.
* marker.c (buf_charpos_to_bytepos, unchain_marker): Likewise.
* undo.c (record_insert): Likewise.
* vmsproc.c (child_sig): Likewise.
* window.c (unshow_buffer, window_loop): Likewise.
* xterm.c (x_erase_phys_cursor): Likewise.
author | Ken Raeburn <raeburn@raeburn.org> |
---|---|
date | Thu, 30 Mar 2000 09:56:31 +0000 |
parents | c3c9cc1c2379 |
children | 12d806a22931 |
comparison
equal
deleted
inserted
replaced
28416:24ba809218ad | 28417:4b675266db04 |
---|---|
52 | 52 |
53 /* Allocate a cons cell to be the undo boundary after this command. */ | 53 /* Allocate a cons cell to be the undo boundary after this command. */ |
54 if (NILP (pending_boundary)) | 54 if (NILP (pending_boundary)) |
55 pending_boundary = Fcons (Qnil, Qnil); | 55 pending_boundary = Fcons (Qnil, Qnil); |
56 | 56 |
57 if (current_buffer != XBUFFER (last_undo_buffer)) | 57 if (!BUFFERP (last_undo_buffer) |
58 || current_buffer != XBUFFER (last_undo_buffer)) | |
58 Fundo_boundary (); | 59 Fundo_boundary (); |
59 XSETBUFFER (last_undo_buffer, current_buffer); | 60 XSETBUFFER (last_undo_buffer, current_buffer); |
60 | 61 |
61 if (MODIFF <= SAVE_MODIFF) | 62 if (MODIFF <= SAVE_MODIFF) |
62 record_first_change (); | 63 record_first_change (); |