Mercurial > emacs
comparison src/frame.h @ 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 | d5e2053c7bbd |
children | 2ce492de4cb9 |
comparison
equal
deleted
inserted
replaced
28416:24ba809218ad | 28417:4b675266db04 |
---|---|
381 #define FRAME_KBOARD(f) (&the_only_kboard) | 381 #define FRAME_KBOARD(f) (&the_only_kboard) |
382 #endif | 382 #endif |
383 | 383 |
384 typedef struct frame *FRAME_PTR; | 384 typedef struct frame *FRAME_PTR; |
385 | 385 |
386 #define XFRAME(p) ((struct frame *) XPNTR (p)) | 386 #define XFRAME(p) (eassert (GC_FRAMEP(p)),(struct frame *) XPNTR (p)) |
387 #define XSETFRAME(a, b) (XSETPSEUDOVECTOR (a, b, PVEC_FRAME)) | 387 #define XSETFRAME(a, b) (XSETPSEUDOVECTOR (a, b, PVEC_FRAME)) |
388 | 388 |
389 /* Given a window, return its frame as a Lisp_Object. */ | 389 /* Given a window, return its frame as a Lisp_Object. */ |
390 #define WINDOW_FRAME(w) (w)->frame | 390 #define WINDOW_FRAME(w) (w)->frame |
391 | 391 |