Re: delete-process bug

[Kim F. Storm]

Stefan Monnier <address@hidden> writes:

> +static Lisp_Object live_deleted_processes;

What about deleted_pid_list ?

> +
>  DEFUN ("delete-process", Fdelete_process, Sdelete_process, 1, 1, 0,
>         doc: /* Delete PROCESS: kill it and forget about it immediately.
>  PROCESS may be a process, a buffer, the name of a process or buffer, or
> @@ -800,6 +807,9 @@
>    else if (XINT (p->infd) >= 0)
>      {
>        Fkill_process (process, Qnil);
> +      live_deleted_processes = Fcons (make_number (p->pid),

IIRC, using an EMACS_INT for storing pids was unsafe.  Using a float is better.

> +      tail = Fmemq (make_number (pid), live_deleted_processes);

Ditto.

-- 
Kim F. Storm <address@hidden> http://www.cua.dk