emacs-openai / dall-e

Use DALL-E inside Emacs
GNU General Public License v3.0
13 stars 1 forks source link

Error (use-package): dall-e/:catch: Eager macro-expansion failure: (wrong-number-of-arguments (4 . 4) 6) #3

Open SemyonSinchenko opened 5 months ago

SemyonSinchenko commented 5 months ago

Emacs version: 29.1 + Spacemacs openai layer

I'm getting this message on startup of emacs each time or when I'm trying to trigger dall-e directly. Spacemacs uses the latest available version from github.

jcs090218 commented 5 months ago

Can you try M-x toggle-debug-on-error, and paste the backtrace here? 🤔 Thanks!

SemyonSinchenko commented 5 months ago
Debugger entered--Lisp error: (error "Eager macro-expansion failure: (wrong-number-of-ar...")
  error("Eager macro-expansion failure: %S" (wrong-number-of-arguments (4 . 4) 6))
  internal-macroexpand-for-load((tblui-define openai-image "OpenAI Image" "Display image information from OpenAI." (lambda nil openai-image-entries) [("URL" 200 nil)] nil) nil)
  load-with-code-conversion("/home/sem/.emacs.d/elpa/29.1/develop/openai-202401..." "/home/sem/.emacs.d/elpa/29.1/develop/openai-202401..." nil t)
  require(openai-image)
  load-with-code-conversion("/home/sem/.emacs.d/elpa/29.1/develop/dall-e-202401..." "/home/sem/.emacs.d/elpa/29.1/develop/dall-e-202401..." nil t)
  command-execute(dall-e-new record)
  helm-M-x-execute-command(dall-e-new)
  helm-execute-selection-action-1()
  helm-execute-selection-action()
  helm-internal((((name . "Emacs Commands history") (init #f(compiled-function () #<bytecode -0x543e6b7fb535d09>)) (candidates . helm-candidates-in-buffer) (cleanup . helm-M-x--unwind-forms) (keymap keymap (keymap ...) keymap (29 . helm-M-x-toggle-short-doc) (21 . helm-M-x-universal-argument) keymap (27 keymap ...) (C-return . helm-cr-empty-string) keymap (C-iso-lefttab . helm-follow-action-backward) (tab . helm-execute-persistent-action) (33554440 . describe-key) (33554443 . helm-follow-action-backward) (33554442 . helm-follow-action-forward) (17 . ace-jump-helm-line) (f12 . #f(compiled-function () ... #<bytecode 0x19802935789680>)) (f11 . #f(compiled-function () ... #<bytecode 0x19802935798680>)) (f10 . #f(compiled-function () ... #<bytecode 0x1980293565f680>)) (f9 . #f(compiled-function () ... #<bytecode 0x1980293564e680>)) (f8 . #f(compiled-function () ... #<bytecode 0x198029357cd680>)) (f7 . #f(compiled-function () ... #<bytecode 0x198029357dc680>)) (f6 . #f(compiled-function () ... #<bytecode 0x198029351b3680>)) (f5 . #f(compiled-function () ... #<bytecode 0x198029351a2680>)) (f4 . #f(compiled-function () ... #<bytecode 0x19802935161680>)) (f3 . #f(compiled-function () ... #<bytecode 0x19802935170680>)) (f2 . #f(compiled-function () ... #<bytecode 0x198029351f7680>)) (menu-bar keymap ...) (help keymap ...) (23 . helm-helm-yank-text-at-point-with-subkeys) (f1 . #f(compiled-function () ... #<bytecode 0x198029351e6680>)) (8 . helm-next-source) ...) (action . helm-type-command-actions) (persistent-action . helm-M-x-persistent-action) (persistent-help . "Describe this command") (help-message . helm-M-x-help-message) (requires-pattern . 0) (filtered-candidate-transformer helm-M-x-transformer-no-sort #<subr F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_18> helm-fuzzy-highlight-matches) (volatile . t) (match identity) (fuzzy-match . t) (redisplay . identity) (nomark . t) (coerce . helm-symbolify) (header-line . #("TAB: Describe this command (keep..." 0 3 ...)) (resume . helm-M-x-resume-fn) (multimatch . t) (must-match . t) (group . helm-command) (data . #f(compiled-function () #<bytecode -0xd1e9d5437928a30>)) (get-line . buffer-substring-no-properties) (search helm-mm-exact-search helm-mm-search helm-candidates-in-buffer-search-default-fn helm-fuzzy-search)) ((name . "Emacs Commands") (init #f(compiled-function () #<bytecode 0x3d87750bc75164b>)) (candidates . helm-candidates-in-buffer) (cleanup . helm-M-x--unwind-forms) (keymap keymap (keymap ...) keymap (29 . helm-M-x-toggle-short-doc) (21 . helm-M-x-universal-argument) keymap (27 keymap ...) (C-return . helm-cr-empty-string) keymap (C-iso-lefttab . helm-follow-action-backward) (tab . helm-execute-persistent-action) (33554440 . describe-key) (33554443 . helm-follow-action-backward) (33554442 . helm-follow-action-forward) (17 . ace-jump-helm-line) (f12 . #f(compiled-function () ... #<bytecode 0x19802935789680>)) (f11 . #f(compiled-function () ... #<bytecode 0x19802935798680>)) (f10 . #f(compiled-function () ... #<bytecode 0x1980293565f680>)) (f9 . #f(compiled-function () ... #<bytecode 0x1980293564e680>)) (f8 . #f(compiled-function () ... #<bytecode 0x198029357cd680>)) (f7 . #f(compiled-function () ... #<bytecode 0x198029357dc680>)) (f6 . #f(compiled-function () ... #<bytecode 0x198029351b3680>)) (f5 . #f(compiled-function () ... #<bytecode 0x198029351a2680>)) (f4 . #f(compiled-function () ... #<bytecode 0x19802935161680>)) (f3 . #f(compiled-function () ... #<bytecode 0x19802935170680>)) (f2 . #f(compiled-function () ... #<bytecode 0x198029351f7680>)) (menu-bar keymap ...) (help keymap ...) (23 . helm-helm-yank-text-at-point-with-subkeys) (f1 . #f(compiled-function () ... #<bytecode 0x198029351e6680>)) (8 . helm-next-source) ...) (action . helm-type-command-actions) (persistent-action . helm-M-x-persistent-action) (persistent-help . "Describe this command") (help-message . helm-M-x-help-message) (requires-pattern . 0) (filtered-candidate-transformer helm-M-x-transformer-no-sort #<subr F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_18> helm-fuzzy-highlight-matches) (volatile . t) (match identity) (fuzzy-match . t) (redisplay . identity) (nomark . t) (coerce . helm-symbolify) (header-line . #("TAB: Describe this command (keep..." 0 3 ...)) (resume . helm-M-x-resume-fn) (multimatch . t) (must-match . t) (group . helm-command) (data . #f(compiled-function () #<bytecode 0x102d0bacd62f6a5>)) (get-line . buffer-substring-no-properties) (search helm-mm-exact-search helm-mm-search helm-candidates-in-buffer-search-default-fn helm-fuzzy-search))) nil "M-x " nil nil "*helm M-x*" nil nil helm-M-x-input-history)
  helm((((name . "Emacs Commands history") (init #f(compiled-function () #<bytecode -0x543e6b7fb535d09>)) (candidates . helm-candidates-in-buffer) (cleanup . helm-M-x--unwind-forms) (keymap keymap (keymap ...) keymap (29 . helm-M-x-toggle-short-doc) (21 . helm-M-x-universal-argument) keymap (27 keymap ...) (C-return . helm-cr-empty-string) keymap (C-iso-lefttab . helm-follow-action-backward) (tab . helm-execute-persistent-action) (33554440 . describe-key) (33554443 . helm-follow-action-backward) (33554442 . helm-follow-action-forward) (17 . ace-jump-helm-line) (f12 . #f(compiled-function () ... #<bytecode 0x19802935789680>)) (f11 . #f(compiled-function () ... #<bytecode 0x19802935798680>)) (f10 . #f(compiled-function () ... #<bytecode 0x1980293565f680>)) (f9 . #f(compiled-function () ... #<bytecode 0x1980293564e680>)) (f8 . #f(compiled-function () ... #<bytecode 0x198029357cd680>)) (f7 . #f(compiled-function () ... #<bytecode 0x198029357dc680>)) (f6 . #f(compiled-function () ... #<bytecode 0x198029351b3680>)) (f5 . #f(compiled-function () ... #<bytecode 0x198029351a2680>)) (f4 . #f(compiled-function () ... #<bytecode 0x19802935161680>)) (f3 . #f(compiled-function () ... #<bytecode 0x19802935170680>)) (f2 . #f(compiled-function () ... #<bytecode 0x198029351f7680>)) (menu-bar keymap ...) (help keymap ...) (23 . helm-helm-yank-text-at-point-with-subkeys) (f1 . #f(compiled-function () ... #<bytecode 0x198029351e6680>)) (8 . helm-next-source) ...) (action . helm-type-command-actions) (persistent-action . helm-M-x-persistent-action) (persistent-help . "Describe this command") (help-message . helm-M-x-help-message) (requires-pattern . 0) (filtered-candidate-transformer helm-M-x-transformer-no-sort #<subr F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_18> helm-fuzzy-highlight-matches) (volatile . t) (match identity) (fuzzy-match . t) (redisplay . identity) (nomark . t) (coerce . helm-symbolify) (header-line . #("TAB: Describe this command (keep..." 0 3 ...)) (resume . helm-M-x-resume-fn) (multimatch . t) (must-match . t) (group . helm-command) (data . #f(compiled-function () #<bytecode -0xd1e9d5437928a30>)) (get-line . buffer-substring-no-properties) (search helm-mm-exact-search helm-mm-search helm-candidates-in-buffer-search-default-fn helm-fuzzy-search)) ((name . "Emacs Commands") (init #f(compiled-function () #<bytecode 0x3d87750bc75164b>)) (candidates . helm-candidates-in-buffer) (cleanup . helm-M-x--unwind-forms) (keymap keymap (keymap ...) keymap (29 . helm-M-x-toggle-short-doc) (21 . helm-M-x-universal-argument) keymap (27 keymap ...) (C-return . helm-cr-empty-string) keymap (C-iso-lefttab . helm-follow-action-backward) (tab . helm-execute-persistent-action) (33554440 . describe-key) (33554443 . helm-follow-action-backward) (33554442 . helm-follow-action-forward) (17 . ace-jump-helm-line) (f12 . #f(compiled-function () ... #<bytecode 0x19802935789680>)) (f11 . #f(compiled-function () ... #<bytecode 0x19802935798680>)) (f10 . #f(compiled-function () ... #<bytecode 0x1980293565f680>)) (f9 . #f(compiled-function () ... #<bytecode 0x1980293564e680>)) (f8 . #f(compiled-function () ... #<bytecode 0x198029357cd680>)) (f7 . #f(compiled-function () ... #<bytecode 0x198029357dc680>)) (f6 . #f(compiled-function () ... #<bytecode 0x198029351b3680>)) (f5 . #f(compiled-function () ... #<bytecode 0x198029351a2680>)) (f4 . #f(compiled-function () ... #<bytecode 0x19802935161680>)) (f3 . #f(compiled-function () ... #<bytecode 0x19802935170680>)) (f2 . #f(compiled-function () ... #<bytecode 0x198029351f7680>)) (menu-bar keymap ...) (help keymap ...) (23 . helm-helm-yank-text-at-point-with-subkeys) (f1 . #f(compiled-function () ... #<bytecode 0x198029351e6680>)) (8 . helm-next-source) ...) (action . helm-type-command-actions) (persistent-action . helm-M-x-persistent-action) (persistent-help . "Describe this command") (help-message . helm-M-x-help-message) (requires-pattern . 0) (filtered-candidate-transformer helm-M-x-transformer-no-sort #<subr F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_18> helm-fuzzy-highlight-matches) (volatile . t) (match identity) (fuzzy-match . t) (redisplay . identity) (nomark . t) (coerce . helm-symbolify) (header-line . #("TAB: Describe this command (keep..." 0 3 ...)) (resume . helm-M-x-resume-fn) (multimatch . t) (must-match . t) (group . helm-command) (data . #f(compiled-function () #<bytecode 0x102d0bacd62f6a5>)) (get-line . buffer-substring-no-properties) (search helm-mm-exact-search helm-mm-search helm-candidates-in-buffer-search-default-fn helm-fuzzy-search))) nil "M-x " nil nil "*helm M-x*" nil nil helm-M-x-input-history)
  helm(:sources (((name . "Emacs Commands history") (init #f(compiled-function () #<bytecode -0x543e6b7fb535d09>)) (candidates . helm-candidates-in-buffer) (cleanup . helm-M-x--unwind-forms) (keymap keymap (keymap ...) keymap (29 . helm-M-x-toggle-short-doc) (21 . helm-M-x-universal-argument) keymap (27 keymap ...) (C-return . helm-cr-empty-string) keymap (C-iso-lefttab . helm-follow-action-backward) (tab . helm-execute-persistent-action) (33554440 . describe-key) (33554443 . helm-follow-action-backward) (33554442 . helm-follow-action-forward) (17 . ace-jump-helm-line) (f12 . #f(compiled-function () ... #<bytecode 0x19802935789680>)) (f11 . #f(compiled-function () ... #<bytecode 0x19802935798680>)) (f10 . #f(compiled-function () ... #<bytecode 0x1980293565f680>)) (f9 . #f(compiled-function () ... #<bytecode 0x1980293564e680>)) (f8 . #f(compiled-function () ... #<bytecode 0x198029357cd680>)) (f7 . #f(compiled-function () ... #<bytecode 0x198029357dc680>)) (f6 . #f(compiled-function () ... #<bytecode 0x198029351b3680>)) (f5 . #f(compiled-function () ... #<bytecode 0x198029351a2680>)) (f4 . #f(compiled-function () ... #<bytecode 0x19802935161680>)) (f3 . #f(compiled-function () ... #<bytecode 0x19802935170680>)) (f2 . #f(compiled-function () ... #<bytecode 0x198029351f7680>)) (menu-bar keymap ...) (help keymap ...) (23 . helm-helm-yank-text-at-point-with-subkeys) (f1 . #f(compiled-function () ... #<bytecode 0x198029351e6680>)) (8 . helm-next-source) ...) (action . helm-type-command-actions) (persistent-action . helm-M-x-persistent-action) (persistent-help . "Describe this command") (help-message . helm-M-x-help-message) (requires-pattern . 0) (filtered-candidate-transformer helm-M-x-transformer-no-sort #<subr F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_18> helm-fuzzy-highlight-matches) (volatile . t) (match identity) (fuzzy-match . t) (redisplay . identity) (nomark . t) (coerce . helm-symbolify) (header-line . #("TAB: Describe this command (keep..." 0 3 ...)) (resume . helm-M-x-resume-fn) (multimatch . t) (must-match . t) (group . helm-command) (data . #f(compiled-function () #<bytecode -0xd1e9d5437928a30>)) (get-line . buffer-substring-no-properties) (search helm-mm-exact-search helm-mm-search helm-candidates-in-buffer-search-default-fn helm-fuzzy-search)) ((name . "Emacs Commands") (init #f(compiled-function () #<bytecode 0x3d87750bc75164b>)) (candidates . helm-candidates-in-buffer) (cleanup . helm-M-x--unwind-forms) (keymap keymap (keymap ...) keymap (29 . helm-M-x-toggle-short-doc) (21 . helm-M-x-universal-argument) keymap (27 keymap ...) (C-return . helm-cr-empty-string) keymap (C-iso-lefttab . helm-follow-action-backward) (tab . helm-execute-persistent-action) (33554440 . describe-key) (33554443 . helm-follow-action-backward) (33554442 . helm-follow-action-forward) (17 . ace-jump-helm-line) (f12 . #f(compiled-function () ... #<bytecode 0x19802935789680>)) (f11 . #f(compiled-function () ... #<bytecode 0x19802935798680>)) (f10 . #f(compiled-function () ... #<bytecode 0x1980293565f680>)) (f9 . #f(compiled-function () ... #<bytecode 0x1980293564e680>)) (f8 . #f(compiled-function () ... #<bytecode 0x198029357cd680>)) (f7 . #f(compiled-function () ... #<bytecode 0x198029357dc680>)) (f6 . #f(compiled-function () ... #<bytecode 0x198029351b3680>)) (f5 . #f(compiled-function () ... #<bytecode 0x198029351a2680>)) (f4 . #f(compiled-function () ... #<bytecode 0x19802935161680>)) (f3 . #f(compiled-function () ... #<bytecode 0x19802935170680>)) (f2 . #f(compiled-function () ... #<bytecode 0x198029351f7680>)) (menu-bar keymap ...) (help keymap ...) (23 . helm-helm-yank-text-at-point-with-subkeys) (f1 . #f(compiled-function () ... #<bytecode 0x198029351e6680>)) (8 . helm-next-source) ...) (action . helm-type-command-actions) (persistent-action . helm-M-x-persistent-action) (persistent-help . "Describe this command") (help-message . helm-M-x-help-message) (requires-pattern . 0) (filtered-candidate-transformer helm-M-x-transformer-no-sort #<subr F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_18> helm-fuzzy-highlight-matches) (volatile . t) (match identity) (fuzzy-match . t) (redisplay . identity) (nomark . t) (coerce . helm-symbolify) (header-line . #("TAB: Describe this command (keep..." 0 3 ...)) (resume . helm-M-x-resume-fn) (multimatch . t) (must-match . t) (group . helm-command) (data . #f(compiled-function () #<bytecode 0x102d0bacd62f6a5>)) (get-line . buffer-substring-no-properties) (search helm-mm-exact-search helm-mm-search helm-candidates-in-buffer-search-default-fn helm-fuzzy-search))) :prompt "M-x " :buffer "*helm M-x*" :history helm-M-x-input-history :truncate-lines t)
  helm-M-x-read-extended-command([## magit-section-show-headings vc-src-responsible-p lsp:omnisharp-run-tests-in-class-request-column tramp-sudoedit-file-name-handler tramp-completion-handle-file-name-all-completions Set\ Slice nxml-clear-char-ref-extra-display org-indent-drawer vc-sccs-log-view-mode-hook magit-patch-save magit-revision-filter-files-on-follow elfeed-search-face-alist yas-x-prompt gnus-article-nndoc-name org-table-previous-row rng-parse-validate-file magit-xref-insert-button gnus-mime-security-details-buffer racket-insert-closing-bracket elfeed-entry-id--cmacro edebug-mode-on-hook org-habit-scheduled transient:magit-diff-refresh:--irreversible-delete neo-util--kill-buffers-for-path nnoo-map-functions smie-config--guess-value magit-list-modified-modules pullreq_label:pullreq org-switch-to-buffer-other-window EXPLAIN flycheck-pug-executable tramp-sudoedit-handle-set-file-acl org-table-get-range vc-bzr-shelve-menu rng-match-infer-start-tag-namespace lsp:set-rename-params-uri? link-hint--next-package-keyword-link gnus-summary-limit-to-marks org-agenda-menu-show-matcher rng-c-parse-name-class org-roam-ui-after-open-node-functions article-fill-long-lines smime-buffer-as-string-region nth-sibling lsp-inlay-hint-face org-at-keyword-p rng-start-tag-expand-recover sp-ignore-modes-list yaml--char-at-pos ...])
  helm-M-x(nil)
  funcall-interactively(helm-M-x nil)
  call-interactively(helm-M-x)
  (let ((completion-styles completion-styles)) (add-to-list 'completion-styles 'flex t) (call-interactively 'helm-M-x))
  spacemacs/helm-M-x-fuzzy-matching()
  funcall-interactively(spacemacs/helm-M-x-fuzzy-matching)
  command-execute(spacemacs/helm-M-x-fuzzy-matching)

hope there is no openai-key in this output 😅😅😅

jcs090218 commented 5 months ago

This is due to the incompatible argument list from the package tblui. I don't use spacemacs, so I don't know how they handle this. I guess you either upgrade it yourself or open the issue to spacemacs?

SemyonSinchenko commented 5 months ago

This is due to the incompatible argument list from the package tblui. I don't use spacemacs, so I don't know how they handle this. I guess you either upgrade it yourself or open the issue to spacemacs?

I will open an issue in the spacemacs repository. Thank you!

smile13241324 commented 3 months ago

Sorry this seems to not be our bug, see https://github.com/syl20bnr/spacemacs/issues/16270#issuecomment-2028022715, we do not touch or install the tblui package directly.

jcs090218 commented 3 months ago

There are breaking changes in tblui; see https://github.com/Yuki-Inoue/tblui.el/pull/7/files#diff-f9e42ce9e475f94270265c88804f7f1fcda718c2ba96b23d1e08bac6b76215a5R123.

It has been fixed in the upstream openai.el package. I assumed you need to update tblui in order to have this fixed.