--- Begin Message ---
Subject: |
28.0.50; [feature/native-comp] (d3a399dd) native-comp bootstrap failure |
Date: |
Sun, 14 Feb 2021 00:05:25 -0500 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/28.0.50 (gnu/linux) |
I decided to attempt building the native-comp feature branch, since it
seems like it may make it to mainline fairly soon. When bootstrapping
with
make NATIVE_FULL_AOT=1 -j 32 bootstrap
I get an error compiling gnus/gnus-icalendar.el. I've put the log
below. I've updated the emacs information from my running emacs below
to match the version of the repository from which I built.
In GNU Emacs 28.0.50 (build 1, x86_64-pc-linux-gnu, X toolkit, cairo version
1.16.0)
of 2021-02-13 built on miko
Repository revision: d3a399dd299bf7e811cf42950d5f8ac67f063b36
Repository branch: native-comp
Windowing system distributor 'The X.Org Foundation', version 11.0.12010000
System Description: Debian GNU/Linux bullseye/sid
Configured using:
'configure --without-toolkit-scroll-bars --with-x-toolkit=lucid
--with-nativecomp'
Debugger entered--Lisp error: (error "Lisp nesting exceeds
‘max-lisp-eval-depth’")
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) (args-and-body
cl--nmp))
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) ((args-and-body
cl--nmp) (var . cl--nmp) (binding cl-next-method-p cl--nmp) (--dolist-tail--)
(newenv (cl-next-method-p closure #2 (&rest args) (if (eq (car args)
cl--labels-magic) (list cl--labels-magic var) (cons 'funcall (cons var args))))
(cl-call-next-method closure ((args-and-body cl--cnm) (var . cl--cnm) (binding
cl-call-next-method cl--cnm) . #5) (&rest args) (if (eq (car args)
cl--labels-magic) (list cl--labels-magic var) (cons 'funcall (cons var args))))
(cl-generic-current-method-specializers . #f(compiled-function () #<bytecode
0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))) (binds) (body
(cl-labels ((format-header (x) (format "%-12s%s" (propertize ... ... ...) (cadr
x)))) (with-slots (organizer summary description location recur uid method rsvp
participation-type) event (let ((headers ...)) (when (and ... rsvp) (setq
headers ...)) (concat (mapconcat ... headers "\n") "\n\n" description)))))
(bindings (cl-call-next-method cl--cnm) (cl-next-method-p cl--nmp))
cl--loop-symbol-macs cl--loop-steps cl--loop-result-var
cl--loop-result-explicit cl--loop-result cl--loop-name
cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t))
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) (cl-next-method-p
closure ((args-and-body cl--nmp) (var . cl--nmp) (binding cl-next-method-p
cl--nmp) (--dolist-tail--) (newenv #2 (cl-call-next-method closure
((args-and-body cl--cnm) (var . cl--cnm) (binding cl-call-next-method cl--cnm)
. #8) (&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic
var) (cons 'funcall (cons var args)))) (cl-generic-current-method-specializers
. #f(compiled-function () #<bytecode 0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))) (binds) (body
(cl-labels ((format-header (x) (format "%-12s%s" ... ...))) (with-slots
(organizer summary description location recur uid method rsvp
participation-type) event (let (...) (when ... ...) (concat ... "\n\n"
description))))) (bindings (cl-call-next-method cl--cnm) (cl-next-method-p
cl--nmp)) cl--loop-symbol-macs cl--loop-steps cl--loop-result-var
cl--loop-result-explicit cl--loop-result cl--loop-name
cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t)
(&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic var)
(cons 'funcall (cons var args)))))
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) (newenv
(cl-next-method-p closure ((args-and-body cl--nmp) (var . cl--nmp) (binding
cl-next-method-p cl--nmp) (--dolist-tail--) #2 (binds) (body (cl-labels
((format-header ... ...)) (with-slots (organizer summary description location
recur uid method rsvp participation-type) event (let ... ... ...)))) (bindings
(cl-call-next-method cl--cnm) (cl-next-method-p cl--nmp)) cl--loop-symbol-macs
cl--loop-steps cl--loop-result-var cl--loop-result-explicit cl--loop-result
cl--loop-name cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t)
(&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic var)
(cons 'funcall (cons var args)))) (cl-call-next-method closure ((args-and-body
cl--cnm) (var . cl--cnm) (binding cl-call-next-method cl--cnm)
(--dolist-tail--) #2 (binds) (body (cl-labels ((format-header ... ...))
(with-slots (organizer summary description location recur uid method rsvp
participation-type) event (let ... ... ...)))) (bindings (cl-call-next-method
cl--cnm) (cl-next-method-p cl--nmp)) cl--loop-symbol-macs cl--loop-steps
cl--loop-result-var cl--loop-result-explicit cl--loop-result cl--loop-name
cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t)
(&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic var)
(cons 'funcall (cons var args)))) (cl-generic-current-method-specializers .
#f(compiled-function () #<bytecode 0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))))
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) ((args-and-body
cl--nmp) (var . cl--nmp) (binding cl-next-method-p cl--nmp) (--dolist-tail--)
(newenv (cl-next-method-p closure #2 (&rest args) (if (eq (car args)
cl--labels-magic) (list cl--labels-magic var) (cons 'funcall (cons var args))))
(cl-call-next-method closure ((args-and-body cl--cnm) (var . cl--cnm) (binding
cl-call-next-method cl--cnm) . #5) (&rest args) (if (eq (car args)
cl--labels-magic) (list cl--labels-magic var) (cons 'funcall (cons var args))))
(cl-generic-current-method-specializers . #f(compiled-function () #<bytecode
0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))) (binds) (body
(cl-labels ((format-header (x) (format "%-12s%s" (propertize ... ... ...) (cadr
x)))) (with-slots (organizer summary description location recur uid method rsvp
participation-type) event (let ((headers ...)) (when (and ... rsvp) (setq
headers ...)) (concat (mapconcat ... headers "\n") "\n\n" description)))))
(bindings (cl-call-next-method cl--cnm) (cl-next-method-p cl--nmp))
cl--loop-symbol-macs cl--loop-steps cl--loop-result-var
cl--loop-result-explicit cl--loop-result cl--loop-name
cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t))
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) (cl-next-method-p
closure ((args-and-body cl--nmp) (var . cl--nmp) (binding cl-next-method-p
cl--nmp) (--dolist-tail--) (newenv #2 (cl-call-next-method closure
((args-and-body cl--cnm) (var . cl--cnm) (binding cl-call-next-method cl--cnm)
. #8) (&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic
var) (cons 'funcall (cons var args)))) (cl-generic-current-method-specializers
. #f(compiled-function () #<bytecode 0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))) (binds) (body
(cl-labels ((format-header (x) (format "%-12s%s" ... ...))) (with-slots
(organizer summary description location recur uid method rsvp
participation-type) event (let (...) (when ... ...) (concat ... "\n\n"
description))))) (bindings (cl-call-next-method cl--cnm) (cl-next-method-p
cl--nmp)) cl--loop-symbol-macs cl--loop-steps cl--loop-result-var
cl--loop-result-explicit cl--loop-result cl--loop-name
cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t)
(&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic var)
(cons 'funcall (cons var args)))))
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) (newenv
(cl-next-method-p closure ((args-and-body cl--nmp) (var . cl--nmp) (binding
cl-next-method-p cl--nmp) (--dolist-tail--) #2 (binds) (body (cl-labels
((format-header ... ...)) (with-slots (organizer summary description location
recur uid method rsvp participation-type) event (let ... ... ...)))) (bindings
(cl-call-next-method cl--cnm) (cl-next-method-p cl--nmp)) cl--loop-symbol-macs
cl--loop-steps cl--loop-result-var cl--loop-result-explicit cl--loop-result
cl--loop-name cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t)
(&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic var)
(cons 'funcall (cons var args)))) (cl-call-next-method closure ((args-and-body
cl--cnm) (var . cl--cnm) (binding cl-call-next-method cl--cnm)
(--dolist-tail--) #2 (binds) (body (cl-labels ((format-header ... ...))
(with-slots (organizer summary description location recur uid method rsvp
participation-type) event (let ... ... ...)))) (bindings (cl-call-next-method
cl--cnm) (cl-next-method-p cl--nmp)) cl--loop-symbol-macs cl--loop-steps
cl--loop-result-var cl--loop-result-explicit cl--loop-result cl--loop-name
cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t)
(&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic var)
(cons 'funcall (cons var args)))) (cl-generic-current-method-specializers .
#f(compiled-function () #<bytecode 0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))))
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) ((args-and-body
cl--nmp) (var . cl--nmp) (binding cl-next-method-p cl--nmp) (--dolist-tail--)
(newenv (cl-next-method-p closure #2 (&rest args) (if (eq (car args)
cl--labels-magic) (list cl--labels-magic var) (cons 'funcall (cons var args))))
(cl-call-next-method closure ((args-and-body cl--cnm) (var . cl--cnm) (binding
cl-call-next-method cl--cnm) . #5) (&rest args) (if (eq (car args)
cl--labels-magic) (list cl--labels-magic var) (cons 'funcall (cons var args))))
(cl-generic-current-method-specializers . #f(compiled-function () #<bytecode
0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))) (binds) (body
(cl-labels ((format-header (x) (format "%-12s%s" (propertize ... ... ...) (cadr
x)))) (with-slots (organizer summary description location recur uid method rsvp
participation-type) event (let ((headers ...)) (when (and ... rsvp) (setq
headers ...)) (concat (mapconcat ... headers "\n") "\n\n" description)))))
(bindings (cl-call-next-method cl--cnm) (cl-next-method-p cl--nmp))
cl--loop-symbol-macs cl--loop-steps cl--loop-result-var
cl--loop-result-explicit cl--loop-result cl--loop-name
cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t))
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) (cl-next-method-p
closure ((args-and-body cl--nmp) (var . cl--nmp) (binding cl-next-method-p
cl--nmp) (--dolist-tail--) (newenv #2 (cl-call-next-method closure
((args-and-body cl--cnm) (var . cl--cnm) (binding cl-call-next-method cl--cnm)
. #8) (&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic
var) (cons 'funcall (cons var args)))) (cl-generic-current-method-specializers
. #f(compiled-function () #<bytecode 0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))) (binds) (body
(cl-labels ((format-header (x) (format "%-12s%s" ... ...))) (with-slots
(organizer summary description location recur uid method rsvp
participation-type) event (let (...) (when ... ...) (concat ... "\n\n"
description))))) (bindings (cl-call-next-method cl--cnm) (cl-next-method-p
cl--nmp)) cl--loop-symbol-macs cl--loop-steps cl--loop-result-var
cl--loop-result-explicit cl--loop-result cl--loop-name
cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t)
(&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic var)
(cons 'funcall (cons var args)))))
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) (newenv
(cl-next-method-p closure ((args-and-body cl--nmp) (var . cl--nmp) (binding
cl-next-method-p cl--nmp) (--dolist-tail--) #2 (binds) (body (cl-labels
((format-header ... ...)) (with-slots (organizer summary description location
recur uid method rsvp participation-type) event (let ... ... ...)))) (bindings
(cl-call-next-method cl--cnm) (cl-next-method-p cl--nmp)) cl--loop-symbol-macs
cl--loop-steps cl--loop-result-var cl--loop-result-explicit cl--loop-result
cl--loop-name cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t)
(&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic var)
(cons 'funcall (cons var args)))) (cl-call-next-method closure ((args-and-body
cl--cnm) (var . cl--cnm) (binding cl-call-next-method cl--cnm)
(--dolist-tail--) #2 (binds) (body (cl-labels ((format-header ... ...))
(with-slots (organizer summary description location recur uid method rsvp
participation-type) event (let ... ... ...)))) (bindings (cl-call-next-method
cl--cnm) (cl-next-method-p cl--nmp)) cl--loop-symbol-macs cl--loop-steps
cl--loop-result-var cl--loop-result-explicit cl--loop-result cl--loop-name
cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t)
(&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic var)
(cons 'funcall (cons var args)))) (cl-generic-current-method-specializers .
#f(compiled-function () #<bytecode 0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))))
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) ((args-and-body
cl--nmp) (var . cl--nmp) (binding cl-next-method-p cl--nmp) (--dolist-tail--)
(newenv (cl-next-method-p closure #2 (&rest args) (if (eq (car args)
cl--labels-magic) (list cl--labels-magic var) (cons 'funcall (cons var args))))
(cl-call-next-method closure ((args-and-body cl--cnm) (var . cl--cnm) (binding
cl-call-next-method cl--cnm) . #5) (&rest args) (if (eq (car args)
cl--labels-magic) (list cl--labels-magic var) (cons 'funcall (cons var args))))
(cl-generic-current-method-specializers . #f(compiled-function () #<bytecode
0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))) (binds) (body
(cl-labels ((format-header (x) (format "%-12s%s" (propertize ... ... ...) (cadr
x)))) (with-slots (organizer summary description location recur uid method rsvp
participation-type) event (let ((headers ...)) (when (and ... rsvp) (setq
headers ...)) (concat (mapconcat ... headers "\n") "\n\n" description)))))
(bindings (cl-call-next-method cl--cnm) (cl-next-method-p cl--nmp))
cl--loop-symbol-macs cl--loop-steps cl--loop-result-var
cl--loop-result-explicit cl--loop-result cl--loop-name
cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t))
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) (cl-next-method-p
closure ((args-and-body cl--nmp) (var . cl--nmp) (binding cl-next-method-p
cl--nmp) (--dolist-tail--) (newenv #2 (cl-call-next-method closure
((args-and-body cl--cnm) (var . cl--cnm) (binding cl-call-next-method cl--cnm)
. #8) (&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic
var) (cons 'funcall (cons var args)))) (cl-generic-current-method-specializers
. #f(compiled-function () #<bytecode 0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))) (binds) (body
(cl-labels ((format-header (x) (format "%-12s%s" ... ...))) (with-slots
(organizer summary description location recur uid method rsvp
participation-type) event (let (...) (when ... ...) (concat ... "\n\n"
description))))) (bindings (cl-call-next-method cl--cnm) (cl-next-method-p
cl--nmp)) cl--loop-symbol-macs cl--loop-steps cl--loop-result-var
cl--loop-result-explicit cl--loop-result cl--loop-name
cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t)
(&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic var)
(cons 'funcall (cons var args)))))
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) (newenv
(cl-next-method-p closure ((args-and-body cl--nmp) (var . cl--nmp) (binding
cl-next-method-p cl--nmp) (--dolist-tail--) #2 (binds) (body (cl-labels
((format-header ... ...)) (with-slots (organizer summary description location
recur uid method rsvp participation-type) event (let ... ... ...)))) (bindings
(cl-call-next-method cl--cnm) (cl-next-method-p cl--nmp)) cl--loop-symbol-macs
cl--loop-steps cl--loop-result-var cl--loop-result-explicit cl--loop-result
cl--loop-name cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t)
(&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic var)
(cons 'funcall (cons var args)))) (cl-call-next-method closure ((args-and-body
cl--cnm) (var . cl--cnm) (binding cl-call-next-method cl--cnm)
(--dolist-tail--) #2 (binds) (body (cl-labels ((format-header ... ...))
(with-slots (organizer summary description location recur uid method rsvp
participation-type) event (let ... ... ...)))) (bindings (cl-call-next-method
cl--cnm) (cl-next-method-p cl--nmp)) cl--loop-symbol-macs cl--loop-steps
cl--loop-result-var cl--loop-result-explicit cl--loop-result cl--loop-name
cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t)
(&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic var)
(cons 'funcall (cons var args)))) (cl-generic-current-method-specializers .
#f(compiled-function () #<bytecode 0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))))
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) ((args-and-body
cl--nmp) (var . cl--nmp) (binding cl-next-method-p cl--nmp) (--dolist-tail--)
(newenv (cl-next-method-p closure #2 (&rest args) (if (eq (car args)
cl--labels-magic) (list cl--labels-magic var) (cons 'funcall (cons var args))))
(cl-call-next-method closure ((args-and-body cl--cnm) (var . cl--cnm) (binding
cl-call-next-method cl--cnm) . #5) (&rest args) (if (eq (car args)
cl--labels-magic) (list cl--labels-magic var) (cons 'funcall (cons var args))))
(cl-generic-current-method-specializers . #f(compiled-function () #<bytecode
0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))) (binds) (body
(cl-labels ((format-header (x) (format "%-12s%s" (propertize ... ... ...) (cadr
x)))) (with-slots (organizer summary description location recur uid method rsvp
participation-type) event (let ((headers ...)) (when (and ... rsvp) (setq
headers ...)) (concat (mapconcat ... headers "\n") "\n\n" description)))))
(bindings (cl-call-next-method cl--cnm) (cl-next-method-p cl--nmp))
cl--loop-symbol-macs cl--loop-steps cl--loop-result-var
cl--loop-result-explicit cl--loop-result cl--loop-name
cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t))
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) (cl-next-method-p
closure ((args-and-body cl--nmp) (var . cl--nmp) (binding cl-next-method-p
cl--nmp) (--dolist-tail--) (newenv #2 (cl-call-next-method closure
((args-and-body cl--cnm) (var . cl--cnm) (binding cl-call-next-method cl--cnm)
. #8) (&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic
var) (cons 'funcall (cons var args)))) (cl-generic-current-method-specializers
. #f(compiled-function () #<bytecode 0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))) (binds) (body
(cl-labels ((format-header (x) (format "%-12s%s" ... ...))) (with-slots
(organizer summary description location recur uid method rsvp
participation-type) event (let (...) (when ... ...) (concat ... "\n\n"
description))))) (bindings (cl-call-next-method cl--cnm) (cl-next-method-p
cl--nmp)) cl--loop-symbol-macs cl--loop-steps cl--loop-result-var
cl--loop-result-explicit cl--loop-result cl--loop-name
cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t)
(&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic var)
(cons 'funcall (cons var args)))))
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) (newenv
(cl-next-method-p closure ((args-and-body cl--nmp) (var . cl--nmp) (binding
cl-next-method-p cl--nmp) (--dolist-tail--) #2 (binds) (body (cl-labels
((format-header ... ...)) (with-slots (organizer summary description location
recur uid method rsvp participation-type) event (let ... ... ...)))) (bindings
(cl-call-next-method cl--cnm) (cl-next-method-p cl--nmp)) cl--loop-symbol-macs
cl--loop-steps cl--loop-result-var cl--loop-result-explicit cl--loop-result
cl--loop-name cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t)
(&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic var)
(cons 'funcall (cons var args)))) (cl-call-next-method closure ((args-and-body
cl--cnm) (var . cl--cnm) (binding cl-call-next-method cl--cnm)
(--dolist-tail--) #2 (binds) (body (cl-labels ((format-header ... ...))
(with-slots (organizer summary description location recur uid method rsvp
participation-type) event (let ... ... ...)))) (bindings (cl-call-next-method
cl--cnm) (cl-next-method-p cl--nmp)) cl--loop-symbol-macs cl--loop-steps
cl--loop-result-var cl--loop-result-explicit cl--loop-result cl--loop-name
cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t)
(&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic var)
(cons 'funcall (cons var args)))) (cl-generic-current-method-specializers .
#f(compiled-function () #<bytecode 0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))))
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) ((args-and-body
cl--nmp) (var . cl--nmp) (binding cl-next-method-p cl--nmp) (--dolist-tail--)
(newenv (cl-next-method-p closure #2 (&rest args) (if (eq (car args)
cl--labels-magic) (list cl--labels-magic var) (cons 'funcall (cons var args))))
(cl-call-next-method closure ((args-and-body cl--cnm) (var . cl--cnm) (binding
cl-call-next-method cl--cnm) . #5) (&rest args) (if (eq (car args)
cl--labels-magic) (list cl--labels-magic var) (cons 'funcall (cons var args))))
(cl-generic-current-method-specializers . #f(compiled-function () #<bytecode
0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))) (binds) (body
(cl-labels ((format-header (x) (format "%-12s%s" (propertize ... ... ...) (cadr
x)))) (with-slots (organizer summary description location recur uid method rsvp
participation-type) event (let ((headers ...)) (when (and ... rsvp) (setq
headers ...)) (concat (mapconcat ... headers "\n") "\n\n" description)))))
(bindings (cl-call-next-method cl--cnm) (cl-next-method-p cl--nmp))
cl--loop-symbol-macs cl--loop-steps cl--loop-result-var
cl--loop-result-explicit cl--loop-result cl--loop-name
cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t))
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) (cl-next-method-p
closure ((args-and-body cl--nmp) (var . cl--nmp) (binding cl-next-method-p
cl--nmp) (--dolist-tail--) (newenv #2 (cl-call-next-method closure
((args-and-body cl--cnm) (var . cl--cnm) (binding cl-call-next-method cl--cnm)
. #8) (&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic
var) (cons 'funcall (cons var args)))) (cl-generic-current-method-specializers
. #f(compiled-function () #<bytecode 0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))) (binds) (body
(cl-labels ((format-header (x) (format "%-12s%s" ... ...))) (with-slots
(organizer summary description location recur uid method rsvp
participation-type) event (let (...) (when ... ...) (concat ... "\n\n"
description))))) (bindings (cl-call-next-method cl--cnm) (cl-next-method-p
cl--nmp)) cl--loop-symbol-macs cl--loop-steps cl--loop-result-var
cl--loop-result-explicit cl--loop-result cl--loop-name
cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t)
(&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic var)
(cons 'funcall (cons var args)))))
macroexp--fgrep(((--cl-format-header-- #'(lambda (x) (format "%-12s%s"
(propertize (concat ... ":") 'face 'bold) (car (cdr x)))))) (newenv
(cl-next-method-p closure ((args-and-body cl--nmp) (var . cl--nmp) (binding
cl-next-method-p cl--nmp) (--dolist-tail--) #2 (binds) (body (cl-labels
((format-header ... ...)) (with-slots (organizer summary description location
recur uid method rsvp participation-type) event (let ... ... ...)))) (bindings
(cl-call-next-method cl--cnm) (cl-next-method-p cl--nmp)) cl--loop-symbol-macs
cl--loop-steps cl--loop-result-var cl--loop-result-explicit cl--loop-result
cl--loop-name cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t)
(&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic var)
(cons 'funcall (cons var args)))) (cl-call-next-method closure ((args-and-body
cl--cnm) (var . cl--cnm) (binding cl-call-next-method cl--cnm)
(--dolist-tail--) #2 (binds) (body (cl-labels ((format-header ... ...))
(with-slots (organizer summary description location recur uid method rsvp
participation-type) event (let ... ... ...)))) (bindings (cl-call-next-method
cl--cnm) (cl-next-method-p cl--nmp)) cl--loop-symbol-macs cl--loop-steps
cl--loop-result-var cl--loop-result-explicit cl--loop-result cl--loop-name
cl--loop-iterator-function cl--loop-initially cl--loop-first-flag
cl--loop-finish-flag cl--loop-finally cl--loop-conditions cl--loop-body
cl--loop-bindings cl--loop-accum-vars cl--loop-accum-var cl--loop-args
cl--bind-forms cl--bind-lets cl--bind-enquote cl--bind-defs cl--bind-block t)
(&rest args) (if (eq (car args) cl--labels-magic) (list cl--labels-magic var)
(cons 'funcall (cons var args)))) (cl-generic-current-method-specializers .
#f(compiled-function () #<bytecode 0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))))
...
macroexpand-all((cl-flet ((cl-call-next-method cl--cnm) (cl-next-method-p
cl--nmp)) (cl-labels ((format-header (x) (format "%-12s%s" (propertize (concat
... ":") 'face 'bold) (cadr x)))) (with-slots (organizer summary description
location recur uid method rsvp participation-type) event (let ((headers `...))
(when (and (not ...) rsvp) (setq headers (append headers ...))) (concat
(mapconcat #'format-header headers "\n") "\n\n" description)))))
((cl-generic-current-method-specializers . #f(compiled-function () #<bytecode
0x1f4000153e91>)) (declare-function .
byte-compile-macroexpand-declare-function) (eval-when-compile .
#f(compiled-function (&rest body) #<bytecode 0x5e4fe9ce2dc9015>))
(eval-and-compile . #f(compiled-function (&rest body) #<bytecode
0x1385801da54a6c7b>)) (with-suppressed-warnings . #f(compiled-function
(warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))))
cl--generic-lambda(((event gnus-icalendar-event) &optional reply-status)
("Format an overview of EVENT details." (cl-labels ((format-header (x) (format
"%-12s%s" (propertize (concat ... ":") 'face 'bold) (cadr x)))) (with-slots
(organizer summary description location recur uid method rsvp
participation-type) event (let ((headers `...)) (when (and (not ...) rsvp)
(setq headers (append headers ...))) (concat (mapconcat #'format-header headers
"\n") "\n\n" description))))))
#f(compiled-function (arg1 arg2 &rest rest) "Define a new method for generic
function NAME.\nThis it defines an implementation of NAME to use for
invocations\nof specific types of arguments.\n\nARGS is a list of dispatch
arguments (see `cl-defun'), but where\neach variable element is either just a
single variable name VAR,\nor a list on the form (VAR TYPE).\n\nFor
instance:\n\n (cl-defmethod foo (bar (format-string string) &optional zot)\n
(format format-string bar))\n\nThe dispatch arguments have to be among the
mandatory arguments, and\nall methods of NAME have to use the same set of
arguments for dispatch.\nEach dispatch argument and TYPE are specified in ARGS
where the corresponding\nformal argument appears as (VAR TYPE) rather than just
VAR.\n\nThe optional second argument QUALIFIER is a specifier that\nmodifies
how the method is combined with other methods, including:\n :before - Method
will be called before the primary\n :after - Method will be called after
the primary\n :around - Method will be called around everything else\nThe
absence of QUALIFIER means this is a \"primary\" method.\nThe set of acceptable
qualifiers and their meaning is defined\n(and can be extended) by the methods
of `cl-generic-combine-methods'.\n\nARGS can also include so-called context
specializers, introduced by\n`&context' (which should appear right after the
mandatory arguments,\nbefore any &optional or &rest). They have the form (EXPR
TYPE) where\nEXPR is an Elisp expression whose value should match TYPE for
the\nmethod to be applicable.\n\nThe set of acceptable TYPEs (also called
\"specializers\") is defined\n(and can be extended) by the various methods of
`cl-generic-generalizers'." #<bytecode
0xd8ef7e2cfe3ee7b>)(gnus-icalendar-event->gnus-calendar ((event
gnus-icalendar-event) &optional reply-status) "Format an overview of EVENT
details." (cl-labels ((format-header (x) (format "%-12s%s" (propertize (concat
(car x) ":") 'face 'bold) (cadr x)))) (with-slots (organizer summary
description location recur uid method rsvp participation-type) event (let
((headers `(... ... ... ... ... ...))) (when (and (not
(gnus-icalendar-event-reply-p event)) rsvp) (setq headers (append headers
`...))) (concat (mapconcat #'format-header headers "\n") "\n\n" description)))))
macroexpand((cl-defmethod gnus-icalendar-event->gnus-calendar ((event
gnus-icalendar-event) &optional reply-status) "Format an overview of EVENT
details." (cl-labels ((format-header (x) (format "%-12s%s" (propertize (concat
... ":") 'face 'bold) (cadr x)))) (with-slots (organizer summary description
location recur uid method rsvp participation-type) event (let ((headers `...))
(when (and (not ...) rsvp) (setq headers (append headers ...))) (concat
(mapconcat #'format-header headers "\n") "\n\n" description)))))
((declare-function . byte-compile-macroexpand-declare-function)
(eval-when-compile . #f(compiled-function (&rest body) #<bytecode
0x5e4fe9ce2dc9015>)) (eval-and-compile . #f(compiled-function (&rest body)
#<bytecode 0x1385801da54a6c7b>)) (with-suppressed-warnings .
#f(compiled-function (warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))))
macroexp-macroexpand((cl-defmethod gnus-icalendar-event->gnus-calendar
((event gnus-icalendar-event) &optional reply-status) "Format an overview of
EVENT details." (cl-labels ((format-header (x) (format "%-12s%s" (propertize
(concat ... ":") 'face 'bold) (cadr x)))) (with-slots (organizer summary
description location recur uid method rsvp participation-type) event (let
((headers `...)) (when (and (not ...) rsvp) (setq headers (append headers
...))) (concat (mapconcat #'format-header headers "\n") "\n\n" description)))))
((declare-function . byte-compile-macroexpand-declare-function)
(eval-when-compile . #f(compiled-function (&rest body) #<bytecode
0x5e4fe9ce2dc9015>)) (eval-and-compile . #f(compiled-function (&rest body)
#<bytecode 0x1385801da54a6c7b>)) (with-suppressed-warnings .
#f(compiled-function (warnings &rest body) #<bytecode -0xfaa1404d6c9c8f7>))))
byte-compile-recurse-toplevel((cl-defmethod
gnus-icalendar-event->gnus-calendar ((event gnus-icalendar-event) &optional
reply-status) "Format an overview of EVENT details." (cl-labels ((format-header
(x) (format "%-12s%s" (propertize (concat ... ":") 'face 'bold) (cadr x))))
(with-slots (organizer summary description location recur uid method rsvp
participation-type) event (let ((headers `...)) (when (and (not ...) rsvp)
(setq headers (append headers ...))) (concat (mapconcat #'format-header headers
"\n") "\n\n" description))))) #<subr
F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_45>)
byte-compile-toplevel-file-form((cl-defmethod
gnus-icalendar-event->gnus-calendar ((event gnus-icalendar-event) &optional
reply-status) "Format an overview of EVENT details." (cl-labels ((format-header
(x) (format "%-12s%s" (propertize (concat ... ":") 'face 'bold) (cadr x))))
(with-slots (organizer summary description location recur uid method rsvp
participation-type) event (let ((headers `...)) (when (and (not ...) rsvp)
(setq headers (append headers ...))) (concat (mapconcat #'format-header headers
"\n") "\n\n" description))))))
#<subr F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_43>(#<buffer
*Compiler Input*>)
byte-compile-from-buffer(#<buffer *Compiler Input*>)
byte-compile-file("gnus/gnus-icalendar.el")
#f(compiled-function (filename) "Byte-compile FILENAME spilling data from the
byte compiler." #<bytecode 0x4256aac1328e719>)("gnus/gnus-icalendar.el")
apply(#f(compiled-function (filename) "Byte-compile FILENAME spilling data
from the byte compiler." #<bytecode 0x4256aac1328e719>)
"gnus/gnus-icalendar.el" nil)
comp-spill-lap-function("gnus/gnus-icalendar.el")
comp-spill-lap("gnus/gnus-icalendar.el")
comp--native-compile("gnus/gnus-icalendar.el")
batch-native-compile()
batch-byte-native-compile-for-bootstrap()
command-line-1(("--eval" "(setq load-prefer-newer t)" "-l" "comp" "-f"
"batch-byte-n ELC+ELN mail/mail-utils.elc
ative-compile-for-bootstrap" "gnus/gnus-icalendar.el"))
command-line()
normal-top-level()
make[3]: *** [Makefile:319: gnus/gnus-icalendar.elc] Error 255
make[3]: *** Waiting for unfinished jobs....
make[3]: Leaving directory '/home/md5i/src/emacs/native-comp/lisp'
make[2]: *** [Makefile:353: compile-main] Error 2
make[2]: Leaving directory '/home/md5i/src/emacs/native-comp/lisp'
make[1]: *** [Makefile:421: lisp] Error 2
make[1]: Leaving directory '/home/md5i/src/emacs/native-comp'
make: *** [Makefile:1148: bootstrap] Error 2
--
Michael Welsh Duggan
(md5i@md5i.com)
--- End Message ---
--- Begin Message ---
Subject: |
Re: bug#46502: 28.0.50; [feature/native-comp] (d3a399dd) native-comp bootstrap failure |
Date: |
Thu, 18 Feb 2021 15:12:37 +0000 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/28.0.50 (gnu/linux) |
Michael Welsh Duggan <mwd@md5i.com> writes:
[...]
>> Hi Michael,
>>
>> just tried compiling the current branch (f92bb788a0) following your
>> configuration with no issues. Could you retry on the current head maybe
>> starting from a "git clean -xfd" to be on the safe side?
>
> I do not encounter the problem compiling from the current branch head
> (f92bb788a0). Thank you.
Nice, closing.
Thanks for reporting.
Andrea
--- End Message ---