comparison src/vmsproc.c @ 25663:a5eaace0fa01

Use XCAR and XCDR instead of explicit member access.
author Ken Raeburn <raeburn@raeburn.org>
date Mon, 13 Sep 1999 03:35:33 +0000
parents ee40177f6c68
children 4b675266db04
comparison
equal deleted inserted replaced
25662:0a7261c1d487 25663:a5eaace0fa01
756 int old_errno = errno; 756 int old_errno = errno;
757 757
758 pid = vs->pid; 758 pid = vs->pid;
759 sys$setef (vs->eventFlag); 759 sys$setef (vs->eventFlag);
760 760
761 for (tail = Vprocess_alist; XSYMBOL (tail) != XSYMBOL (Qnil); tail = XCONS (tail)->cdr) 761 for (tail = Vprocess_alist; XSYMBOL (tail) != XSYMBOL (Qnil); tail = XCDR (tail))
762 { 762 {
763 proc = XCONS (XCONS (tail)->car)->cdr; 763 proc = XCDR (XCAR (tail));
764 p = XPROCESS (proc); 764 p = XPROCESS (proc);
765 if (EQ (p->childp, Qt) && XFASTINT (p->pid) == pid) 765 if (EQ (p->childp, Qt) && XFASTINT (p->pid) == pid)
766 break; 766 break;
767 } 767 }
768 768