* emacs-lisp/bytecomp.el (byte-compile-output-file-form): Handle defvaralias.
* make-docfile.c (scan_lisp_file): Also look for `defvaralias'.
This commit is contained in:
parent
601dd9a3a9
commit
f6195dfb58
4 changed files with 12 additions and 2 deletions
|
@ -1,3 +1,7 @@
|
||||||
|
2009-11-04 Dan Nicolaescu <dann@ics.uci.edu>
|
||||||
|
|
||||||
|
* make-docfile.c (scan_lisp_file): Also look for `defvaralias'.
|
||||||
|
|
||||||
2009-10-15 Juanma Barranquero <lekktu@gmail.com>
|
2009-10-15 Juanma Barranquero <lekktu@gmail.com>
|
||||||
|
|
||||||
* .gitignore: Add echolisp.tmp.
|
* .gitignore: Add echolisp.tmp.
|
||||||
|
|
|
@ -1007,7 +1007,9 @@ scan_lisp_file (filename, mode)
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
else if (! strcmp (buffer, "custom-declare-variable"))
|
else if (! strcmp (buffer, "custom-declare-variable")
|
||||||
|
|| ! strcmp (buffer, "defvaralias")
|
||||||
|
)
|
||||||
{
|
{
|
||||||
char c1 = 0, c2 = 0;
|
char c1 = 0, c2 = 0;
|
||||||
type = 'V';
|
type = 'V';
|
||||||
|
|
|
@ -1,3 +1,7 @@
|
||||||
|
2009-11-03 Dan Nicolaescu <dann@ics.uci.edu>
|
||||||
|
|
||||||
|
* emacs-lisp/bytecomp.el (byte-compile-output-file-form): Handle defvaralias.
|
||||||
|
|
||||||
2009-11-04 Stefan Monnier <monnier@iro.umontreal.ca>
|
2009-11-04 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||||
|
|
||||||
* descr-text.el: Require help-mode rather than help-fns (bug#4861).
|
* descr-text.el: Require help-mode rather than help-fns (bug#4861).
|
||||||
|
|
|
@ -2077,7 +2077,7 @@ and will be removed soon. See (elisp)Backquote in the manual."))
|
||||||
;; defalias calls are output directly by byte-compile-file-form-defmumble;
|
;; defalias calls are output directly by byte-compile-file-form-defmumble;
|
||||||
;; it does not pay to first build the defalias in defmumble and then parse
|
;; it does not pay to first build the defalias in defmumble and then parse
|
||||||
;; it here.
|
;; it here.
|
||||||
(if (and (memq (car-safe form) '(defun defmacro defvar defconst autoload
|
(if (and (memq (car-safe form) '(defun defmacro defvar defvaralias defconst autoload
|
||||||
custom-declare-variable))
|
custom-declare-variable))
|
||||||
(stringp (nth 3 form)))
|
(stringp (nth 3 form)))
|
||||||
(byte-compile-output-docform nil nil '("\n(" 3 ")") form nil
|
(byte-compile-output-docform nil nil '("\n(" 3 ")") form nil
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue