From c5b654b3f105b8be7e7bcf3ad3f424cf38afd8f5 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Sun, 5 Sep 2021 16:52:11 +0200 Subject: [PATCH] Autoload cl-struct-slot-info * lisp/emacs-lisp/cl-macs.el (cl-struct-slot-info): Autoload (bug#50301). * test/lisp/emacs-lisp/memory-report-tests.el: Don't require cl-macs. --- lisp/emacs-lisp/cl-macs.el | 1 + test/lisp/emacs-lisp/memory-report-tests.el | 1 - 2 files changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index d878af4d84a..4ea583d28f1 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el @@ -3288,6 +3288,7 @@ STRUCT-TYPE is a symbol naming a struct type. Return `record', (push (cdr x) res)) (nreverse res))) +;;;###autoload (defun cl-struct-slot-info (struct-type) "Return a list of slot names of struct STRUCT-TYPE. Each entry is a list (SLOT-NAME . OPTS), where SLOT-NAME is a diff --git a/test/lisp/emacs-lisp/memory-report-tests.el b/test/lisp/emacs-lisp/memory-report-tests.el index 1e0ffdc86a0..e352dd165f3 100644 --- a/test/lisp/emacs-lisp/memory-report-tests.el +++ b/test/lisp/emacs-lisp/memory-report-tests.el @@ -19,7 +19,6 @@ (require 'ert) (require 'memory-report) -(require 'cl-macs) (defun setup-memory-report-tests () ;; Set the sizes on things based on a 64-bit architecture. (We're