Mercurial > emacs
diff src/vmsproc.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 | a5eaace0fa01 |
children | 002c02db42d3 |
line wrap: on
line diff
--- a/src/vmsproc.c Thu Mar 30 09:37:06 2000 +0000 +++ b/src/vmsproc.c Thu Mar 30 09:56:31 2000 +0000 @@ -758,7 +758,7 @@ pid = vs->pid; sys$setef (vs->eventFlag); - for (tail = Vprocess_alist; XSYMBOL (tail) != XSYMBOL (Qnil); tail = XCDR (tail)) + for (tail = Vprocess_alist; ! NILP (tail); tail = XCDR (tail)) { proc = XCDR (XCAR (tail)); p = XPROCESS (proc); @@ -766,7 +766,7 @@ break; } - if (XSYMBOL (tail) == XSYMBOL (Qnil)) + if (NILP (tail)) return; p->status = Fcons (Qexit, Fcons (make_number (vs->exitStatus), Qnil))