`(wrong-type-argument sequencep 0)` in a C++ project about lsp-ivy

[r-darwish]

I'm having something similar. Here is the traceback:

Debugger entered--Lisp error: (wrong-type-argument listp 0)
  nthcdr(30000 0)
  (null (nthcdr ivy-sort-max-size coll))
  (and sort (or (functionp collection) (not (eq history (quote org-refile-history)))) (setq sort-fn (ivy--sort-function (if (functionp collection) collection caller))) (null (nthcdr ivy-sort-max-size coll)))
  (if (and sort (or (functionp collection) (not (eq history (quote org-refile-history)))) (setq sort-fn (ivy--sort-function (if (functionp collection) collection caller))) (null (nthcdr ivy-sort-max-size coll))) (progn (setq coll (sort (copy-sequence coll) sort-fn))))
  (let (coll sort-fn) (cond ((eq collection (function Info-read-node-name-1)) (setq coll (if (equal (and (boundp ...) Info-current-file) "dir") (mapcar (function (lambda ... ...)) (delete-dups (all-completions "(" collection predicate))) (all-completions "" collection predicate)))) ((eq collection (function read-file-name-internal)) (require (quote tramp)) (if (and (equal def initial-input) (member "./" ivy-extra-directories)) (progn (setq def nil))) (setq ivy--directory default-directory) (if (and initial-input (not (equal initial-input ""))) (progn (cond ((file-directory-p initial-input) (if ... ...) (setq ivy--directory ...) (setq initial-input nil) (if preselect ...)) ((condition-case nil ... ...) (setq ivy--directory ...) (progn ... ...))))) (require (quote dired)) (if preselect (progn (let ((preselect-directory ...)) (if (and preselect-directory ...) (progn ...)) (setq preselect (file-relative-name preselect preselect-directory)) (progn (or ... ...) (let* ... ...))))) (setq sort nil) (setq coll (ivy--sorted-files ivy--directory)) (if initial-input (progn (if (or require-match (equal initial-input default-directory) (equal initial-input "")) nil (setq coll (cons initial-input coll))) (if (or (not ...) (equal ... ...)) (progn (setq initial-input nil)))))) ((eq collection (function internal-complete-buffer)) (setq prompt (replace-regexp-in-string "RET to end" "C-M-j to end" prompt)) (setq coll (ivy--buffer-list "" (and ivy-use-virtual-buffers (member caller (quote ...))) predicate))) (dynamic-collection (setq coll (funcall collection (or initial-input "")))) ((consp (car-safe collection)) (setq collection (cl-remove-if-not predicate collection)) (if (and sort (setq sort-fn (ivy--sort-function caller))) (progn (setq collection (sort (copy-sequence collection) sort-fn)) (setq sort nil))) (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) ivy-last))) (let* ((v ivy-last)) (aset v 2 collection))) (setq coll (let ((i -1)) (mapcar (function (lambda ... ...)) (all-completions "" collection))))) ((or (functionp collection) (byte-code-function-p collection) (vectorp collection) (hash-table-p collection) (and (listp collection) (symbolp (car collection)))) (let ((Info-complete-menu-buffer (or (and ... Info-complete-menu-buffer) (progn ... ...)))) (setq coll (all-completions "" collection predicate)))) (t (setq coll (all-completions "" collection predicate)))) (if (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) ivy-last))) (aref ivy-last 19)) nil (setq coll (delete "" coll))) (if def (progn (cond ((stringp (car-safe def)) (setq coll (cl-union def coll :test (function equal)))) ((and (stringp def) (not (member def coll))) (setq coll (cons def coll)))))) (if (and sort (or (functionp collection) (not (eq history (quote org-refile-history)))) (setq sort-fn (ivy--sort-function (if (functionp collection) collection caller))) (null (nthcdr ivy-sort-max-size coll))) (progn (setq coll (sort (copy-sequence coll) sort-fn)))) (setq coll (ivy--set-candidates coll)) (setq ivy--old-re nil) (setq ivy--old-cands nil) (if initial-input (progn (setq ivy--old-cands coll) (setq ivy--old-cands (ivy--filter initial-input coll)))) (if (setq ivy--trying-to-resume-dynamic-collection (and preselect dynamic-collection)) nil (if (integerp preselect) (progn (setq ivy--old-re "") (ivy-set-index preselect)))) (setq ivy--all-candidates coll) (if (integerp preselect) nil (ivy-set-index (or (and dynamic-collection ivy--index) (and preselect (ivy--preselect-index preselect (if initial-input ivy--old-cands coll))) 0))))
  (let* ((prompt (or (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list ... state))) (aref state 1)) "")) (collection (progn (or (and (memq (type-of state) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) state))) (aref state 2))) (predicate (progn (or (and (memq (type-of state) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) state))) (aref state 3))) (history (progn (or (and (memq (type-of state) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) state))) (aref state 6))) (preselect (progn (or (and (memq (type-of state) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) state))) (aref state 7))) (re-builder (progn (or (and (memq (type-of state) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) state))) (aref state 17))) (dynamic-collection (progn (or (and (memq (type-of state) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) state))) (aref state 19))) (require-match (progn (or (and (memq (type-of state) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) state))) (aref state 4))) (caller (or (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list ... state))) (aref state 22)) this-command)) (sort (or (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list ... state))) (aref state 10)) (assoc caller ivy-sort-functions-alist))) (initial-input (or (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list ... state))) (aref state 5)) (let ((init (ivy-alist-setting ivy-initial-inputs-alist caller))) (if (functionp init) (funcall init) init)))) (def (progn (or (and (memq (type-of state) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) state))) (aref state 24)))) (setq ivy--extra-candidates (ivy--compute-extra-candidates caller)) (setq ivy--directory nil) (setq ivy-case-fold-search ivy-case-fold-search-default) (setq ivy--regex-function (or re-builder (and (functionp collection) (cdr (assq collection ivy-re-builders-alist))) (ivy-alist-setting ivy-re-builders-alist) (function ivy--regex))) (setq ivy--subexps 0) (setq ivy--regexp-quote (function regexp-quote)) (setq ivy--old-text "") (setq ivy--full-length nil) (setq ivy-text "") (setq ivy--index 0) (setq ivy-calling nil) (setq ivy-use-ignore ivy-use-ignore-default) (progn (or (and (memq (type-of state) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) state))) (let* ((v state)) (aset v 25 ivy-use-ignore))) (setq ivy--highlight-function (or (cdr (assq ivy--regex-function ivy-highlight-functions-alist)) (function ivy--highlight-default))) (let (coll sort-fn) (cond ((eq collection (function Info-read-node-name-1)) (setq coll (if (equal (and ... Info-current-file) "dir") (mapcar (function ...) (delete-dups ...)) (all-completions "" collection predicate)))) ((eq collection (function read-file-name-internal)) (require (quote tramp)) (if (and (equal def initial-input) (member "./" ivy-extra-directories)) (progn (setq def nil))) (setq ivy--directory default-directory) (if (and initial-input (not (equal initial-input ""))) (progn (cond (... ... ... ... ...) (... ... ...)))) (require (quote dired)) (if preselect (progn (let (...) (if ... ...) (setq preselect ...) (progn ... ...)))) (setq sort nil) (setq coll (ivy--sorted-files ivy--directory)) (if initial-input (progn (if (or require-match ... ...) nil (setq coll ...)) (if (or ... ...) (progn ...))))) ((eq collection (function internal-complete-buffer)) (setq prompt (replace-regexp-in-string "RET to end" "C-M-j to end" prompt)) (setq coll (ivy--buffer-list "" (and ivy-use-virtual-buffers (member caller ...)) predicate))) (dynamic-collection (setq coll (funcall collection (or initial-input "")))) ((consp (car-safe collection)) (setq collection (cl-remove-if-not predicate collection)) (if (and sort (setq sort-fn (ivy--sort-function caller))) (progn (setq collection (sort ... sort-fn)) (setq sort nil))) (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list ... ivy-last))) (let* ((v ivy-last)) (aset v 2 collection))) (setq coll (let ((i -1)) (mapcar (function ...) (all-completions "" collection))))) ((or (functionp collection) (byte-code-function-p collection) (vectorp collection) (hash-table-p collection) (and (listp collection) (symbolp (car collection)))) (let ((Info-complete-menu-buffer (or ... ...))) (setq coll (all-completions "" collection predicate)))) (t (setq coll (all-completions "" collection predicate)))) (if (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) ivy-last))) (aref ivy-last 19)) nil (setq coll (delete "" coll))) (if def (progn (cond ((stringp (car-safe def)) (setq coll (cl-union def coll :test ...))) ((and (stringp def) (not ...)) (setq coll (cons def coll)))))) (if (and sort (or (functionp collection) (not (eq history (quote org-refile-history)))) (setq sort-fn (ivy--sort-function (if (functionp collection) collection caller))) (null (nthcdr ivy-sort-max-size coll))) (progn (setq coll (sort (copy-sequence coll) sort-fn)))) (setq coll (ivy--set-candidates coll)) (setq ivy--old-re nil) (setq ivy--old-cands nil) (if initial-input (progn (setq ivy--old-cands coll) (setq ivy--old-cands (ivy--filter initial-input coll)))) (if (setq ivy--trying-to-resume-dynamic-collection (and preselect dynamic-collection)) nil (if (integerp preselect) (progn (setq ivy--old-re "") (ivy-set-index preselect)))) (setq ivy--all-candidates coll) (if (integerp preselect) nil (ivy-set-index (or (and dynamic-collection ivy--index) (and preselect (ivy--preselect-index preselect (if initial-input ivy--old-cands coll))) 0)))) (setq ivy-exit nil) (setq ivy--default (if (region-active-p) (buffer-substring (region-beginning) (region-end)) (ivy-thing-at-point))) (setq ivy--prompt (ivy-add-prompt-count (ivy--quote-format-string prompt))) (setq ivy--use-selectable-prompt (ivy--prompt-selectable-p)) (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) ivy-last))) (let* ((v ivy-last)) (aset v 5 initial-input))))
  ivy--reset-state(#s(ivy-state :prompt "Global workspace symbols: " :collection #f(compiled-function (user-input) #<bytecode 0x510b3fe5>) :predicate nil :require-match t :initial-input nil :history nil :preselect nil :keymap nil :update-fn nil :sort t :frame #<frame Emacs:  *Minibuf-1* 0x105994c38> :window #<window 3 on ShovelRunner.java> :buffer #<buffer ShovelRunner.java> :text nil :action (1 ("o" lsp-ivy--workspace-symbol-action "default") ("i" (closure (bookmark-alist Info-complete-menu-buffer avy-handler-function avy-styles-alist avy-style avy-keys-alist avy-keys avy-action avy-all-windows cl-struct-ivy-state-tags t) (x) (insert (if (stringp x) x (car x)))) "insert") ("w" (closure (bookmark-alist Info-complete-menu-buffer avy-handler-function avy-styles-alist avy-style avy-keys-alist avy-keys avy-action avy-all-windows cl-struct-ivy-state-tags t) (x) (kill-new (if (stringp x) x (car x)))) "copy")) :unwind nil :re-builder nil :matcher nil :dynamic-collection t :display-transformer-fn lsp-ivy--format-symbol-match :directory "/Users/rodarwis/src/work/javallom/eventhubshovel/eventhubshovel-core/src/main/java/com/adallom/eventhubshovel/" :caller lsp-ivy-workspace-symbol :current nil :def nil :ignore t :multi-action nil :extra-props nil))
  (let* ((ivy-recursive-last (and (active-minibuffer-window) ivy-last)) (ivy--display-function (if (or ivy-recursive-last (not (window-minibuffer-p))) (progn (ivy-alist-setting ivy-display-functions-alist caller)))) result) (setq update-fn (or update-fn (ivy-alist-setting ivy-update-fns-alist caller))) (setq unwind (or unwind (ivy-alist-setting ivy-unwind-fns-alist caller))) (setq ivy-last (make-ivy-state :prompt prompt :collection collection :predicate predicate :require-match require-match :initial-input initial-input :history history :preselect preselect :keymap keymap :update-fn (if (eq update-fn (quote auto)) (function (lambda nil (let (...) (save-current-buffer ...)))) update-fn) :sort sort :action (ivy--compute-extra-actions action caller) :multi-action multi-action :frame (selected-frame) :window (selected-window) :buffer (current-buffer) :unwind unwind :re-builder re-builder :matcher matcher :dynamic-collection dynamic-collection :display-transformer-fn (plist-get ivy--display-transformers-list caller) :directory default-directory :extra-props extra-props :caller caller :def def)) (ivy--reset-state ivy-last) (unwind-protect (let ((fun (function ivy--minibuffer-setup)) setup-hook) (setq setup-hook (function (lambda nil (remove-hook (quote minibuffer-setup-hook) setup-hook) (funcall fun)))) (unwind-protect (progn (add-hook (quote minibuffer-setup-hook) setup-hook) (let* ((hist ...) (minibuffer-completion-table collection) (minibuffer-completion-predicate predicate) (ivy-height ...) (resize-mini-windows ...)) (if (and ivy-auto-select-single-candidate ivy--all-candidates ...) (progn ... ...) (read-from-minibuffer prompt ... ... nil hist)) (if (eq ivy-exit ...) (progn ...)) (setq result (progn ... ...)))) (remove-hook (quote minibuffer-setup-hook) setup-hook))) (ivy--cleanup)) (ivy-call) (ivy--remove-props (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) ivy-last))) (aref ivy-last 23)) (quote idx)) result)
  (progn (if (equal overriding-local-map (quote (keymap))) (progn (keyboard-quit))) (setq caller (or caller this-command)) (let* ((ivy-recursive-last (and (active-minibuffer-window) ivy-last)) (ivy--display-function (if (or ivy-recursive-last (not (window-minibuffer-p))) (progn (ivy-alist-setting ivy-display-functions-alist caller)))) result) (setq update-fn (or update-fn (ivy-alist-setting ivy-update-fns-alist caller))) (setq unwind (or unwind (ivy-alist-setting ivy-unwind-fns-alist caller))) (setq ivy-last (make-ivy-state :prompt prompt :collection collection :predicate predicate :require-match require-match :initial-input initial-input :history history :preselect preselect :keymap keymap :update-fn (if (eq update-fn (quote auto)) (function (lambda nil (let ... ...))) update-fn) :sort sort :action (ivy--compute-extra-actions action caller) :multi-action multi-action :frame (selected-frame) :window (selected-window) :buffer (current-buffer) :unwind unwind :re-builder re-builder :matcher matcher :dynamic-collection dynamic-collection :display-transformer-fn (plist-get ivy--display-transformers-list caller) :directory default-directory :extra-props extra-props :caller caller :def def)) (ivy--reset-state ivy-last) (unwind-protect (let ((fun (function ivy--minibuffer-setup)) setup-hook) (setq setup-hook (function (lambda nil (remove-hook ... setup-hook) (funcall fun)))) (unwind-protect (progn (add-hook (quote minibuffer-setup-hook) setup-hook) (let* (... ... ... ... ...) (if ... ... ...) (if ... ...) (setq result ...))) (remove-hook (quote minibuffer-setup-hook) setup-hook))) (ivy--cleanup)) (ivy-call) (ivy--remove-props (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) ivy-last))) (aref ivy-last 23)) (quote idx)) result))
  (progn (let ((--cl-keys-- --cl-rest--)) (while --cl-keys-- (cond ((memq (car --cl-keys--) (quote (:predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :multi-action :unwind :re-builder :matcher :dynamic-collection :extra-props :caller :allow-other-keys))) (setq --cl-keys-- (cdr (cdr --cl-keys--)))) ((car (cdr (memq ... --cl-rest--))) (setq --cl-keys-- nil)) (t (error "Keyword argument %s not one of (:predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :multi-action :unwind :re-builder :matcher :dynamic-collection :extra-props :caller)" (car --cl-keys--)))))) (progn (if (equal overriding-local-map (quote (keymap))) (progn (keyboard-quit))) (setq caller (or caller this-command)) (let* ((ivy-recursive-last (and (active-minibuffer-window) ivy-last)) (ivy--display-function (if (or ivy-recursive-last (not ...)) (progn (ivy-alist-setting ivy-display-functions-alist caller)))) result) (setq update-fn (or update-fn (ivy-alist-setting ivy-update-fns-alist caller))) (setq unwind (or unwind (ivy-alist-setting ivy-unwind-fns-alist caller))) (setq ivy-last (make-ivy-state :prompt prompt :collection collection :predicate predicate :require-match require-match :initial-input initial-input :history history :preselect preselect :keymap keymap :update-fn (if (eq update-fn (quote auto)) (function (lambda nil ...)) update-fn) :sort sort :action (ivy--compute-extra-actions action caller) :multi-action multi-action :frame (selected-frame) :window (selected-window) :buffer (current-buffer) :unwind unwind :re-builder re-builder :matcher matcher :dynamic-collection dynamic-collection :display-transformer-fn (plist-get ivy--display-transformers-list caller) :directory default-directory :extra-props extra-props :caller caller :def def)) (ivy--reset-state ivy-last) (unwind-protect (let ((fun (function ivy--minibuffer-setup)) setup-hook) (setq setup-hook (function (lambda nil ... ...))) (unwind-protect (progn (add-hook ... setup-hook) (let* ... ... ... ...)) (remove-hook (quote minibuffer-setup-hook) setup-hook))) (ivy--cleanup)) (ivy-call) (ivy--remove-props (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list ... ivy-last))) (aref ivy-last 23)) (quote idx)) result)))
  (let* ((predicate (car (cdr (plist-member --cl-rest-- (quote :predicate))))) (require-match (car (cdr (plist-member --cl-rest-- (quote :require-match))))) (initial-input (car (cdr (plist-member --cl-rest-- (quote :initial-input))))) (history (car (cdr (plist-member --cl-rest-- (quote :history))))) (preselect (car (cdr (plist-member --cl-rest-- (quote :preselect))))) (def (car (cdr (plist-member --cl-rest-- (quote :def))))) (keymap (car (cdr (plist-member --cl-rest-- (quote :keymap))))) (update-fn (car (cdr (plist-member --cl-rest-- (quote :update-fn))))) (sort (car (cdr (plist-member --cl-rest-- (quote :sort))))) (action (car (cdr (plist-member --cl-rest-- (quote :action))))) (multi-action (car (cdr (plist-member --cl-rest-- (quote :multi-action))))) (unwind (car (cdr (plist-member --cl-rest-- (quote :unwind))))) (re-builder (car (cdr (plist-member --cl-rest-- (quote :re-builder))))) (matcher (car (cdr (plist-member --cl-rest-- (quote :matcher))))) (dynamic-collection (car (cdr (plist-member --cl-rest-- (quote :dynamic-collection))))) (extra-props (car (cdr (plist-member --cl-rest-- (quote :extra-props))))) (caller (car (cdr (plist-member --cl-rest-- (quote :caller)))))) (progn (let ((--cl-keys-- --cl-rest--)) (while --cl-keys-- (cond ((memq (car --cl-keys--) (quote ...)) (setq --cl-keys-- (cdr ...))) ((car (cdr ...)) (setq --cl-keys-- nil)) (t (error "Keyword argument %s not one of (:predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :multi-action :unwind :re-builder :matcher :dynamic-collection :extra-props :caller)" (car --cl-keys--)))))) (progn (if (equal overriding-local-map (quote (keymap))) (progn (keyboard-quit))) (setq caller (or caller this-command)) (let* ((ivy-recursive-last (and (active-minibuffer-window) ivy-last)) (ivy--display-function (if (or ivy-recursive-last ...) (progn ...))) result) (setq update-fn (or update-fn (ivy-alist-setting ivy-update-fns-alist caller))) (setq unwind (or unwind (ivy-alist-setting ivy-unwind-fns-alist caller))) (setq ivy-last (make-ivy-state :prompt prompt :collection collection :predicate predicate :require-match require-match :initial-input initial-input :history history :preselect preselect :keymap keymap :update-fn (if (eq update-fn ...) (function ...) update-fn) :sort sort :action (ivy--compute-extra-actions action caller) :multi-action multi-action :frame (selected-frame) :window (selected-window) :buffer (current-buffer) :unwind unwind :re-builder re-builder :matcher matcher :dynamic-collection dynamic-collection :display-transformer-fn (plist-get ivy--display-transformers-list caller) :directory default-directory :extra-props extra-props :caller caller :def def)) (ivy--reset-state ivy-last) (unwind-protect (let ((fun ...) setup-hook) (setq setup-hook (function ...)) (unwind-protect (progn ... ...) (remove-hook ... setup-hook))) (ivy--cleanup)) (ivy-call) (ivy--remove-props (progn (or (and ... t) (signal ... ...)) (aref ivy-last 23)) (quote idx)) result))))
  (closure (avy-handler-function avy-styles-alist avy-style avy-keys-alist avy-keys avy-action avy-all-windows cl-struct-ivy-state-tags t) (prompt collection &rest --cl-rest--) "Read a string in the minibuffer, with completion.\n\nPROMPT is a string, normally ending in a colon and a space.\n`ivy-count-format' is prepended to PROMPT during completion.\n\nCOLLECTION is either a list of strings, a function, an alist, or\na hash table, supplied for `minibuffer-completion-table'.\n\nPREDICATE is applied to filter out the COLLECTION immediately.\nThis argument is for compatibility with `completing-read'.\n\nWhen REQUIRE-MATCH is non-nil, only members of COLLECTION can be\nselected.\n\nIf INITIAL-INPUT is non-nil, then insert that input in the\nminibuffer initially.\n\nHISTORY is a name of a variable to hold the completion session\nhistory.\n\nKEYMAP is composed with `ivy-minibuffer-map'.\n\nPRESELECT, when non-nil, determines which one of the candidates\nmatching INITIAL-INPUT to select initially.  An integer stands\nfor the position of the desired candidate in the collection,\ncounting from zero.  Otherwise, use the first occurrence of\nPRESELECT in the collection.  Comparison is first done with\n`equal'.  If that fails, and when applicable, match PRESELECT as\na regular expression.\n\nDEF is for compatibility with `completing-read'.\n\nUPDATE-FN is called each time the candidate list is re-displayed.\n\nWhen SORT is non-nil, `ivy-sort-functions-alist' determines how\nto sort candidates before displaying them.\n\nACTION is a function to call after selecting a candidate.\nIt takes one argument, the selected candidate. If COLLECTION is\nan alist, the argument is a cons cell, otherwise it's a string.\n\nMULTI-ACTION, when non-nil, is called instead of ACTION when\nthere are marked candidates. It takes the list of candidates as\nits only argument. When it's nil, ACTION is called on each marked\ncandidate.\n\nUNWIND is a function of no arguments to call before exiting.\n\nRE-BUILDER is a function transforming input text into a regex\npattern.\n\nMATCHER is a function which can override how candidates are\nfiltered based on user input.  It takes a regex pattern and a\nlist of candidates, and returns the list of matching candidates.\n\nDYNAMIC-COLLECTION is a boolean specifying whether the list of\ncandidates is updated after each input by calling COLLECTION.\n\nEXTRA-PROPS can be used to store collection-specific\nsession-specific data.\n\nCALLER is a symbol to uniquely identify the caller to `ivy-read'.\nIt is used, along with COLLECTION, to determine which\ncustomizations apply to the current completion session.\n\n(fn PROMPT COLLECTION &key PREDICATE REQUIRE-MATCH INITIAL-INPUT HISTORY PRESELECT DEF KEYMAP UPDATE-FN SORT ACTION MULTI-ACTION UNWIND RE-BUILDER MATCHER DYNAMIC-COLLECTION EXTRA-PROPS CALLER)" (let* ((predicate (car (cdr (plist-member --cl-rest-- (quote :predicate))))) (require-match (car (cdr (plist-member --cl-rest-- (quote :require-match))))) (initial-input (car (cdr (plist-member --cl-rest-- (quote :initial-input))))) (history (car (cdr (plist-member --cl-rest-- (quote :history))))) (preselect (car (cdr (plist-member --cl-rest-- (quote :preselect))))) (def (car (cdr (plist-member --cl-rest-- (quote :def))))) (keymap (car (cdr (plist-member --cl-rest-- (quote :keymap))))) (update-fn (car (cdr (plist-member --cl-rest-- (quote :update-fn))))) (sort (car (cdr (plist-member --cl-rest-- (quote :sort))))) (action (car (cdr (plist-member --cl-rest-- (quote :action))))) (multi-action (car (cdr (plist-member --cl-rest-- (quote :multi-action))))) (unwind (car (cdr (plist-member --cl-rest-- (quote :unwind))))) (re-builder (car (cdr (plist-member --cl-rest-- (quote :re-builder))))) (matcher (car (cdr (plist-member --cl-rest-- (quote :matcher))))) (dynamic-collection (car (cdr (plist-member --cl-rest-- (quote :dynamic-collection))))) (extra-props (car (cdr (plist-member --cl-rest-- (quote :extra-props))))) (caller (car (cdr (plist-member --cl-rest-- (quote :caller)))))) (progn (let ((--cl-keys-- --cl-rest--)) (while --cl-keys-- (cond ((memq ... ...) (setq --cl-keys-- ...)) ((car ...) (setq --cl-keys-- nil)) (t (error "Keyword argument %s not one of (:predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :multi-action :unwind :re-builder :matcher :dynamic-collection :extra-props :caller)" ...))))) (progn (if (equal overriding-local-map (quote (keymap))) (progn (keyboard-quit))) (setq caller (or caller this-command)) (let* ((ivy-recursive-last (and ... ivy-last)) (ivy--display-function (if ... ...)) result) (setq update-fn (or update-fn (ivy-alist-setting ivy-update-fns-alist caller))) (setq unwind (or unwind (ivy-alist-setting ivy-unwind-fns-alist caller))) (setq ivy-last (make-ivy-state :prompt prompt :collection collection :predicate predicate :require-match require-match :initial-input initial-input :history history :preselect preselect :keymap keymap :update-fn (if ... ... update-fn) :sort sort :action (ivy--compute-extra-actions action caller) :multi-action multi-action :frame (selected-frame) :window (selected-window) :buffer (current-buffer) :unwind unwind :re-builder re-builder :matcher matcher :dynamic-collection dynamic-collection :display-transformer-fn (plist-get ivy--display-transformers-list caller) :directory default-directory :extra-props extra-props :caller caller :def def)) (ivy--reset-state ivy-last) (unwind-protect (let (... setup-hook) (setq setup-hook ...) (unwind-protect ... ...)) (ivy--cleanup)) (ivy-call) (ivy--remove-props (progn (or ... ...) (aref ivy-last 23)) (quote idx)) result)))))("Global workspace symbols: " #f(compiled-function (user-input) #<bytecode 0x510b3fe5>) :dynamic-collection t :require-match t :initial-input nil :action lsp-ivy--workspace-symbol-action :caller lsp-ivy-workspace-symbol :sort t)
  apply((closure (avy-handler-function avy-styles-alist avy-style avy-keys-alist avy-keys avy-action avy-all-windows cl-struct-ivy-state-tags t) (prompt collection &rest --cl-rest--) "Read a string in the minibuffer, with completion.\n\nPROMPT is a string, normally ending in a colon and a space.\n`ivy-count-format' is prepended to PROMPT during completion.\n\nCOLLECTION is either a list of strings, a function, an alist, or\na hash table, supplied for `minibuffer-completion-table'.\n\nPREDICATE is applied to filter out the COLLECTION immediately.\nThis argument is for compatibility with `completing-read'.\n\nWhen REQUIRE-MATCH is non-nil, only members of COLLECTION can be\nselected.\n\nIf INITIAL-INPUT is non-nil, then insert that input in the\nminibuffer initially.\n\nHISTORY is a name of a variable to hold the completion session\nhistory.\n\nKEYMAP is composed with `ivy-minibuffer-map'.\n\nPRESELECT, when non-nil, determines which one of the candidates\nmatching INITIAL-INPUT to select initially.  An integer stands\nfor the position of the desired candidate in the collection,\ncounting from zero.  Otherwise, use the first occurrence of\nPRESELECT in the collection.  Comparison is first done with\n`equal'.  If that fails, and when applicable, match PRESELECT as\na regular expression.\n\nDEF is for compatibility with `completing-read'.\n\nUPDATE-FN is called each time the candidate list is re-displayed.\n\nWhen SORT is non-nil, `ivy-sort-functions-alist' determines how\nto sort candidates before displaying them.\n\nACTION is a function to call after selecting a candidate.\nIt takes one argument, the selected candidate. If COLLECTION is\nan alist, the argument is a cons cell, otherwise it's a string.\n\nMULTI-ACTION, when non-nil, is called instead of ACTION when\nthere are marked candidates. It takes the list of candidates as\nits only argument. When it's nil, ACTION is called on each marked\ncandidate.\n\nUNWIND is a function of no arguments to call before exiting.\n\nRE-BUILDER is a function transforming input text into a regex\npattern.\n\nMATCHER is a function which can override how candidates are\nfiltered based on user input.  It takes a regex pattern and a\nlist of candidates, and returns the list of matching candidates.\n\nDYNAMIC-COLLECTION is a boolean specifying whether the list of\ncandidates is updated after each input by calling COLLECTION.\n\nEXTRA-PROPS can be used to store collection-specific\nsession-specific data.\n\nCALLER is a symbol to uniquely identify the caller to `ivy-read'.\nIt is used, along with COLLECTION, to determine which\ncustomizations apply to the current completion session.\n\n(fn PROMPT COLLECTION &key PREDICATE REQUIRE-MATCH INITIAL-INPUT HISTORY PRESELECT DEF KEYMAP UPDATE-FN SORT ACTION MULTI-ACTION UNWIND RE-BUILDER MATCHER DYNAMIC-COLLECTION EXTRA-PROPS CALLER)" (let* ((predicate (car (cdr (plist-member --cl-rest-- ...)))) (require-match (car (cdr (plist-member --cl-rest-- ...)))) (initial-input (car (cdr (plist-member --cl-rest-- ...)))) (history (car (cdr (plist-member --cl-rest-- ...)))) (preselect (car (cdr (plist-member --cl-rest-- ...)))) (def (car (cdr (plist-member --cl-rest-- ...)))) (keymap (car (cdr (plist-member --cl-rest-- ...)))) (update-fn (car (cdr (plist-member --cl-rest-- ...)))) (sort (car (cdr (plist-member --cl-rest-- ...)))) (action (car (cdr (plist-member --cl-rest-- ...)))) (multi-action (car (cdr (plist-member --cl-rest-- ...)))) (unwind (car (cdr (plist-member --cl-rest-- ...)))) (re-builder (car (cdr (plist-member --cl-rest-- ...)))) (matcher (car (cdr (plist-member --cl-rest-- ...)))) (dynamic-collection (car (cdr (plist-member --cl-rest-- ...)))) (extra-props (car (cdr (plist-member --cl-rest-- ...)))) (caller (car (cdr (plist-member --cl-rest-- ...))))) (progn (let ((--cl-keys-- --cl-rest--)) (while --cl-keys-- (cond (... ...) (... ...) (t ...)))) (progn (if (equal overriding-local-map (quote ...)) (progn (keyboard-quit))) (setq caller (or caller this-command)) (let* ((ivy-recursive-last ...) (ivy--display-function ...) result) (setq update-fn (or update-fn ...)) (setq unwind (or unwind ...)) (setq ivy-last (make-ivy-state :prompt prompt :collection collection :predicate predicate :require-match require-match :initial-input initial-input :history history :preselect preselect :keymap keymap :update-fn ... :sort sort :action ... :multi-action multi-action :frame ... :window ... :buffer ... :unwind unwind :re-builder re-builder :matcher matcher :dynamic-collection dynamic-collection :display-transformer-fn ... :directory default-directory :extra-props extra-props :caller caller :def def)) (ivy--reset-state ivy-last) (unwind-protect (let ... ... ...) (ivy--cleanup)) (ivy-call) (ivy--remove-props (progn ... ...) (quote idx)) result))))) ("Global workspace symbols: " #f(compiled-function (user-input) #<bytecode 0x510b3fe5>) :dynamic-collection t :require-match t :initial-input nil :action lsp-ivy--workspace-symbol-action :caller lsp-ivy-workspace-symbol :sort t))
  ivy-read("Global workspace symbols: " #f(compiled-function (user-input) #<bytecode 0x510b3fe5>) :dynamic-collection t :require-match t :initial-input nil :action lsp-ivy--workspace-symbol-action :caller lsp-ivy-workspace-symbol)
  lsp-ivy--workspace-symbol((#s(lsp--workspace :parser #s(lsp--parser :headers nil :body nil :reading-body nil :body-length nil :body-received nil :leftovers "" :workspace #2) :server-capabilities #<hash-table equal 16/65 0x51417d5d> :registered-server-capabilities (#s(lsp--registered-capability :id "5467318b-b2c6-475a-a517-16b43871b802" :method "workspace/didChangeWatchedFiles" :options #<hash-table equal 1/65 0x40597a05>) #s(lsp--registered-capability :id "6c7bd7c0-c430-400d-a0ce-922700632729" :method "textDocument/rename" :options #<hash-table equal 1/65 0x41981f35>) #s(lsp--registered-capability :id "e5945453-d5c1-49c8-a8fa-3a4cd4cfc3d1" :method "textDocument/rangeFormatting" :options nil) #s(lsp--registered-capability :id "d4316996-704f-4cf0-98a1-4e1b6de61ff6" :method "textDocument/formatting" :options nil) #s(lsp--registered-capability :id "e1d43869-cb4b-485c-92a4-b589238dc219" :method "workspace/didChangeWorkspaceFolders" :options nil) #s(lsp--registered-capability :id "5070af51-6998-4a15-bf8d-b9dd70e1204d" :method "textDocument/foldingRange" :options nil) #s(lsp--registered-capability :id "efc0673f-589b-4ba3-9cd1-a322692d5763" :method "textDocument/codeAction" :options #<hash-table equal 1/65 0x5104a79d>) #s(lsp--registered-capability :id "test-id" :method "workspace/didChangeWatchedFiles" :options #<hash-table equal 1/65 0x405ccd49>)) :root "/Users/rodarwis/src/work/javallom/" :client #s(lsp--client :language-id nil :add-on? nil :new-connection (:connect (closure ((command . lsp-java--ls-command) cl-struct-lsp--log-entry-tags cl-struct-lsp-session-tags cl-struct-lsp--workspace-tags cl-struct-lsp--registered-capability-tags cl-struct-lsp--folding-range-tags cl-struct-lsp-diagnostic-tags cl-struct-lsp-watch-tags cl-struct-lsp--client-tags cl-struct-lsp--parser-tags lsp--log-lines t) (filter sentinel name) (let (... ...) (let* ... ... ... ...))) :test\? (closure ((command . lsp-java--ls-command) cl-struct-lsp--log-entry-tags cl-struct-lsp-session-tags cl-struct-lsp--workspace-tags cl-struct-lsp--registered-capability-tags cl-struct-lsp--folding-range-tags cl-struct-lsp-diagnostic-tags cl-struct-lsp-watch-tags cl-struct-lsp--client-tags cl-struct-lsp--parser-tags lsp--log-lines t) nil (lsp-server-present\? (lsp-resolve-final-function command)))) :ignore-regexps nil :ignore-messages nil :notification-handlers #<hash-table equal 4/65 0x50eb9e7d> :request-handlers #<hash-table equal 1/65 0x50eba0ad> :response-handlers #<hash-table eql 1/65 0x50ebcb2d> :prefix-function nil :uri-handlers #<hash-table equal 2/65 0x50ebc835> :action-handlers #<hash-table equal 9/65 0x50eba0cd> :major-modes (java-mode) :activation-fn nil :priority 0 :server-id jdtls :multi-root t :initialization-options (closure (t) nil (list :settings (lsp-configuration-section "java") :extendedClientCapabilities (list :progressReportProvider t :classFileContentsSupport t :progressReportProvider t :classFileContentsSupport t :overrideMethodsPromptSupport t :hashCodeEqualsPromptSupport t :advancedOrganizeImportsSupport t :generateConstructorsPromptSupport t :generateToStringPromptSupport t :advancedGenerateAccessorsSupport t :advancedExtractRefactoringSupport t :moveRefactoringSupport t) :bundles (lsp-java--bundles) :workspaceFolders (apply (function vector) (-map ... ...)))) :custom-capabilities nil :library-folders-fn (closure (t) (_workspace) (list lsp-java-workspace-cache-dir)) :before-file-open-fn (closure (t) (workspace) (let ((metadata-file-name ...)) (set (make-local-variable ...) (if ... ...)))) :initialized-fn (closure (t) (workspace) (let ((lsp--cur-workspace workspace)) (lsp--set-configuration (lsp-configuration-section "java")) (lsp--server-register-capability (let ... ... ... ... ht-temp)))) :remote? nil :completion-in-comments? t :path->uri-fn nil :uri->path-fn nil) :host-root nil :proc #<process jdtls> :cmd-proc #<process jdtls> :buffers (#<buffer ShovelRunner.java>) :highlight-overlays #<hash-table eq 0/65 0x418fe9a1> :semantic-highlighting-faces nil :extra-client-capabilities nil :status initialized :metadata #<hash-table equal 0/65 0x419071dd> :watches #<hash-table equal 0/65 0x4197f3fd> :workspace-folders nil :last-id 0 :status-string "::Started" :shutdown-action nil :diagnostics #<hash-table equal 334/487 0x4197f381> :ewoc nil)) "Global workspace symbols: " nil)
  lsp-ivy-global-workspace-symbol(nil)
  funcall-interactively(lsp-ivy-global-workspace-symbol nil)
  call-interactively(lsp-ivy-global-workspace-symbol record nil)
  command-execute(lsp-ivy-global-workspace-symbol record)
  counsel-M-x-action("lsp-ivy-global-workspace-symbol")
  funcall(counsel-M-x-action "lsp-ivy-global-workspace-symbol")
  (closure ((dir) (action . counsel-M-x-action) t) (x) (let ((cand x)) (if (listp cand) (progn (setq cand (car x)))) (if dir (progn (setq cand (file-relative-name cand dir)))) (prescient-remember cand)) (funcall action x))("lsp-ivy-global-workspace-symbol")
  funcall((closure ((dir) (action . counsel-M-x-action) t) (x) (let ((cand x)) (if (listp cand) (progn (setq cand (car x)))) (if dir (progn (setq cand (file-relative-name cand dir)))) (prescient-remember cand)) (funcall action x)) "lsp-ivy-global-workspace-symbol")
  (if ivy-marked-candidates (let ((prefix-len (length ivy-mark-prefix))) (setq ivy-marked-candidates (mapcar (function (lambda (s) (substring s prefix-len))) ivy-marked-candidates)) (if (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) ivy-last))) (aref ivy-last 26)) (funcall (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list ... ivy-last))) (aref ivy-last 26)) ivy-marked-candidates) (let ((--dolist-tail-- ivy-marked-candidates)) (while --dolist-tail-- (let ((c ...)) (let (...) (funcall action c)) (setq --dolist-tail-- (cdr --dolist-tail--))))))) (funcall action x))
  (unwind-protect (if ivy-marked-candidates (let ((prefix-len (length ivy-mark-prefix))) (setq ivy-marked-candidates (mapcar (function (lambda (s) (substring s prefix-len))) ivy-marked-candidates)) (if (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list ... ivy-last))) (aref ivy-last 26)) (funcall (progn (or (and ... t) (signal ... ...)) (aref ivy-last 26)) ivy-marked-candidates) (let ((--dolist-tail-- ivy-marked-candidates)) (while --dolist-tail-- (let (...) (let ... ...) (setq --dolist-tail-- ...)))))) (funcall action x)) (ivy-recursive-restore))
  (prog1 (unwind-protect (if ivy-marked-candidates (let ((prefix-len (length ivy-mark-prefix))) (setq ivy-marked-candidates (mapcar (function (lambda ... ...)) ivy-marked-candidates)) (if (progn (or (and ... t) (signal ... ...)) (aref ivy-last 26)) (funcall (progn (or ... ...) (aref ivy-last 26)) ivy-marked-candidates) (let ((--dolist-tail-- ivy-marked-candidates)) (while --dolist-tail-- (let ... ... ...))))) (funcall action x)) (ivy-recursive-restore)) (if (or (eq ivy-exit (quote done)) (minibuffer-window-active-p (selected-window)) (null (active-minibuffer-window))) nil (select-window (active-minibuffer-window))))
  (if (eq action (function identity)) (prog1 x (ivy-recursive-restore)) (select-window (ivy--get-window ivy-last)) (set-buffer (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) ivy-last))) (aref ivy-last 13))) (prog1 (unwind-protect (if ivy-marked-candidates (let ((prefix-len (length ivy-mark-prefix))) (setq ivy-marked-candidates (mapcar (function ...) ivy-marked-candidates)) (if (progn (or ... ...) (aref ivy-last 26)) (funcall (progn ... ...) ivy-marked-candidates) (let (...) (while --dolist-tail-- ...)))) (funcall action x)) (ivy-recursive-restore)) (if (or (eq ivy-exit (quote done)) (minibuffer-window-active-p (selected-window)) (null (active-minibuffer-window))) nil (select-window (active-minibuffer-window)))))
  (let* ((collection (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) ivy-last))) (aref ivy-last 2))) (current (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) ivy-last))) (aref ivy-last 23))) (x (cond ((and (consp (car-safe collection)) (let (...) (if idx ... ...)))) (ivy--directory (expand-file-name current ivy--directory)) ((equal current "") ivy-text) (t current)))) (if (eq action (function identity)) (prog1 x (ivy-recursive-restore)) (select-window (ivy--get-window ivy-last)) (set-buffer (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) ivy-last))) (aref ivy-last 13))) (prog1 (unwind-protect (if ivy-marked-candidates (let ((prefix-len ...)) (setq ivy-marked-candidates (mapcar ... ivy-marked-candidates)) (if (progn ... ...) (funcall ... ivy-marked-candidates) (let ... ...))) (funcall action x)) (ivy-recursive-restore)) (if (or (eq ivy-exit (quote done)) (minibuffer-window-active-p (selected-window)) (null (active-minibuffer-window))) nil (select-window (active-minibuffer-window))))))
  (progn (let* ((collection (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list ... ivy-last))) (aref ivy-last 2))) (current (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list ... ivy-last))) (aref ivy-last 23))) (x (cond ((and (consp ...) (let ... ...))) (ivy--directory (expand-file-name current ivy--directory)) ((equal current "") ivy-text) (t current)))) (if (eq action (function identity)) (prog1 x (ivy-recursive-restore)) (select-window (ivy--get-window ivy-last)) (set-buffer (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list ... ivy-last))) (aref ivy-last 13))) (prog1 (unwind-protect (if ivy-marked-candidates (let (...) (setq ivy-marked-candidates ...) (if ... ... ...)) (funcall action x)) (ivy-recursive-restore)) (if (or (eq ivy-exit (quote done)) (minibuffer-window-active-p (selected-window)) (null (active-minibuffer-window))) nil (select-window (active-minibuffer-window)))))))
  (if action (progn (let* ((collection (progn (or (and ... t) (signal ... ...)) (aref ivy-last 2))) (current (progn (or (and ... t) (signal ... ...)) (aref ivy-last 23))) (x (cond ((and ... ...)) (ivy--directory (expand-file-name current ivy--directory)) ((equal current "") ivy-text) (t current)))) (if (eq action (function identity)) (prog1 x (ivy-recursive-restore)) (select-window (ivy--get-window ivy-last)) (set-buffer (progn (or (and ... t) (signal ... ...)) (aref ivy-last 13))) (prog1 (unwind-protect (if ivy-marked-candidates (let ... ... ...) (funcall action x)) (ivy-recursive-restore)) (if (or (eq ivy-exit ...) (minibuffer-window-active-p ...) (null ...)) nil (select-window (active-minibuffer-window))))))))
  (let ((action (if (functionp ivy-inhibit-action) ivy-inhibit-action (and (not ivy-inhibit-action) (ivy--get-action ivy-last))))) (if action (progn (let* ((collection (progn (or ... ...) (aref ivy-last 2))) (current (progn (or ... ...) (aref ivy-last 23))) (x (cond (...) (ivy--directory ...) (... ivy-text) (t current)))) (if (eq action (function identity)) (prog1 x (ivy-recursive-restore)) (select-window (ivy--get-window ivy-last)) (set-buffer (progn (or ... ...) (aref ivy-last 13))) (prog1 (unwind-protect (if ivy-marked-candidates ... ...) (ivy-recursive-restore)) (if (or ... ... ...) nil (select-window ...))))))))
  ivy-call()
  (let* ((ivy-recursive-last (and (active-minibuffer-window) ivy-last)) (ivy--display-function (if (or ivy-recursive-last (not (window-minibuffer-p))) (progn (ivy-alist-setting ivy-display-functions-alist caller)))) result) (setq update-fn (or update-fn (ivy-alist-setting ivy-update-fns-alist caller))) (setq unwind (or unwind (ivy-alist-setting ivy-unwind-fns-alist caller))) (setq ivy-last (make-ivy-state :prompt prompt :collection collection :predicate predicate :require-match require-match :initial-input initial-input :history history :preselect preselect :keymap keymap :update-fn (if (eq update-fn (quote auto)) (function (lambda nil (let (...) (save-current-buffer ...)))) update-fn) :sort sort :action (ivy--compute-extra-actions action caller) :multi-action multi-action :frame (selected-frame) :window (selected-window) :buffer (current-buffer) :unwind unwind :re-builder re-builder :matcher matcher :dynamic-collection dynamic-collection :display-transformer-fn (plist-get ivy--display-transformers-list caller) :directory default-directory :extra-props extra-props :caller caller :def def)) (ivy--reset-state ivy-last) (unwind-protect (let ((fun (function ivy--minibuffer-setup)) setup-hook) (setq setup-hook (function (lambda nil (remove-hook (quote minibuffer-setup-hook) setup-hook) (funcall fun)))) (unwind-protect (progn (add-hook (quote minibuffer-setup-hook) setup-hook) (let* ((hist ...) (minibuffer-completion-table collection) (minibuffer-completion-predicate predicate) (ivy-height ...) (resize-mini-windows ...)) (if (and ivy-auto-select-single-candidate ivy--all-candidates ...) (progn ... ...) (read-from-minibuffer prompt ... ... nil hist)) (if (eq ivy-exit ...) (progn ...)) (setq result (progn ... ...)))) (remove-hook (quote minibuffer-setup-hook) setup-hook))) (ivy--cleanup)) (ivy-call) (ivy--remove-props (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) ivy-last))) (aref ivy-last 23)) (quote idx)) result)
  (progn (if (equal overriding-local-map (quote (keymap))) (progn (keyboard-quit))) (setq caller (or caller this-command)) (let* ((ivy-recursive-last (and (active-minibuffer-window) ivy-last)) (ivy--display-function (if (or ivy-recursive-last (not (window-minibuffer-p))) (progn (ivy-alist-setting ivy-display-functions-alist caller)))) result) (setq update-fn (or update-fn (ivy-alist-setting ivy-update-fns-alist caller))) (setq unwind (or unwind (ivy-alist-setting ivy-unwind-fns-alist caller))) (setq ivy-last (make-ivy-state :prompt prompt :collection collection :predicate predicate :require-match require-match :initial-input initial-input :history history :preselect preselect :keymap keymap :update-fn (if (eq update-fn (quote auto)) (function (lambda nil (let ... ...))) update-fn) :sort sort :action (ivy--compute-extra-actions action caller) :multi-action multi-action :frame (selected-frame) :window (selected-window) :buffer (current-buffer) :unwind unwind :re-builder re-builder :matcher matcher :dynamic-collection dynamic-collection :display-transformer-fn (plist-get ivy--display-transformers-list caller) :directory default-directory :extra-props extra-props :caller caller :def def)) (ivy--reset-state ivy-last) (unwind-protect (let ((fun (function ivy--minibuffer-setup)) setup-hook) (setq setup-hook (function (lambda nil (remove-hook ... setup-hook) (funcall fun)))) (unwind-protect (progn (add-hook (quote minibuffer-setup-hook) setup-hook) (let* (... ... ... ... ...) (if ... ... ...) (if ... ...) (setq result ...))) (remove-hook (quote minibuffer-setup-hook) setup-hook))) (ivy--cleanup)) (ivy-call) (ivy--remove-props (progn (or (and (memq (type-of ivy-last) cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list (quote ivy-state) ivy-last))) (aref ivy-last 23)) (quote idx)) result))
  (progn (let ((--cl-keys-- --cl-rest--)) (while --cl-keys-- (cond ((memq (car --cl-keys--) (quote (:predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :multi-action :unwind :re-builder :matcher :dynamic-collection :extra-props :caller :allow-other-keys))) (setq --cl-keys-- (cdr (cdr --cl-keys--)))) ((car (cdr (memq ... --cl-rest--))) (setq --cl-keys-- nil)) (t (error "Keyword argument %s not one of (:predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :multi-action :unwind :re-builder :matcher :dynamic-collection :extra-props :caller)" (car --cl-keys--)))))) (progn (if (equal overriding-local-map (quote (keymap))) (progn (keyboard-quit))) (setq caller (or caller this-command)) (let* ((ivy-recursive-last (and (active-minibuffer-window) ivy-last)) (ivy--display-function (if (or ivy-recursive-last (not ...)) (progn (ivy-alist-setting ivy-display-functions-alist caller)))) result) (setq update-fn (or update-fn (ivy-alist-setting ivy-update-fns-alist caller))) (setq unwind (or unwind (ivy-alist-setting ivy-unwind-fns-alist caller))) (setq ivy-last (make-ivy-state :prompt prompt :collection collection :predicate predicate :require-match require-match :initial-input initial-input :history history :preselect preselect :keymap keymap :update-fn (if (eq update-fn (quote auto)) (function (lambda nil ...)) update-fn) :sort sort :action (ivy--compute-extra-actions action caller) :multi-action multi-action :frame (selected-frame) :window (selected-window) :buffer (current-buffer) :unwind unwind :re-builder re-builder :matcher matcher :dynamic-collection dynamic-collection :display-transformer-fn (plist-get ivy--display-transformers-list caller) :directory default-directory :extra-props extra-props :caller caller :def def)) (ivy--reset-state ivy-last) (unwind-protect (let ((fun (function ivy--minibuffer-setup)) setup-hook) (setq setup-hook (function (lambda nil ... ...))) (unwind-protect (progn (add-hook ... setup-hook) (let* ... ... ... ...)) (remove-hook (quote minibuffer-setup-hook) setup-hook))) (ivy--cleanup)) (ivy-call) (ivy--remove-props (progn (or (and (memq ... cl-struct-ivy-state-tags) t) (signal (quote wrong-type-argument) (list ... ivy-last))) (aref ivy-last 23)) (quote idx)) result)))
  (let* ((predicate (car (cdr (plist-member --cl-rest-- (quote :predicate))))) (require-match (car (cdr (plist-member --cl-rest-- (quote :require-match))))) (initial-input (car (cdr (plist-member --cl-rest-- (quote :initial-input))))) (history (car (cdr (plist-member --cl-rest-- (quote :history))))) (preselect (car (cdr (plist-member --cl-rest-- (quote :preselect))))) (def (car (cdr (plist-member --cl-rest-- (quote :def))))) (keymap (car (cdr (plist-member --cl-rest-- (quote :keymap))))) (update-fn (car (cdr (plist-member --cl-rest-- (quote :update-fn))))) (sort (car (cdr (plist-member --cl-rest-- (quote :sort))))) (action (car (cdr (plist-member --cl-rest-- (quote :action))))) (multi-action (car (cdr (plist-member --cl-rest-- (quote :multi-action))))) (unwind (car (cdr (plist-member --cl-rest-- (quote :unwind))))) (re-builder (car (cdr (plist-member --cl-rest-- (quote :re-builder))))) (matcher (car (cdr (plist-member --cl-rest-- (quote :matcher))))) (dynamic-collection (car (cdr (plist-member --cl-rest-- (quote :dynamic-collection))))) (extra-props (car (cdr (plist-member --cl-rest-- (quote :extra-props))))) (caller (car (cdr (plist-member --cl-rest-- (quote :caller)))))) (progn (let ((--cl-keys-- --cl-rest--)) (while --cl-keys-- (cond ((memq (car --cl-keys--) (quote ...)) (setq --cl-keys-- (cdr ...))) ((car (cdr ...)) (setq --cl-keys-- nil)) (t (error "Keyword argument %s not one of (:predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :multi-action :unwind :re-builder :matcher :dynamic-collection :extra-props :caller)" (car --cl-keys--)))))) (progn (if (equal overriding-local-map (quote (keymap))) (progn (keyboard-quit))) (setq caller (or caller this-command)) (let* ((ivy-recursive-last (and (active-minibuffer-window) ivy-last)) (ivy--display-function (if (or ivy-recursive-last ...) (progn ...))) result) (setq update-fn (or update-fn (ivy-alist-setting ivy-update-fns-alist caller))) (setq unwind (or unwind (ivy-alist-setting ivy-unwind-fns-alist caller))) (setq ivy-last (make-ivy-state :prompt prompt :collection collection :predicate predicate :require-match require-match :initial-input initial-input :history history :preselect preselect :keymap keymap :update-fn (if (eq update-fn ...) (function ...) update-fn) :sort sort :action (ivy--compute-extra-actions action caller) :multi-action multi-action :frame (selected-frame) :window (selected-window) :buffer (current-buffer) :unwind unwind :re-builder re-builder :matcher matcher :dynamic-collection dynamic-collection :display-transformer-fn (plist-get ivy--display-transformers-list caller) :directory default-directory :extra-props extra-props :caller caller :def def)) (ivy--reset-state ivy-last) (unwind-protect (let ((fun ...) setup-hook) (setq setup-hook (function ...)) (unwind-protect (progn ... ...) (remove-hook ... setup-hook))) (ivy--cleanup)) (ivy-call) (ivy--remove-props (progn (or (and ... t) (signal ... ...)) (aref ivy-last 23)) (quote idx)) result))))
  (closure (avy-handler-function avy-styles-alist avy-style avy-keys-alist avy-keys avy-action avy-all-windows cl-struct-ivy-state-tags t) (prompt collection &rest --cl-rest--) "Read a string in the minibuffer, with completion.\n\nPROMPT is a string, normally ending in a colon and a space.\n`ivy-count-format' is prepended to PROMPT during completion.\n\nCOLLECTION is either a list of strings, a function, an alist, or\na hash table, supplied for `minibuffer-completion-table'.\n\nPREDICATE is applied to filter out the COLLECTION immediately.\nThis argument is for compatibility with `completing-read'.\n\nWhen REQUIRE-MATCH is non-nil, only members of COLLECTION can be\nselected.\n\nIf INITIAL-INPUT is non-nil, then insert that input in the\nminibuffer initially.\n\nHISTORY is a name of a variable to hold the completion session\nhistory.\n\nKEYMAP is composed with `ivy-minibuffer-map'.\n\nPRESELECT, when non-nil, determines which one of the candidates\nmatching INITIAL-INPUT to select initially.  An integer stands\nfor the position of the desired candidate in the collection,\ncounting from zero.  Otherwise, use the first occurrence of\nPRESELECT in the collection.  Comparison is first done with\n`equal'.  If that fails, and when applicable, match PRESELECT as\na regular expression.\n\nDEF is for compatibility with `completing-read'.\n\nUPDATE-FN is called each time the candidate list is re-displayed.\n\nWhen SORT is non-nil, `ivy-sort-functions-alist' determines how\nto sort candidates before displaying them.\n\nACTION is a function to call after selecting a candidate.\nIt takes one argument, the selected candidate. If COLLECTION is\nan alist, the argument is a cons cell, otherwise it's a string.\n\nMULTI-ACTION, when non-nil, is called instead of ACTION when\nthere are marked candidates. It takes the list of candidates as\nits only argument. When it's nil, ACTION is called on each marked\ncandidate.\n\nUNWIND is a function of no arguments to call before exiting.\n\nRE-BUILDER is a function transforming input text into a regex\npattern.\n\nMATCHER is a function which can override how candidates are\nfiltered based on user input.  It takes a regex pattern and a\nlist of candidates, and returns the list of matching candidates.\n\nDYNAMIC-COLLECTION is a boolean specifying whether the list of\ncandidates is updated after each input by calling COLLECTION.\n\nEXTRA-PROPS can be used to store collection-specific\nsession-specific data.\n\nCALLER is a symbol to uniquely identify the caller to `ivy-read'.\nIt is used, along with COLLECTION, to determine which\ncustomizations apply to the current completion session.\n\n(fn PROMPT COLLECTION &key PREDICATE REQUIRE-MATCH INITIAL-INPUT HISTORY PRESELECT DEF KEYMAP UPDATE-FN SORT ACTION MULTI-ACTION UNWIND RE-BUILDER MATCHER DYNAMIC-COLLECTION EXTRA-PROPS CALLER)" (let* ((predicate (car (cdr (plist-member --cl-rest-- (quote :predicate))))) (require-match (car (cdr (plist-member --cl-rest-- (quote :require-match))))) (initial-input (car (cdr (plist-member --cl-rest-- (quote :initial-input))))) (history (car (cdr (plist-member --cl-rest-- (quote :history))))) (preselect (car (cdr (plist-member --cl-rest-- (quote :preselect))))) (def (car (cdr (plist-member --cl-rest-- (quote :def))))) (keymap (car (cdr (plist-member --cl-rest-- (quote :keymap))))) (update-fn (car (cdr (plist-member --cl-rest-- (quote :update-fn))))) (sort (car (cdr (plist-member --cl-rest-- (quote :sort))))) (action (car (cdr (plist-member --cl-rest-- (quote :action))))) (multi-action (car (cdr (plist-member --cl-rest-- (quote :multi-action))))) (unwind (car (cdr (plist-member --cl-rest-- (quote :unwind))))) (re-builder (car (cdr (plist-member --cl-rest-- (quote :re-builder))))) (matcher (car (cdr (plist-member --cl-rest-- (quote :matcher))))) (dynamic-collection (car (cdr (plist-member --cl-rest-- (quote :dynamic-collection))))) (extra-props (car (cdr (plist-member --cl-rest-- (quote :extra-props))))) (caller (car (cdr (plist-member --cl-rest-- (quote :caller)))))) (progn (let ((--cl-keys-- --cl-rest--)) (while --cl-keys-- (cond ((memq ... ...) (setq --cl-keys-- ...)) ((car ...) (setq --cl-keys-- nil)) (t (error "Keyword argument %s not one of (:predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :multi-action :unwind :re-builder :matcher :dynamic-collection :extra-props :caller)" ...))))) (progn (if (equal overriding-local-map (quote (keymap))) (progn (keyboard-quit))) (setq caller (or caller this-command)) (let* ((ivy-recursive-last (and ... ivy-last)) (ivy--display-function (if ... ...)) result) (setq update-fn (or update-fn (ivy-alist-setting ivy-update-fns-alist caller))) (setq unwind (or unwind (ivy-alist-setting ivy-unwind-fns-alist caller))) (setq ivy-last (make-ivy-state :prompt prompt :collection collection :predicate predicate :require-match require-match :initial-input initial-input :history history :preselect preselect :keymap keymap :update-fn (if ... ... update-fn) :sort sort :action (ivy--compute-extra-actions action caller) :multi-action multi-action :frame (selected-frame) :window (selected-window) :buffer (current-buffer) :unwind unwind :re-builder re-builder :matcher matcher :dynamic-collection dynamic-collection :display-transformer-fn (plist-get ivy--display-transformers-list caller) :directory default-directory :extra-props extra-props :caller caller :def def)) (ivy--reset-state ivy-last) (unwind-protect (let (... setup-hook) (setq setup-hook ...) (unwind-protect ... ...)) (ivy--cleanup)) (ivy-call) (ivy--remove-props (progn (or ... ...) (aref ivy-last 23)) (quote idx)) result)))))("M-x " [lispy-brackets-auto-wrap Post\ Handshake\ Auth max-iterations epg-context-signers locals 0 -is-infix\? vc-git-stash-snapshot denied avy-words counsel-alias-expand magit-reflog-commit bbdb-current-record hydra-lispy-x/lispy-flatten-and-exit org-emphasis-regexp-components gnus-info-set-score url-cookie-multiple-line url-scheme-registry javascript-callback nnmail-fix-eudora-headers flycheck-error-list-mode-line-map resourceOperations gnus-summary-recenter avl-tree--stack-store--cmacro cl-print--preprocess matched-string tls-success :examined org-agenda-regexp-filter-preset bibtex-SuppCollection 0 IBM\ Plex\ Sans\ Condensed checkdoc-package-keywords-flag being \" gnus-tree-buffer $ nnheader-translate-file-chars scale \' nnoo-import-1 gnus-summary-catchup-from-here :contents org-babel-results-keyword request-list sgml-tag-name--cmacro grep-p gnus-data-mark lispy-bind-variable doc-view-pdf/ps->png ...] :predicate (closure ((externs) (initial-input) smex-ido-cache smex-initialized-p amx-cache amx-initialized info-lookup-mode t) (sym) (and (commandp sym) (not (get sym (quote byte-obsolete-info))) (not (get sym (quote no-counsel-M-x))))) :require-match t :history counsel-M-x-history :action counsel-M-x-action :keymap (keymap (67108908 . counsel--info-lookup-symbol) (67108910 . counsel-find-symbol)) :initial-input nil :caller counsel-M-x :sort t)
  apply((closure (avy-handler-function avy-styles-alist avy-style avy-keys-alist avy-keys avy-action avy-all-windows cl-struct-ivy-state-tags t) (prompt collection &rest --cl-rest--) "Read a string in the minibuffer, with completion.\n\nPROMPT is a string, normally ending in a colon and a space.\n`ivy-count-format' is prepended to PROMPT during completion.\n\nCOLLECTION is either a list of strings, a function, an alist, or\na hash table, supplied for `minibuffer-completion-table'.\n\nPREDICATE is applied to filter out the COLLECTION immediately.\nThis argument is for compatibility with `completing-read'.\n\nWhen REQUIRE-MATCH is non-nil, only members of COLLECTION can be\nselected.\n\nIf INITIAL-INPUT is non-nil, then insert that input in the\nminibuffer initially.\n\nHISTORY is a name of a variable to hold the completion session\nhistory.\n\nKEYMAP is composed with `ivy-minibuffer-map'.\n\nPRESELECT, when non-nil, determines which one of the candidates\nmatching INITIAL-INPUT to select initially.  An integer stands\nfor the position of the desired candidate in the collection,\ncounting from zero.  Otherwise, use the first occurrence of\nPRESELECT in the collection.  Comparison is first done with\n`equal'.  If that fails, and when applicable, match PRESELECT as\na regular expression.\n\nDEF is for compatibility with `completing-read'.\n\nUPDATE-FN is called each time the candidate list is re-displayed.\n\nWhen SORT is non-nil, `ivy-sort-functions-alist' determines how\nto sort candidates before displaying them.\n\nACTION is a function to call after selecting a candidate.\nIt takes one argument, the selected candidate. If COLLECTION is\nan alist, the argument is a cons cell, otherwise it's a string.\n\nMULTI-ACTION, when non-nil, is called instead of ACTION when\nthere are marked candidates. It takes the list of candidates as\nits only argument. When it's nil, ACTION is called on each marked\ncandidate.\n\nUNWIND is a function of no arguments to call before exiting.\n\nRE-BUILDER is a function transforming input text into a regex\npattern.\n\nMATCHER is a function which can override how candidates are\nfiltered based on user input.  It takes a regex pattern and a\nlist of candidates, and returns the list of matching candidates.\n\nDYNAMIC-COLLECTION is a boolean specifying whether the list of\ncandidates is updated after each input by calling COLLECTION.\n\nEXTRA-PROPS can be used to store collection-specific\nsession-specific data.\n\nCALLER is a symbol to uniquely identify the caller to `ivy-read'.\nIt is used, along with COLLECTION, to determine which\ncustomizations apply to the current completion session.\n\n(fn PROMPT COLLECTION &key PREDICATE REQUIRE-MATCH INITIAL-INPUT HISTORY PRESELECT DEF KEYMAP UPDATE-FN SORT ACTION MULTI-ACTION UNWIND RE-BUILDER MATCHER DYNAMIC-COLLECTION EXTRA-PROPS CALLER)" (let* ((predicate (car (cdr (plist-member --cl-rest-- ...)))) (require-match (car (cdr (plist-member --cl-rest-- ...)))) (initial-input (car (cdr (plist-member --cl-rest-- ...)))) (history (car (cdr (plist-member --cl-rest-- ...)))) (preselect (car (cdr (plist-member --cl-rest-- ...)))) (def (car (cdr (plist-member --cl-rest-- ...)))) (keymap (car (cdr (plist-member --cl-rest-- ...)))) (update-fn (car (cdr (plist-member --cl-rest-- ...)))) (sort (car (cdr (plist-member --cl-rest-- ...)))) (action (car (cdr (plist-member --cl-rest-- ...)))) (multi-action (car (cdr (plist-member --cl-rest-- ...)))) (unwind (car (cdr (plist-member --cl-rest-- ...)))) (re-builder (car (cdr (plist-member --cl-rest-- ...)))) (matcher (car (cdr (plist-member --cl-rest-- ...)))) (dynamic-collection (car (cdr (plist-member --cl-rest-- ...)))) (extra-props (car (cdr (plist-member --cl-rest-- ...)))) (caller (car (cdr (plist-member --cl-rest-- ...))))) (progn (let ((--cl-keys-- --cl-rest--)) (while --cl-keys-- (cond (... ...) (... ...) (t ...)))) (progn (if (equal overriding-local-map (quote ...)) (progn (keyboard-quit))) (setq caller (or caller this-command)) (let* ((ivy-recursive-last ...) (ivy--display-function ...) result) (setq update-fn (or update-fn ...)) (setq unwind (or unwind ...)) (setq ivy-last (make-ivy-state :prompt prompt :collection collection :predicate predicate :require-match require-match :initial-input initial-input :history history :preselect preselect :keymap keymap :update-fn ... :sort sort :action ... :multi-action multi-action :frame ... :window ... :buffer ... :unwind unwind :re-builder re-builder :matcher matcher :dynamic-collection dynamic-collection :display-transformer-fn ... :directory default-directory :extra-props extra-props :caller caller :def def)) (ivy--reset-state ivy-last) (unwind-protect (let ... ... ...) (ivy--cleanup)) (ivy-call) (ivy--remove-props (progn ... ...) (quote idx)) result))))) ("M-x " [lispy-brackets-auto-wrap Post\ Handshake\ Auth max-iterations epg-context-signers locals 0 -is-infix\? vc-git-stash-snapshot denied avy-words counsel-alias-expand magit-reflog-commit bbdb-current-record hydra-lispy-x/lispy-flatten-and-exit org-emphasis-regexp-components gnus-info-set-score url-cookie-multiple-line url-scheme-registry javascript-callback nnmail-fix-eudora-headers flycheck-error-list-mode-line-map resourceOperations gnus-summary-recenter avl-tree--stack-store--cmacro cl-print--preprocess matched-string tls-success :examined org-agenda-regexp-filter-preset bibtex-SuppCollection 0 IBM\ Plex\ Sans\ Condensed checkdoc-package-keywords-flag being \" gnus-tree-buffer $ nnheader-translate-file-chars scale \' nnoo-import-1 gnus-summary-catchup-from-here :contents org-babel-results-keyword request-list sgml-tag-name--cmacro grep-p gnus-data-mark lispy-bind-variable doc-view-pdf/ps->png ...] :predicate (closure ((externs) (initial-input) smex-ido-cache smex-initialized-p amx-cache amx-initialized info-lookup-mode t) (sym) (and (commandp sym) (not (get sym (quote byte-obsolete-info))) (not (get sym (quote no-counsel-M-x))))) :require-match t :history counsel-M-x-history :action counsel-M-x-action :keymap (keymap (67108908 . counsel--info-lookup-symbol) (67108910 . counsel-find-symbol)) :initial-input nil :caller counsel-M-x :sort t))
  ivy-read("M-x " [lispy-brackets-auto-wrap Post\ Handshake\ Auth max-iterations epg-context-signers locals 0 -is-infix\? vc-git-stash-snapshot denied avy-words counsel-alias-expand magit-reflog-commit bbdb-current-record hydra-lispy-x/lispy-flatten-and-exit org-emphasis-regexp-components gnus-info-set-score url-cookie-multiple-line url-scheme-registry javascript-callback nnmail-fix-eudora-headers flycheck-error-list-mode-line-map resourceOperations gnus-summary-recenter avl-tree--stack-store--cmacro cl-print--preprocess matched-string tls-success :examined org-agenda-regexp-filter-preset bibtex-SuppCollection 0 IBM\ Plex\ Sans\ Condensed checkdoc-package-keywords-flag being \" gnus-tree-buffer $ nnheader-translate-file-chars scale \' nnoo-import-1 gnus-summary-catchup-from-here :contents org-babel-results-keyword request-list sgml-tag-name--cmacro grep-p gnus-data-mark lispy-bind-variable doc-view-pdf/ps->png ...] :predicate (closure ((externs) (initial-input) smex-ido-cache smex-initialized-p amx-cache amx-initialized info-lookup-mode t) (sym) (and (commandp sym) (not (get sym (quote byte-obsolete-info))) (not (get sym (quote no-counsel-M-x))))) :require-match t :history counsel-M-x-history :action counsel-M-x-action :keymap (keymap (67108908 . counsel--info-lookup-symbol) (67108910 . counsel-find-symbol)) :initial-input nil :caller counsel-M-x)
  (let ((externs (counsel--M-x-externs))) (ivy-read (counsel--M-x-prompt) (or externs obarray) :predicate (if externs (function (lambda (x) (not (get (intern x) (quote no-counsel-M-x))))) (function (lambda (sym) (and (commandp sym) (not (get sym ...)) (not (get sym ...)))))) :require-match t :history (quote counsel-M-x-history) :action (function counsel-M-x-action) :keymap counsel-describe-map :initial-input initial-input :caller (quote counsel-M-x)))
  counsel-M-x()
  funcall-interactively(counsel-M-x)
  call-interactively(counsel-M-x nil nil)
  command-execute(counsel-M-x)

[sebastiansturm]

I have tried but have so far been unable to reproduce this issue (both with ccls and clangd backends, with ivy-dynamic-exhibit-delay-ms set to different values and both with and without recursive minibuffer use). In theory, the collection function passed to ivy-read should at first return 0 to indicate that no results are ready yet, which is then converted by ivy to an empty candidate list within ivy--exhibit.
I do see a very similar error (wrong-type-argument sequencep 0 after trying to do something with ivy--all-candidates) when loading ivy 0.12.0 instead of 0.13.0.
As you said you're running ivy from melpa, I guess you are using 0.13.0, but could you double-check? Should you be using 0.13.0, maybe you could provide me with further hints on how to reproduce the issue on my machine? Does it happen every time or randomly? If randomly, at what rate?

[r-darwish]

I'm using the latest Ivy from git. Here is my configuration. I'm using Emacs on macOS and I tried testing this package with a Java project.

[yyjjl]

When using ivy 0.13.0, the first call to the collection function is inivy--reset-state instead of ivy--exhibit.
Maybe the first call to the collection function should not return 0.

[sebastiansturm]

Thanks for the hint, I'll have a look at that when I'm back home this evening

[sebastiansturm]

I think you are right (with the diagnosis though I still think the API recommends returning 0); the issue apparently wasn't reproducible here because my ivy config doesn't sort by default (adding :sort t to the ivy-read call within lsp-ivy--workspace-symbol triggers the same error here, and I assume :sort nil can be used to work around the issue until we have a proper fix).
@abo-abo: am I doing something wrong here, or is this a bug in the async API? I think the other current user is counsel-google which may not exhibit the same issue due to having ivy-more-chars return an initial list of dummy candidates?

[abo-abo]

I've added code to fix this particular stack trace. Please test to see if it works correctly.

[sebastiansturm]

thanks, but I'm afraid it doesn't (it may fix the first error case, but not the second). The lines causing stack trace 2 are ivy.el:2322 to ivy.el:2328:

(when (and sort
           (or (functionp collection)
               (not (eq history 'org-refile-history)))
           (setq sort-fn (ivy--sort-function
                          (if (functionp collection) collection caller)))
           (null (nthcdr ivy-sort-max-size coll))) ;; tries to call (nthcdr <some number> 0)
  (setq coll (sort (copy-sequence coll) sort-fn)))

[abo-abo]

@sebastiansturm Thanks for the pointer. Please test again.

[sebastiansturm]

as far as I can tell, this fixes it --- thank you! If no one comes up with another way to trigger this error during the day, I'll close this issue