Attempt to avoid crashes in plist-member

* src/fns.c (Fplist_member): Don't call QUIT between a CONSP test
and a call to XCDR.  (Bug#21655)
This commit is contained in:
Eli Zaretskii 2015-10-12 20:02:52 +03:00
parent 1a588cb6dc
commit 8ba156f1e7

View file

@ -2875,9 +2875,9 @@ The value is actually the tail of PLIST whose car is PROP. */)
{
while (CONSP (plist) && !EQ (XCAR (plist), prop))
{
QUIT;
plist = XCDR (plist);
plist = CDR (plist);
QUIT;
}
return plist;
}