[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#54079: 29.0.50; Method dispatching eratically fails
From: |
Michael Heerdegen |
Subject: |
bug#54079: 29.0.50; Method dispatching eratically fails |
Date: |
Wed, 23 Feb 2022 01:27:15 +0100 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/29.0.50 (gnu/linux) |
Michael Heerdegen <michael_heerdegen@web.de> writes:
> So I'm not sure if symbols with positions are related.
Dunno if and how this is related: I found out that when I byte-compile
cl-generic.el in current Emacs session, trying to M-x gnus suddenly
gives me:
| Debugger entered--Lisp error: (invalid-function #<symbol let at 15662>)
| (#<symbol let at 15662> ((#<symbol plain-args at 15668> nil) (#<symbol
specializers at 15694> nil) (#<symbol mandatory at 15723> #<symbol t at
15733>)) (let ((--dolist-tail-- #<symbol args at 15756>)) (while
--dolist-tail-- (let ((#<symbol arg at 15752> (car --dolist-tail--))) (setq
#<symbol plain-args at 16815> (cons (cond (... ...) (... ...) (t ...)) #<symbol
plain-args at 16815>)) (setq --dolist-tail-- (cdr --dolist-tail--)))))
(#<symbol cons at 16835> (#<symbol nreverse at 16841> #<symbol specializers at
16850>) (#<symbol nreverse at 16877> (#<symbol delq at 16887> nil #<symbol
plain-args at 16896>))))
| (cl--generic-split-args (engine artlist criteria))
| (cl-generic-define gnus-search-grep-search (engine artlist criteria) nil)
| (byte-code
"\300\301\302\301\303\304#\305#\210\306\301\304\307\304\310%\210\300\311\312\313!\"\210\300\314\315\313!\"\210\300\316\314\"\210\317\316\320\321#\210\322\313\323\314#\324\313..."
[defalias gnus-search-grep-search cl-generic-define (engine artlist criteria)
nil "Run a secondary grep search over a list of prelimi..."
cl-generic-define-method ((engine gnus-search-grep) artlist criteria)
#f(compiled-function (engine artlist criteria) #<bytecode -0x1d311dd1a946ba32>)
gnus-search-process-p eieio-make-class-predicate gnus-search-process
gnus-search-process--eieio-childp eieio-make-child-predicate
gnus-search-process-child-p make-obsolete "use (cl-typep ...
'gnus-search-process) instead" "25.1" define-symbol-prop cl-deftype-satisfies
eieio-defclass-internal ((proc-buffer :initarg :proc-buffer :type buffer
:documentation "A temporary buffer this engine uses for its\n se..."))
(:abstract t :documentation "A mixin class for engines that do their searching
...")] 6)
| (require gnus-search)
| (eval-buffer #<buffer *load*> nil "/home/micha/gnu-emacs/.gnus.el" nil t)
; Reading at buffer position 231
| (load-with-code-conversion "/home/micha/gnu-emacs/.gnus.el"
"/home/micha/gnu-emacs/.gnus.el" nil t)
| (load "/home/micha/gnu-emacs/.gnus.el" nil t)
| (gnus-read-init-file)
| (gnus-1 nil nil nil)
| (gnus nil)
Never saw this until now. No problem when I do not compile
cl-generic.el in the session.
Michael.