From: Ivan Sokolov <ivan-p-sokolov@ya.ru>
To: 55355@debbugs.gnu.org
Subject: bug#55355: TBD: inappropriate inlining, cmacro errors
Date: Wed, 11 May 2022 01:57:17 +0300 [thread overview]
Message-ID: <87h75xnghe.fsf@ya.ru> (raw)
Hi all! I encountered inlining errors, unfortunately I have no idea what
is causing them.
Here is the code:
(cl-defstruct (foo (:constructor foo<-list ((bar _ baz))))
bar
baz)
(foo<-list '(1 2 3)) ; does not work
(funcall #'foo<-list '(1 2 3)) ; does not work
(apply #'foo<-list '(1 2 3) nil) ; does work
Here is the backtrace:
Debugger entered--Lisp error: (wrong-number-of-arguments foo<-list--cmacro 2)
signal(wrong-number-of-arguments (foo<-list--cmacro 2))
(if (= (length --cl-rest--) 3) (pop --cl-rest--) (signal 'wrong-number-of-arguments (list 'foo<-list--cmacro (length --cl-rest--))))
(let* ((--cl-rest-- (if (= (length --cl-rest--) 1) (car --cl-rest--) (signal 'wrong-number-of-arguments (list 'foo<-list--cmacro (length --cl-rest--))))) (bar (if (= (length --cl-rest--) 3) (pop --cl-rest--) (signal 'wrong-number-of-arguments (list 'foo<-list--cmacro (length --cl-rest--))))) (_ (pop --cl-rest--)) (baz (car --cl-rest--))) (cl-block foo<-list--cmacro (cl--defsubst-expand '(bar _ baz) '(cl-block foo<-list (record 'foo bar baz)) nil nil nil bar _ baz)))
foo<-list--cmacro((foo<-list '(1 2 3)) '(1 2 3))
apply(foo<-list--cmacro (foo<-list '(1 2 3)) '(1 2 3))
macroexp--compiler-macro(foo<-list--cmacro (foo<-list '(1 2 3)))
#f(compiled-function (form func) #<bytecode -0x1ed89cfba17e95bb>)(((foo<-list '(1 2 3))) foo<-list)
macroexp--expand-all((foo<-list '(1 2 3)))
macroexp--all-forms((progn (foo<-list '(1 2 3))) 1)
#f(compiled-function (form func) #<bytecode -0x1ed89cfba17e95bb>)(((progn (foo<-list '(1 2 3)))) progn)
macroexp--expand-all((progn (foo<-list '(1 2 3))))
macroexpand-all((progn (foo<-list '(1 2 3))))
elisp--eval-last-sexp(nil)
eval-last-sexp(nil)
funcall-interactively(eval-last-sexp nil)
call-interactively(eval-last-sexp nil nil)
command-execute(eval-last-sexp)
Affected versions:
GNU Emacs 28.0.50 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.24.24, cairo version 1.16.0)
GNU Emacs 28.1 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.24.33, cairo version 1.17.6) of 2022-04-28
next reply other threads:[~2022-05-10 22:57 UTC|newest]
Thread overview: 5+ messages / expand[flat|nested] mbox.gz Atom feed top
2022-05-10 22:57 Ivan Sokolov [this message]
2022-05-11 12:10 ` bug#55355: TBD: inappropriate inlining, cmacro errors Lars Ingebrigtsen
2022-05-11 18:20 ` Ivan Sokolov
2022-05-11 18:42 ` Eli Zaretskii
2022-05-11 20:22 ` Stefan Monnier via Bug reports for GNU Emacs, the Swiss army knife of text editors
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87h75xnghe.fsf@ya.ru \
--to=ivan-p-sokolov@ya.ru \
--cc=55355@debbugs.gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).