From 8ba156f1e77f22b448ffca72b2ba4dd5ea42ea59 Mon Sep 17 00:00:00 2001
From: Eli Zaretskii <eliz@gnu.org>
Date: Mon, 12 Oct 2015 20:02:52 +0300
Subject: [PATCH] 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)
---
 src/fns.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/fns.c b/src/fns.c
index b31bd817c44..dfd48a297a6 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -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;
 }
-- 
2.39.2