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:
parent
1a588cb6dc
commit
8ba156f1e7
1 changed files with 1 additions and 1 deletions
|
@ -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;
|
||||
}
|
||||
|
|
Loading…
Add table
Reference in a new issue