comparison src/eval.c @ 61901:787052160d87

(do_autoload): Record only autoloads in the autoload property of symbols.

61900:cdd3e3ac3b37

/* Evaluator for GNU Emacs Lisp interpreter.
   Copyright (C) 1985, 86, 87, 93, 94, 95, 99, 2000, 2001, 02, 2004
     Free Software Foundation, Inc.

This file is part of GNU Emacs.

GNU Emacs is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by

    {
      first = XCAR (queue);
      second = Fcdr (first);
      first = Fcar (first);

      /* Note: This test is subtle.  The cdr of an autoload-queue entry
	 may be an atom if the autoload entry was generated by a defalias
	 or fset.  */
      if (CONSP (second))
	Fput (first, Qautoload, (XCDR (second)));

      queue = XCDR (queue);
    }

61901:787052160d87

/* Evaluator for GNU Emacs Lisp interpreter.
   Copyright (C) 1985, 1986, 1987, 1993, 1994, 1995, 1999, 2000, 2001,
     2002, 2004, 2005 Free Software Foundation, Inc.

This file is part of GNU Emacs.

GNU Emacs is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by

    {
      first = XCAR (queue);
      second = Fcdr (first);
      first = Fcar (first);

      if (CONSP (second) && EQ (XCAR (second), Qautoload))
	Fput (first, Qautoload, (XCDR (second)));

      queue = XCDR (queue);
    }