[Emacs-diffs] Changes to emacs/src/lread.c

[Richard M. Stallman]

Index: emacs/src/lread.c
diff -c emacs/src/lread.c:1.295 emacs/src/lread.c:1.296
*** emacs/src/lread.c:1.295     Tue Jul 16 15:48:47 2002
--- emacs/src/lread.c   Fri Aug 23 23:17:18 2002
***************
*** 1201,1207 ****
                {
                  newelt = XCAR (tem2);
  
!                 if (NILP (Fmemq (newelt, tem)))
                    Fsetcar (tail, Fcons (XCAR (tem),
                                          Fcons (newelt, XCDR (tem))));
  
--- 1201,1207 ----
                {
                  newelt = XCAR (tem2);
  
!                 if (NILP (Fmember (newelt, tem)))
                    Fsetcar (tail, Fcons (XCAR (tem),
                                          Fcons (newelt, XCDR (tem))));
  
***************
*** 3760,3768 ****
  Each alist element is a list that starts with a file name,
  except for one element (optional) that starts with nil and describes
  definitions evaluated from buffers not visiting files.
! The remaining elements of each list are symbols defined as functions
! or variables, and cons cells `(provide . FEATURE)', `(require . FEATURE)',
! and `(autoload . SYMBOL)'.  */);
    Vload_history = Qnil;
  
    DEFVAR_LISP ("load-file-name", &Vload_file_name,
--- 3760,3768 ----
  Each alist element is a list that starts with a file name,
  except for one element (optional) that starts with nil and describes
  definitions evaluated from buffers not visiting files.
! The remaining elements of each list are symbols defined as functions,
! and cons cells of the form `(provide . FEATURE)', `(require . FEATURE)',
! `(defvar . VARIABLE), and `(autoload . SYMBOL)'.  */);
    Vload_history = Qnil;
  
    DEFVAR_LISP ("load-file-name", &Vload_file_name,