Mercurial > emacs
changeset 10514:0b52bc04c180
(byte-compile-defvar): Add the var to current-load-list.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 22 Jan 1995 00:52:51 +0000 |
| parents | e4423ed2b4cb |
| children | d32348ef2b69 |
| files | lisp/emacs-lisp/bytecomp.el |
| diffstat | 1 files changed, 5 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/bytecomp.el Sat Jan 21 23:51:19 1995 +0000 +++ b/lisp/emacs-lisp/bytecomp.el Sun Jan 22 00:52:51 1995 +0000 @@ -2887,6 +2887,11 @@ (list 'setq var value) (list 'or (list 'boundp (list 'quote var)) (list 'setq var value)))) + ;; Put the defined variable in this library's load-history entry + ;; just as a real defvar would. + (list 'setq 'current-load-list + (list 'cons (list 'quote var) + 'current-load-list)) (if string (list 'put (list 'quote var) ''variable-documentation string)) (list 'quote var)))))