comparison src/event-msw.c @ 791:7b1f30330a19

[xemacs-hg @ 2002-03-21 18:55:01 by adrian] [PATCH] Assert around line 1600 in event-msw.c <3cz31qp4.fsf@arbortext.com>
author adrian
date Thu, 21 Mar 2002 18:55:09 +0000
parents 026c5bf9c134
children e38acbeb1cae
comparison
equal deleted inserted replaced
790:755d0acc05ea 791:7b1f30330a19
1144 1144
1145 mswindows_waitable_handles [ix] = 1145 mswindows_waitable_handles [ix] =
1146 mswindows_waitable_handles [--mswindows_waitable_count]; 1146 mswindows_waitable_handles [--mswindows_waitable_count];
1147 } 1147 }
1148 #endif /* HAVE_MSG_SELECT */ 1148 #endif /* HAVE_MSG_SELECT */
1149
1150 /*
1151 * Given a lisp process pointer remove the corresponding process handle
1152 * from mswindows_waitable_handles if it is in it. Normally the handle is
1153 * removed when the process terminates, but if the lisp process structure
1154 * is deleted before the process terminates we must delete the process
1155 * handle since it will be invalid and will cause the wait to fail
1156 */
1157 void
1158 mswindows_unwait_process (Lisp_Process *p)
1159 {
1160 #ifndef HAVE_MSG_SELECT
1161 remove_waitable_handle (get_nt_process_handle (p));
1162 #endif /* HAVE_MSG_SELECT */
1163 }
1149 1164
1150 1165
1151 /************************************************************************/ 1166 /************************************************************************/
1152 /* Event pump */ 1167 /* Event pump */
1153 /************************************************************************/ 1168 /************************************************************************/