diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2022-01-31 16:25:09 -0500 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2022-01-31 16:25:09 -0500 |
| commit | cce477cad7ffffbfc1a21e9dd711b32f8e2b3ea3 (patch) | |
| tree | 4b6f9a3e574ac4b875f191dd6b09d27e3e176da3 /lisp/cedet/semantic | |
| parent | be2566eeab627dd8c38cfb3adb678a925af300bc (diff) | |
| download | emacs-cce477cad7ffffbfc1a21e9dd711b32f8e2b3ea3.tar.gz emacs-cce477cad7ffffbfc1a21e9dd711b32f8e2b3ea3.tar.bz2 emacs-cce477cad7ffffbfc1a21e9dd711b32f8e2b3ea3.zip | |
(byte-compile-eval): Adjust to changes in `load-history`
The `function-history` patch introduced a regression which caused
spurious compiler warnings. Fix it.
The new code also fixes a bug in the old code, thus causing some
new non-spurious warnings. Fix them as well.
* lisp/emacs-lisp/bytecomp.el (byte-compile-eval): Adjust to changes in
`load-history`.
* lisp/gnus/gnus-group.el (nnrss-discover-feed)
(nnrss-save-server-data): Use `declare-function`.
* lisp/cedet/semantic/wisent/comp.el (wisent-defcontext)
(wisent-with-context):
* lisp/emacs-lisp/comp.el (comp-op-case): Silence compiler warning.
Diffstat (limited to 'lisp/cedet/semantic')
| -rw-r--r-- | lisp/cedet/semantic/wisent/comp.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/cedet/semantic/wisent/comp.el b/lisp/cedet/semantic/wisent/comp.el index f842b3c364b..ba67d250604 100644 --- a/lisp/cedet/semantic/wisent/comp.el +++ b/lisp/cedet/semantic/wisent/comp.el @@ -65,6 +65,7 @@ (defmacro wisent-defcontext (name &rest vars) "Define a context NAME that will bind variables VARS." (declare (indent 1)) + (declare-function wisent-context-name nil (name)) (let* ((context (wisent-context-name name)) (declarations (mapcar (lambda (v) (list 'defvar v)) vars))) `(progn @@ -75,6 +76,7 @@ (defmacro wisent-with-context (name &rest body) "Bind variables in context NAME then eval BODY." (declare (indent 1)) + (declare-function wisent-context-bindings nil (name)) `(dlet ,(wisent-context-bindings name) ,@body)) |