[Emacs-diffs] emacs-25 df5ae7d: Revert "Re-enable checks in member, memql, delete to complain about non-lists"

[Andreas Schwab]

branch: emacs-25
commit df5ae7ddab1bd2fbb8a6a4abc05d4922abf8c5db
Author: Andreas Schwab <address@hidden>
Commit: Andreas Schwab <address@hidden>

    Revert "Re-enable checks in member, memql, delete to complain about 
non-lists"
    
    This reverts commit f524e8b7f12d9b5a8b92084e5385429fe7b085b9.
---
 src/fns.c |    6 +++---
 1 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/fns.c b/src/fns.c
index d180844..86ad333 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -1349,7 +1349,7 @@ The value is actually the tail of LIST whose car is ELT.  
*/)
   (register Lisp_Object elt, Lisp_Object list)
 {
   register Lisp_Object tail;
-  for (tail = list; !NILP (tail); tail = XCDR (tail))
+  for (tail = list; CONSP (tail); tail = XCDR (tail))
     {
       register Lisp_Object tem;
       CHECK_LIST_CONS (tail, list);
@@ -1397,7 +1397,7 @@ The value is actually the tail of LIST whose car is ELT.  
*/)
   if (!FLOATP (elt))
     return Fmemq (elt, list);
 
-  for (tail = list; !NILP (tail); tail = XCDR (tail))
+  for (tail = list; CONSP (tail); tail = XCDR (tail))
     {
       register Lisp_Object tem;
       CHECK_LIST_CONS (tail, list);
@@ -1710,7 +1710,7 @@ changing the value of a sequence `foo'.  */)
     {
       Lisp_Object tail, prev;
 
-      for (tail = seq, prev = Qnil; !NILP (tail); tail = XCDR (tail))
+      for (tail = seq, prev = Qnil; CONSP (tail); tail = XCDR (tail))
        {
          CHECK_LIST_CONS (tail, seq);