Re: master 32ded573cc4: ; Fix bootstrap

[Robert Pluim]

>>>>> On Wed, 13 Sep 2023 12:28:06 -0400 (EDT), Stefan Kangas 
>>>>> <stefankangas@gmail.com> said:

    Stefan> branch: master
    Stefan> commit 32ded573cc4a58546ad60b44f454ba86c80a929d
    Stefan> Author: Stefan Kangas <stefankangas@gmail.com>
    Stefan> Commit: Stefan Kangas <stefankangas@gmail.com>

    Stefan>     ; Fix bootstrap
    
    Stefan>     * lisp/emacs-lisp/cl-macs.el (cl-defstruct): Don't use void 
variable.
    Stefan> ---
    Stefan>  lisp/emacs-lisp/cl-macs.el | 5 ++++-
    Stefan>  1 file changed, 4 insertions(+), 1 deletion(-)

    Stefan> diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el
    Stefan> index ef00f9e4fe4..7c207d372fc 100644
    Stefan> --- a/lisp/emacs-lisp/cl-macs.el
    Stefan> +++ b/lisp/emacs-lisp/cl-macs.el
    Stefan> @@ -3199,7 +3199,10 @@ To see the documentation for a defined 
struct type, use
    Stefan>                             ;; can't have a perfect result here, and
    Stefan>                             ;; choose to avoid the byte-compiler
    Stefan>                             ;; warnings.
    Stefan> -                           (if (>= (length long-docstring) 
byte-compile-docstring-max-column)
    Stefan> +                           (if (>= (length long-docstring)
    Stefan> +                                   (or (and (boundp 
'byte-compile-docstring-max-column)
    Stefan> +                                            
byte-compile-docstring-max-column)
    Stefan> +                                       80))
    Stefan>                                 (concat
    Stefan>                                  (internal--format-docstring-line
    Stefan>                                   "Access slot \"%s\" of CL-X." 
slot)

Is `bound-and-true-p' available there?

Robert
--