diff options
author | Stefan Kangas <stefan@marxist.se> | 2020-09-22 00:16:22 +0200 |
---|---|---|
committer | Stefan Kangas <stefan@marxist.se> | 2020-10-20 18:48:27 +0200 |
commit | 4a575eb18cca3eed5019f2d2d2abeea1f0c07005 (patch) | |
tree | 35e8c571c372be83912db166607b4fb5894b6a92 /test/lisp/emacs-lisp | |
parent | 1841b13282473b0ed8c591974e89bd781026180d (diff) | |
download | emacs-4a575eb18cca3eed5019f2d2d2abeea1f0c07005.tar.gz emacs-4a575eb18cca3eed5019f2d2d2abeea1f0c07005.tar.bz2 emacs-4a575eb18cca3eed5019f2d2d2abeea1f0c07005.zip |
byte-compile-file: Make optional LOAD argument obsolete
* lisp/emacs-lisp/bytecomp.el (byte-compile-file): Declare optional
LOAD argument obsolete. Adjust callers. (Bug#38072)
(byte-recompile-file): Declare optional LOAD argument obsolete.
* doc/lispref/compile.texi (Compilation Functions): Update
documentation to reflect above obsoletion.
* etc/NEWS: Announce above obsoletion.
Diffstat (limited to 'test/lisp/emacs-lisp')
-rw-r--r-- | test/lisp/emacs-lisp/bytecomp-tests.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/test/lisp/emacs-lisp/bytecomp-tests.el b/test/lisp/emacs-lisp/bytecomp-tests.el index a9dcf152617..ea5aacd7912 100644 --- a/test/lisp/emacs-lisp/bytecomp-tests.el +++ b/test/lisp/emacs-lisp/bytecomp-tests.el @@ -444,8 +444,8 @@ Subtests signal errors if something goes wrong." (if compile (let ((byte-compile-dest-file-function (lambda (e) elcfile))) - (byte-compile-file elfile t)) - (load elfile nil 'nomessage))) + (byte-compile-file elfile))) + (load elfile nil 'nomessage)) (when elfile (delete-file elfile)) (when elcfile (delete-file elcfile))))) (put 'test-byte-comp-compile-and-load 'lisp-indent-function 1) @@ -646,7 +646,8 @@ literals (Bug#20852)." (setq bytecomp-tests--foobar (bytecomp-tests--foobar)))) (print form (current-buffer))) (write-region (point-min) (point-max) source nil 'silent) - (byte-compile-file source t) + (byte-compile-file source) + (load source) (should (equal bytecomp-tests--foobar (cons 1 2))))) (ert-deftest bytecomp-tests--test-no-warnings-with-advice () |