Andersbakken / rtags

A client/server indexer for c/c++/objc[++] with integration for Emacs based on clang.
http://www.rtags.net
GNU General Public License v3.0
1.83k stars 252 forks source link

When I used rtags-find-symbol-at-point(), "Wrong type argument: number-or-market-p, \"Aborted\"" was printed #1187

Closed witnessJo closed 6 years ago

witnessJo commented 6 years ago

Please mark appropriate

Problem description

Describe briefly the problem. I'm developing some c++ projects with emacs on CentOS 7.3. But I have faced some problems. If I pressed "C-c r ." to use "rtags-find-symbol-at-point ()" Follow message was showing. Wrong type argument: number-or-market-p, "Aborted" image I have indexed the project with makefile image

Expected behavior

Just go to the definition of the function.....

Actual behavior

Describe what actually happened.

Environment

image

Feature request

Enough~ uukj

bradprob commented 6 years ago

Same issue after building the latest version of Rtags! rtags-symbol-info-internal: Wrong type argument: number-or-marker-p, "Aborted" [3 times]

wuliuxiansheng commented 6 years ago

I encountered the same issue on Ubuntu 14.04 with Emacs 25.3.

xuning97 commented 6 years ago

I encountered the same issue with Emacs 26.1 on CentOS

casch-at commented 6 years ago

Any chance someone can post a backtrace...toggle-debug-on-error? Are there multiple rtags.elc files in the load path, byte-compiled with a different Emacs version?

bradprob commented 6 years ago

Debugger entered--Lisp error: (wrong-type-argument number-or-marker-p "Aborted") rtags-call-rc(:path "/home/xxx/project/src/program.cpp" :noerror t :silent-query nil "-U" "/home/xxx/project/program.cpp:104:12:" "--elisp" "-K" nil nil nil nil) rtags-symbol-info-internal(:location nil) rtags-current-symbol-name() rtags-current-symbol() rtags-find-symbol-at-point(nil) funcall-interactively(rtags-find-symbol-at-point nil) call-interactively(rtags-find-symbol-at-point nil nil) command-execute(rtags-find-symbol-at-point)

No multiple rtags.elc.

sree314 commented 6 years ago

[No multiple rtags.elc, and only one version of Emacs on the system]

Debugger entered--Lisp error: (wrong-type-argument number-or-marker-p "Aborted") =("Aborted" 0) (cond ((= result rtags-exit-code-success) (if rtags-autostart-diagnostics (progn (rtags-diagnostics)))) ((= result rtags-exit-code-connection-failure) (if output (progn (erase-buffer))) (setq rtags-last-request-not-connected t) (if noerror nil (rtags--error (quote rtags-rdm-not-running)))) ((= result rtags-exit-code-protocol-failure) (if output (progn (erase-buffer))) (if noerror nil (rtags--error (quote rtags-protocol-mismatch)))) ((= result rtags-exit-code-not-indexed) (if noerror nil (rtags--message (quote rtags-file-not-indexed) (or path "buffer"))) (erase-buffer) (setq rtags-last-request-not-indexed t)) (t)) (save-excursion (cond ((= result rtags-exit-code-success) (if rtags-autostart-diagnostics (progn (rtags-diagnostics)))) ((= result rtags-exit-code-connection-failure) (if output (progn (erase-buffer))) (setq rtags-last-request-not-connected t) (if noerror nil (rtags--error (quote rtags-rdm-not-running)))) ((= result rtags-exit-code-protocol-failure) (if output (progn (erase-buffer))) (if noerror nil (rtags--error (quote rtags-protocol-mismatch)))) ((= result rtags-exit-code-not-indexed) (if noerror nil (rtags--message (quote rtags-file-not-indexed) (or path "buffer"))) (erase-buffer) (setq rtags-last-request-not-indexed t)) (t))) (if (processp result) (progn (set-process-query-on-exit-flag result nil) (if (car async) (progn (set-process-filter result (car async)))) (if (cdr async) (progn (set-process-sentinel result (cdr async))))) (goto-char (point-min)) (save-excursion (cond ((= result rtags-exit-code-success) (if rtags-autostart-diagnostics (progn (rtags-diagnostics)))) ((= result rtags-exit-code-connection-failure) (if output (progn (erase-buffer))) (setq rtags-last-request-not-connected t) (if noerror nil (rtags--error (quote rtags-rdm-not-running)))) ((= result rtags-exit-code-protocol-failure) (if output (progn (erase-buffer))) (if noerror nil (rtags--error (quote rtags-protocol-mismatch)))) ((= result rtags-exit-code-not-indexed) (if noerror nil (rtags--message (quote rtags-file-not-indexed) (or path "buffer"))) (erase-buffer) (setq rtags-last-request-not-indexed t)) (t)))) (let ((result (cond ((and unsaved async) (let ((proc ...)) (save-current-buffer (set-buffer unsaved) (save-restriction ... ...)) proc)) (async (apply (function start-file-process) "rc" (current-buffer) rc arguments)) ((and unsaved (or (buffer-modified-p unsaved) (not ...))) (save-current-buffer (set-buffer unsaved) (save-restriction (widen) (apply ... ... ... rc nil output nil arguments)))) (unsaved (apply (function process-file) rc (rtags-untrampify (rtags-buffer-file-name unsaved)) output nil arguments) nil) (t (apply (function process-file) rc nil output nil arguments))))) (if (processp result) (progn (set-process-query-on-exit-flag result nil) (if (car async) (progn (set-process-filter result (car async)))) (if (cdr async) (progn (set-process-sentinel result (cdr async))))) (goto-char (point-min)) (save-excursion (cond ((= result rtags-exit-code-success) (if rtags-autostart-diagnostics (progn (rtags-diagnostics)))) ((= result rtags-exit-code-connection-failure) (if output (progn (erase-buffer))) (setq rtags-last-request-not-connected t) (if noerror nil (rtags--error (quote rtags-rdm-not-running)))) ((= result rtags-exit-code-protocol-failure) (if output (progn (erase-buffer))) (if noerror nil (rtags--error (quote rtags-protocol-mismatch)))) ((= result rtags-exit-code-not-indexed) (if noerror nil (rtags--message (quote rtags-file-not-indexed) (or path "buffer"))) (erase-buffer) (setq rtags-last-request-not-indexed t)) (t)))) (or async (and (> (point-max) (point-min)) (= result rtags-exit-code-success)))) (if (not rc) (if noerror nil (rtags--error (quote rtags-cannot-find-rc))) (setq output (rtags--convert-output-buffer output)) (setq rtags-last-request-not-connected nil) (setq rtags-last-request-not-indexed nil) (setq arguments (rtags-remove-keyword-params arguments)) (setq arguments (rtags-remove (quote (lambda (arg) (not arg))) arguments)) (setq arguments (mapcar (quote rtags-untrampify) arguments)) (setq arguments (cons (format "--verify-version=%d" rtags-protocol-version) arguments)) (setq arguments (cons "-z" arguments)) (setq path (rtags-untrampify path)) (if path-filter (progn (setq arguments (cons (concat "--path-filter=" (rtags-untrampify path-filter)) arguments)) (if path-filter-regex (progn (setq arguments (cons "-Z" arguments)))))) (if (and unsaved (rtags-buffer-file-name unsaved)) (progn (setq arguments (cons (format "--unsaved-file=%s:%d" (rtags-untrampify (rtags-buffer-file-name unsaved)) (save-current-buffer (set-buffer unsaved) (rtags-buffer-size))) arguments)))) (if rtags-rc-config-path (progn (setq arguments (cons (concat "--config=" (expand-file-name rtags-rc-config-path)) arguments)))) (if rtags-completions-enabled (progn (setq arguments (cons "-b" arguments)))) (if silent (progn (setq arguments (cons "--silent" arguments)) (setq output nil))) (if silent-query (progn (setq arguments (cons "--silent-query" arguments)))) (if range-filter (progn (setq arguments (cons (format "--range-filter=%d-%d" (or range-min (rtags-offset ...)) (or range-max (rtags-offset ...))) arguments)))) (if (or timeout rtags-timeout) (progn (setq arguments (cons (format "--timeout=%d" (or timeout rtags-timeout)) arguments)))) (if (and rtags-show-containing-function (not (member "-N" arguments))) (progn (setq arguments (cons "-o" arguments)))) (cond ((stringp path) (setq arguments (cons (concat "--current-file=" path) arguments))) (path nil) (default-directory (setq arguments (cons (concat "--current-file=" (rtags-untrampify default-directory)) arguments))) (t nil)) (if (> (length rtags-socket-file) 0) (progn (setq arguments (cons (rtags--get-socket-file-switch) arguments)))) (if rtags-rc-log-enabled (progn (rtags-log (concat rc " " (rtags-combine-strings arguments))))) (let ((result (cond ((and unsaved async) (let (...) (save-current-buffer ... ...) proc)) (async (apply (function start-file-process) "rc" (current-buffer) rc arguments)) ((and unsaved (or ... ...)) (save-current-buffer (set-buffer unsaved) (save-restriction ... ...))) (unsaved (apply (function process-file) rc (rtags-untrampify ...) output nil arguments) nil) (t (apply (function process-file) rc nil output nil arguments))))) (if (processp result) (progn (set-process-query-on-exit-flag result nil) (if (car async) (progn (set-process-filter result (car async)))) (if (cdr async) (progn (set-process-sentinel result (cdr async))))) (goto-char (point-min)) (save-excursion (cond ((= result rtags-exit-code-success) (if rtags-autostart-diagnostics (progn ...))) ((= result rtags-exit-code-connection-failure) (if output (progn ...)) (setq rtags-last-request-not-connected t) (if noerror nil (rtags--error ...))) ((= result rtags-exit-code-protocol-failure) (if output (progn ...)) (if noerror nil (rtags--error ...))) ((= result rtags-exit-code-not-indexed) (if noerror nil (rtags--message ... ...)) (erase-buffer) (setq rtags-last-request-not-indexed t)) (t)))) (or async (and (> (point-max) (point-min)) (= result rtags-exit-code-success))))) (let ((rc (rtags-executable-find "rc"))) (if (not rc) (if noerror nil (rtags--error (quote rtags-cannot-find-rc))) (setq output (rtags--convert-output-buffer output)) (setq rtags-last-request-not-connected nil) (setq rtags-last-request-not-indexed nil) (setq arguments (rtags-remove-keyword-params arguments)) (setq arguments (rtags-remove (quote (lambda (arg) (not arg))) arguments)) (setq arguments (mapcar (quote rtags-untrampify) arguments)) (setq arguments (cons (format "--verify-version=%d" rtags-protocol-version) arguments)) (setq arguments (cons "-z" arguments)) (setq path (rtags-untrampify path)) (if path-filter (progn (setq arguments (cons (concat "--path-filter=" (rtags-untrampify path-filter)) arguments)) (if path-filter-regex (progn (setq arguments (cons "-Z" arguments)))))) (if (and unsaved (rtags-buffer-file-name unsaved)) (progn (setq arguments (cons (format "--unsaved-file=%s:%d" (rtags-untrampify ...) (save-current-buffer ... ...)) arguments)))) (if rtags-rc-config-path (progn (setq arguments (cons (concat "--config=" (expand-file-name rtags-rc-config-path)) arguments)))) (if rtags-completions-enabled (progn (setq arguments (cons "-b" arguments)))) (if silent (progn (setq arguments (cons "--silent" arguments)) (setq output nil))) (if silent-query (progn (setq arguments (cons "--silent-query" arguments)))) (if range-filter (progn (setq arguments (cons (format "--range-filter=%d-%d" (or range-min ...) (or range-max ...)) arguments)))) (if (or timeout rtags-timeout) (progn (setq arguments (cons (format "--timeout=%d" (or timeout rtags-timeout)) arguments)))) (if (and rtags-show-containing-function (not (member "-N" arguments))) (progn (setq arguments (cons "-o" arguments)))) (cond ((stringp path) (setq arguments (cons (concat "--current-file=" path) arguments))) (path nil) (default-directory (setq arguments (cons (concat "--current-file=" (rtags-untrampify default-directory)) arguments))) (t nil)) (if (> (length rtags-socket-file) 0) (progn (setq arguments (cons (rtags--get-socket-file-switch) arguments)))) (if rtags-rc-log-enabled (progn (rtags-log (concat rc " " (rtags-combine-strings arguments))))) (let ((result (cond ((and unsaved async) (let ... ... proc)) (async (apply ... "rc" ... rc arguments)) ((and unsaved ...) (save-current-buffer ... ...)) (unsaved (apply ... rc ... output nil arguments) nil) (t (apply ... rc nil output nil arguments))))) (if (processp result) (progn (set-process-query-on-exit-flag result nil) (if (car async) (progn (set-process-filter result ...))) (if (cdr async) (progn (set-process-sentinel result ...)))) (goto-char (point-min)) (save-excursion (cond ((= result rtags-exit-code-success) (if rtags-autostart-diagnostics ...)) ((= result rtags-exit-code-connection-failure) (if output ...) (setq rtags-last-request-not-connected t) (if noerror nil ...)) ((= result rtags-exit-code-protocol-failure) (if output ...) (if noerror nil ...)) ((= result rtags-exit-code-not-indexed) (if noerror nil ...) (erase-buffer) (setq rtags-last-request-not-indexed t)) (t)))) (or async (and (> (point-max) (point-min)) (= result rtags-exit-code-success)))))) (save-excursion (let ((rc (rtags-executable-find "rc"))) (if (not rc) (if noerror nil (rtags--error (quote rtags-cannot-find-rc))) (setq output (rtags--convert-output-buffer output)) (setq rtags-last-request-not-connected nil) (setq rtags-last-request-not-indexed nil) (setq arguments (rtags-remove-keyword-params arguments)) (setq arguments (rtags-remove (quote (lambda (arg) (not arg))) arguments)) (setq arguments (mapcar (quote rtags-untrampify) arguments)) (setq arguments (cons (format "--verify-version=%d" rtags-protocol-version) arguments)) (setq arguments (cons "-z" arguments)) (setq path (rtags-untrampify path)) (if path-filter (progn (setq arguments (cons (concat "--path-filter=" ...) arguments)) (if path-filter-regex (progn (setq arguments ...))))) (if (and unsaved (rtags-buffer-file-name unsaved)) (progn (setq arguments (cons (format "--unsaved-file=%s:%d" ... ...) arguments)))) (if rtags-rc-config-path (progn (setq arguments (cons (concat "--config=" ...) arguments)))) (if rtags-completions-enabled (progn (setq arguments (cons "-b" arguments)))) (if silent (progn (setq arguments (cons "--silent" arguments)) (setq output nil))) (if silent-query (progn (setq arguments (cons "--silent-query" arguments)))) (if range-filter (progn (setq arguments (cons (format "--range-filter=%d-%d" ... ...) arguments)))) (if (or timeout rtags-timeout) (progn (setq arguments (cons (format "--timeout=%d" ...) arguments)))) (if (and rtags-show-containing-function (not (member "-N" arguments))) (progn (setq arguments (cons "-o" arguments)))) (cond ((stringp path) (setq arguments (cons (concat "--current-file=" path) arguments))) (path nil) (default-directory (setq arguments (cons (concat "--current-file=" ...) arguments))) (t nil)) (if (> (length rtags-socket-file) 0) (progn (setq arguments (cons (rtags--get-socket-file-switch) arguments)))) (if rtags-rc-log-enabled (progn (rtags-log (concat rc " " (rtags-combine-strings arguments))))) (let ((result (cond (... ...) (async ...) (... ...) (unsaved ... nil) (t ...)))) (if (processp result) (progn (set-process-query-on-exit-flag result nil) (if (car async) (progn ...)) (if (cdr async) (progn ...))) (goto-char (point-min)) (save-excursion (cond (... ...) (... ... ... ...) (... ... ...) (... ... ... ...) (t)))) (or async (and (> (point-max) (point-min)) (= result rtags-exit-code-success))))))) (progn (save-excursion (let ((rc (rtags-executable-find "rc"))) (if (not rc) (if noerror nil (rtags--error (quote rtags-cannot-find-rc))) (setq output (rtags--convert-output-buffer output)) (setq rtags-last-request-not-connected nil) (setq rtags-last-request-not-indexed nil) (setq arguments (rtags-remove-keyword-params arguments)) (setq arguments (rtags-remove (quote (lambda ... ...)) arguments)) (setq arguments (mapcar (quote rtags-untrampify) arguments)) (setq arguments (cons (format "--verify-version=%d" rtags-protocol-version) arguments)) (setq arguments (cons "-z" arguments)) (setq path (rtags-untrampify path)) (if path-filter (progn (setq arguments (cons ... arguments)) (if path-filter-regex (progn ...)))) (if (and unsaved (rtags-buffer-file-name unsaved)) (progn (setq arguments (cons ... arguments)))) (if rtags-rc-config-path (progn (setq arguments (cons ... arguments)))) (if rtags-completions-enabled (progn (setq arguments (cons "-b" arguments)))) (if silent (progn (setq arguments (cons "--silent" arguments)) (setq output nil))) (if silent-query (progn (setq arguments (cons "--silent-query" arguments)))) (if range-filter (progn (setq arguments (cons ... arguments)))) (if (or timeout rtags-timeout) (progn (setq arguments (cons ... arguments)))) (if (and rtags-show-containing-function (not (member "-N" arguments))) (progn (setq arguments (cons "-o" arguments)))) (cond ((stringp path) (setq arguments (cons ... arguments))) (path nil) (default-directory (setq arguments (cons ... arguments))) (t nil)) (if (> (length rtags-socket-file) 0) (progn (setq arguments (cons ... arguments)))) (if rtags-rc-log-enabled (progn (rtags-log (concat rc " " ...)))) (let ((result (cond ... ... ... ... ...))) (if (processp result) (progn (set-process-query-on-exit-flag result nil) (if ... ...) (if ... ...)) (goto-char (point-min)) (save-excursion (cond ... ... ... ... ...))) (or async (and (> ... ...) (= result rtags-exit-code-success)))))))) (let ((path (car (cdr (or (memq (quote :path) arguments) (list nil (rtags-buffer-file-name)))))) (unsaved (car (cdr (memq (quote :unsaved) arguments)))) (async (car (cdr (memq (quote :async) arguments)))) (path-filter (car (cdr (memq (quote :path-filter) arguments)))) (path-filter-regex (car (cdr (memq (quote :path-filter-regex) arguments)))) (range-filter (car (cdr (memq (quote :range-filter) arguments)))) (output (car (cdr (or (memq (quote :output) arguments) (list nil (list t nil)))))) (range-min (car (cdr (memq (quote :range-min) arguments)))) (range-max (car (cdr (memq (quote :range-max) arguments)))) (noerror (car (cdr (memq (quote :noerror) arguments)))) (timeout (car (cdr (memq (quote :timeout) arguments)))) (silent (car (cdr (memq (quote :silent) arguments)))) (silent-query (car (cdr (memq (quote :silent-query) arguments))))) (progn (save-excursion (let ((rc (rtags-executable-find "rc"))) (if (not rc) (if noerror nil (rtags--error (quote rtags-cannot-find-rc))) (setq output (rtags--convert-output-buffer output)) (setq rtags-last-request-not-connected nil) (setq rtags-last-request-not-indexed nil) (setq arguments (rtags-remove-keyword-params arguments)) (setq arguments (rtags-remove (quote ...) arguments)) (setq arguments (mapcar (quote rtags-untrampify) arguments)) (setq arguments (cons (format "--verify-version=%d" rtags-protocol-version) arguments)) (setq arguments (cons "-z" arguments)) (setq path (rtags-untrampify path)) (if path-filter (progn (setq arguments ...) (if path-filter-regex ...))) (if (and unsaved (rtags-buffer-file-name unsaved)) (progn (setq arguments ...))) (if rtags-rc-config-path (progn (setq arguments ...))) (if rtags-completions-enabled (progn (setq arguments ...))) (if silent (progn (setq arguments ...) (setq output nil))) (if silent-query (progn (setq arguments ...))) (if range-filter (progn (setq arguments ...))) (if (or timeout rtags-timeout) (progn (setq arguments ...))) (if (and rtags-show-containing-function (not ...)) (progn (setq arguments ...))) (cond ((stringp path) (setq arguments ...)) (path nil) (default-directory (setq arguments ...)) (t nil)) (if (> (length rtags-socket-file) 0) (progn (setq arguments ...))) (if rtags-rc-log-enabled (progn (rtags-log ...))) (let ((result ...)) (if (processp result) (progn ... ... ...) (goto-char ...) (save-excursion ...)) (or async (and ... ...)))))))) rtags-call-rc(:path "/localdisk/sree/rtags/src/rdm.cpp" :noerror t :silent-query nil "-U" "/localdisk/sree/rtags/src/rdm.cpp:73:34:" "--elisp" "-K" nil nil nil nil) (and location (rtags-call-rc :path path :noerror t :silent-query silent "-U" location "--elisp" (if relative-filenames nil "-K") (if parents (progn "--symbol-info-include-parents")) (if references (progn "--symbol-info-include-references")) (if targets (progn "--symbol-info-include-targets")) (if base-classes (progn "--symbol-info-include-base-classes"))) (goto-char (point-min)) (looking-at "(") (eval (read (current-buffer)))) (progn (and location (rtags-call-rc :path path :noerror t :silent-query silent "-U" location "--elisp" (if relative-filenames nil "-K") (if parents (progn "--symbol-info-include-parents")) (if references (progn "--symbol-info-include-references")) (if targets (progn "--symbol-info-include-targets")) (if base-classes (progn "--symbol-info-include-base-classes"))) (goto-char (point-min)) (looking-at "(") (eval (read (current-buffer))))) (unwind-protect (progn (and location (rtags-call-rc :path path :noerror t :silent-query silent "-U" location "--elisp" (if relative-filenames nil "-K") (if parents (progn "--symbol-info-include-parents")) (if references (progn "--symbol-info-include-references")) (if targets (progn "--symbol-info-include-targets")) (if base-classes (progn "--symbol-info-include-base-classes"))) (goto-char (point-min)) (looking-at "(") (eval (read (current-buffer))))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (and location (rtags-call-rc :path path :noerror t :silent-query silent "-U" location "--elisp" (if relative-filenames nil "-K") (if parents (progn "--symbol-info-include-parents")) (if references (progn "--symbol-info-include-references")) (if targets (progn "--symbol-info-include-targets")) (if base-classes (progn "--symbol-info-include-base-classes"))) (goto-char (point-min)) (looking-at "(") (eval (read (current-buffer))))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))) (let ((temp-buffer (generate-new-buffer " temp"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (and location (rtags-call-rc :path path :noerror t :silent-query silent "-U" location "--elisp" (if relative-filenames nil "-K") (if parents (progn "--symbol-info-include-parents")) (if references (progn "--symbol-info-include-references")) (if targets (progn "--symbol-info-include-targets")) (if base-classes (progn "--symbol-info-include-base-classes"))) (goto-char (point-min)) (looking-at "(") (eval (read (current-buffer))))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (let ((path (rtags-buffer-file-name)) (object (let ((temp-buffer (generate-new-buffer " temp"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (and location ... ... ... ...)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))))) (or (and (not piece) object) (cdr (assoc piece object)))) (progn (let ((path (rtags-buffer-file-name)) (object (let ((temp-buffer (generate-new-buffer " temp"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn ...) (and ... ...)))))) (or (and (not piece) object) (cdr (assoc piece object))))) (if location (progn (let ((path (rtags-buffer-file-name)) (object (let ((temp-buffer ...)) (save-current-buffer (set-buffer temp-buffer) (unwind-protect ... ...))))) (or (and (not piece) object) (cdr (assoc piece object)))))) (progn (if location nil (setq location (rtags-current-location))) (if location (progn (let ((path (rtags-buffer-file-name)) (object (let (...) (save-current-buffer ... ...)))) (or (and (not piece) object) (cdr (assoc piece object))))))) (let ((parents (car (cdr (memq (quote :parents) foo)))) (references (car (cdr (memq (quote :references) foo)))) (targets (car (cdr (memq (quote :targets) foo)))) (base-classes (car (cdr (memq (quote :base-classes) foo)))) (piece (car (cdr (memq (quote :piece) foo)))) (relative-filenames (car (cdr (memq (quote :relative-filenames) foo)))) (location (car (cdr (memq (quote :location) foo)))) (silent (car (cdr (memq (quote :silent) foo))))) (let ((--cl-keys-- foo)) (while --cl-keys-- (cond ((memq (car --cl-keys--) (quote (:parents :references :targets :base-classes :piece :relative-filenames :location :silent :allow-other-keys))) (setq --cl-keys-- (cdr (cdr --cl-keys--)))) ((car (cdr (memq ... foo))) (setq --cl-keys-- nil)) (t (error "Keyword argument %s not one of (:parents :references :targets :base-classes :piece :relative-filenames :location :silent)" (car --cl-keys--)))))) (progn (if location nil (setq location (rtags-current-location))) (if location (progn (let ((path (rtags-buffer-file-name)) (object (let ... ...))) (or (and (not piece) object) (cdr (assoc piece object)))))))) rtags-symbol-info-internal(:location nil) (assoc (quote symbolName) (rtags-symbol-info-internal :location location)) (cdr (assoc (quote symbolName) (rtags-symbol-info-internal :location location))) (let ((symbolname (cdr (assoc (quote symbolName) (rtags-symbol-info-internal :location location)))) (visual (and symbolname (let ((temp-buffer (generate-new-buffer " temp"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn ... ... ... ... ...) (and ... ...)))))) (token (rtags-current-token))) (or (and visual (string= visual token) symbolname) token)) rtags-current-symbol-name() (and (not no-symbol-name) (rtags-current-symbol-name)) (or (and rtags-use-mark-as-current-symbol mark-active (buffer-substring-no-properties (point) (mark))) (and (not no-symbol-name) (rtags-current-symbol-name)) (thing-at-point (quote symbol))) rtags-current-symbol() (or (rtags-current-symbol) (rtags-current-token)) (let ((arg (rtags-current-location)) (tagname (or (rtags-current-symbol) (rtags-current-token))) (fn (rtags-buffer-file-name))) (rtags-reparse-file-if-needed) (let ((results (let ((temp-buffer (generate-new-buffer " temp"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn ... ... ...) (and ... ...))))) (buffer (get-buffer rtags-buffer-name))) (if (and buffer (eq (buffer-local-value (quote rtags-results-buffer-type) buffer) (quote find-symbol-at-point))) (progn (rtags-delete-rtags-windows) (kill-buffer buffer))) (cond ((= (cdr results) 0) nil) ((= (cdr results) 1) (let ((temp-buffer (generate-new-buffer " temp"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn ... ... ...) (and ... ...))))) (t (rtags-delete-rtags-windows) (save-current-buffer (set-buffer (rtags-get-buffer)) (insert (car results)) (goto-char (point-min)) (rtags-handle-results-buffer tagname nil nil fn otherwindow (quote find-symbol-at-point))))))) (progn (rtags-location-stack-push) (let ((arg (rtags-current-location)) (tagname (or (rtags-current-symbol) (rtags-current-token))) (fn (rtags-buffer-file-name))) (rtags-reparse-file-if-needed) (let ((results (let ((temp-buffer ...)) (save-current-buffer (set-buffer temp-buffer) (unwind-protect ... ...)))) (buffer (get-buffer rtags-buffer-name))) (if (and buffer (eq (buffer-local-value (quote rtags-results-buffer-type) buffer) (quote find-symbol-at-point))) (progn (rtags-delete-rtags-windows) (kill-buffer buffer))) (cond ((= (cdr results) 0) nil) ((= (cdr results) 1) (let ((temp-buffer ...)) (save-current-buffer (set-buffer temp-buffer) (unwind-protect ... ...)))) (t (rtags-delete-rtags-windows) (save-current-buffer (set-buffer (rtags-get-buffer)) (insert (car results)) (goto-char (point-min)) (rtags-handle-results-buffer tagname nil nil fn otherwindow (quote find-symbol-at-point)))))))) (if (or (not (with-no-warnings (called-interactively-p (quote interactive)))) (rtags-sandbox-id-matches)) (progn (rtags-location-stack-push) (let ((arg (rtags-current-location)) (tagname (or (rtags-current-symbol) (rtags-current-token))) (fn (rtags-buffer-file-name))) (rtags-reparse-file-if-needed) (let ((results (let (...) (save-current-buffer ... ...))) (buffer (get-buffer rtags-buffer-name))) (if (and buffer (eq (buffer-local-value ... buffer) (quote find-symbol-at-point))) (progn (rtags-delete-rtags-windows) (kill-buffer buffer))) (cond ((= (cdr results) 0) nil) ((= (cdr results) 1) (let (...) (save-current-buffer ... ...))) (t (rtags-delete-rtags-windows) (save-current-buffer (set-buffer ...) (insert ...) (goto-char ...) (rtags-handle-results-buffer tagname nil nil fn otherwindow ...)))))))) (let ((otherwindow (and prefix (listp prefix))) (pathfilter (and (numberp prefix) (rtags-buffer-file-name)))) (if (or (not (with-no-warnings (called-interactively-p (quote interactive)))) (rtags-sandbox-id-matches)) (progn (rtags-location-stack-push) (let ((arg (rtags-current-location)) (tagname (or (rtags-current-symbol) (rtags-current-token))) (fn (rtags-buffer-file-name))) (rtags-reparse-file-if-needed) (let ((results (let ... ...)) (buffer (get-buffer rtags-buffer-name))) (if (and buffer (eq ... ...)) (progn (rtags-delete-rtags-windows) (kill-buffer buffer))) (cond ((= ... 0) nil) ((= ... 1) (let ... ...)) (t (rtags-delete-rtags-windows) (save-current-buffer ... ... ... ...)))))))) rtags-find-symbol-at-point(nil) call-interactively(rtags-find-symbol-at-point record nil) command-execute(rtags-find-symbol-at-point record)

execute-extended-command(nil "rtags-find-symbol-at-point") call-interactively(execute-extended-command nil nil)

wuliuxiansheng commented 6 years ago

No multiple rtags.elc and only one Emacs is installed in the system.

Debugger entered--Lisp error: (wrong-type-argument number-or-marker-p "Aborted") rtags-call-rc(:path "/home/xxx/xxx/xxx/xxx/xxx/xxx/xxx.cpp" :noerror t :silent-query nil "-U" "/home/xxx/xxx/xxx/xxx/xxx/xxx/xxx.cpp:9:1:" "--elisp" "-K" nil nil nil nil) rtags-symbol-info-internal(:location nil) rtags-current-symbol-name() rtags-current-symbol() rtags-find-symbol-at-point(nil) funcall-interactively(rtags-find-symbol-at-point nil) call-interactively(rtags-find-symbol-at-point record nil) command-execute(rtags-find-symbol-at-point record)

257 "\304\305!\203\f\306\307!!\210\307!\211\310\307!\311\")\207" [current-prefix-arg prefix-arg this-command real-this-command featurep smex smex-rank intern command-execute record] 4 "\n\n(fn CMD)"

ivy-call()

[642 "\306\307\"A@\306\310\"A@\306\311\"A@\306\312\"A@\306\313\"A@\306\314\"A@\306\315\"A@\306\316\"A@\306 \317\"A@\306\n\320\"A@\306 \321\"A@C\306\f\322\"A@\306

\323\"A@\306\324\"A@\306\325\"A@\211\203\222\211@\326>\203z\211AA\262\202g\327>A@\203\211\330\262\202g\331\332@\"\210\202g\210\333\334\335\336\"\335 \"\335\"#!\211\203\322\337!\203\274\340\341\342BBBB\202\320\204\311\340\343BB\202\320\333\334\"!\262\210\335\n\"\211\203\n\330\211\211\203\211@\211\344\232\203\361\211 B\202\377\211A\204\377\211@@ D BA\266\202\202\336\210\202\f\345\210\346 \205\f\335 \206\"\337!\205\"\"\347 ?\205:@\206:A\236\2069\336A\236A\203S\350B\"\211\203L\211A\202NC\262\202UC@D\351\352\353 \354 p\330\242E\330&&\355\f!\210\356\357\360\361\351 !\362\"\363$\216\364\330C\211\356\357\365\361\351\"\366\"\367$\240\210\356\357\370\361\351!\371\"\367$\216\372\373\242\"\210\206\313\374FGC\375 \203\337\330\202\352H\204\350\376\202\352HHI\203 JG\340U\203 \f\357HK>\204 \377\201Q\201R\fD\"\210\f\211\201SJ@I\266\201TL\202H\201U\f\357HK>\2049\377\201Q\201R\fD\"\210\f\363H\201VM\"\330%\210L\201T=\203\223N\203r\f\357HK>\204j\377\201Q\201R\fD\"\210\f\201SH\202tO\211\201W\232\204\222\201X\201YP#\201ZJA\"BL\210\210\f\357HK>\204\247\377\201Q\201R\fD\"\210\f\201SH,\262)\266\202)\201[ \210\f\357HK>\204\314\377\201Q\201R\fD\"\210\f\201SHG\357V\203\372\201\\357\340\201]\f\357HK>\204\363\377\201Q\201R\fD\"\210\f\201SH$\210\266\204\207" [ivy--actions-list this-command ivy--sources-list ivy--extra-candidates ivy-last ivy--display-transformers-list plist-member :predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :unwind :re-builder :matcher :dynamic-collection :caller (:predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :unwind :re-builder :matcher :dynamic-collection :caller :allow-other-keys) :allow-other-keys nil error "Keyword argument %s not one of (:predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :unwind :re-builder :matcher :dynamic-collection :caller)" delete-dups append plist-get t functionp 1 "o" ("default") ("o" identity "default") (original-source) ((original-source)) active-minibuffer-window window-minibuffer-p assoc vector cl-struct-ivy-state selected-frame selected-window ivy--reset-state make-byte-code 0 "\304\305\306\"\210\307\310!\311!\203\211 \210\210\300 \312H\n>\204\"\313\314\315 D\"\210 \316H\240\203-\300\242 \210 \317=?\2056\320 \207" vconcat ...] 48 ("/home/xxx/.emacs.d/elpa-25.3/ivy-20180515.1057/ivy.elc" . 75497)]("M-x " ("irony-enable" "toggle-debug-on-error" "package-list-packages" "rtags-install" "package-autoremove" "ediff" "package-reinstall" "irony-mode" "customize-themes" "ag" "cd" "5x5" "arp" "dbx" "dig" "ede" "erc" "ert" "eww" "ftp" "gdb" "irc" "jdb" "man" "mpc" "pdb" "pwd" "rsh" "sdb" "vlf" "xdb" "calc" "dark" "deft" "diff" "dirs" "ffap" "gnus" "grep" "help" "ielm" "info" "life" "mail" "mpuz" "ping" "pong" "smex" "talk" "term" ...) :predicate nil :require-match t :history counsel-M-x-history :action #[257 "\304\305!\203\f\306\307!!\210\307!\211\310\307!\311\")\207" [current-prefix-arg prefix-arg this-command real-this-command featurep smex smex-rank intern command-execute record] 4 "\n\n(fn CMD)"] :sort nil :keymap (keymap (67108908 . counsel--info-lookup-symbol) (67108910 . counsel-find-symbol)) :initial-input nil :caller counsel-M-x) apply(#[642 "\306\307\"A@\306\310\"A@\306\311\"A@\306\312\"A@\306\313\"A@\306\314\"A@\306\315\"A@\306\316\"A@\306 \317\"A@\306\n\320\"A@\306 \321\"A@C\306\f\322\"A@\306 \323\"A@\306\324\"A@\306\325\"A@\211\203\222\211@\326>\203z\211AA\262\202g\327>A@\203\211\330\262\202g\331\332@\"\210\202g\210\333\334\335\336\"\335 \"\335\"#!\211\203\322\337!\203\274\340\341\342BBBB\202\320\204\311\340\343BB\202\320\333\334\"!\262\210\335\n\"\211\203\n\330\211\211\203\211@\211\344\232\203\361\211 B\202\377\211A\204\377\211@@ D BA\266\202\202\336\210\202\f\345\210\346 \205\f\335 \206\"\337!\205\"\"\347 ?\205:@\206:A\236\2069\336A\236A\203S\350B\"\211\203L\211A\202NC\262\202UC@D\351\352\353 \354 p\330\242E\330&&\355\f!\210\356\357\360\361\351 !\362\"\363$\216\364\330C\211\356\357\365\361\351\"\366\"\367$\240\210\356\357\370\361\351!\371\"\367$\216\372\373\242\"\210\206\313\374FGC\375 \203\337\330\202\352H\204\350\376\202\352HHI\203 JG\340U\203 \f\357HK>\204 \377\201Q\201R\fD\"\210\f\211\201SJ@I\266\201TL\202H\201U\f\357HK>\2049\377\201Q\201R\fD\"\210\f\363H\201VM\"\330%\210L\201T=\203\223N\203r\f\357HK>\204j\377\201Q\201R\fD\"\210\f\201SH\202tO\211\201W\232\204\222\201X\201YP#\201ZJA\"BL\210\210\f\357HK>\204\247\377\201Q\201R\fD\"\210\f\201SH,\262)\266\202)\201[ \210\f\357HK>\204\314\377\201Q\201R\fD\"\210\f\201SHG\357V\203\372\201\\357\340\201]\f\357HK>\204\363\377\201Q\201R\fD\"\210\f\201SH$\210\266\204\207" [ivy--actions-list this-command ivy--sources-list ivy--extra-candidates ivy-last ivy--display-transformers-list plist-member :predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :unwind :re-builder :matcher :dynamic-collection :caller (:predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :unwind :re-builder :matcher :dynamic-collection :caller :allow-other-keys) :allow-other-keys nil error "Keyword argument %s not one of (:predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :unwind :re-builder :matcher :dynamic-collection :caller)" delete-dups append plist-get t functionp 1 "o" ("default") ("o" identity "default") (original-source) ((original-source)) active-minibuffer-window window-minibuffer-p assoc vector cl-struct-ivy-state selected-frame selected-window ivy--reset-state make-byte-code 0 "\304\305\306\"\210\307\310!\311!\203\211 \210\210\300 \312H\n>\204\"\313\314\315 D\"\210 \316H\240\203-\300\242 \210 \317=?\2056\320 \207" vconcat ...] 48 ("/home/xxx/.emacs.d/elpa-25.3/ivy-20180515.1057/ivy.elc" . 75497)] ("M-x " ("irony-enable" "toggle-debug-on-error" "package-list-packages" "rtags-install" "package-autoremove" "ediff" "package-reinstall" "irony-mode" "customize-themes" "ag" "cd" "5x5" "arp" "dbx" "dig" "ede" "erc" "ert" "eww" "ftp" "gdb" "irc" "jdb" "man" "mpc" "pdb" "pwd" "rsh" "sdb" "vlf" "xdb" "calc" "dark" "deft" "diff" "dirs" "ffap" "gnus" "grep" "help" "ielm" "info" "life" "mail" "mpuz" "ping" "pong" "smex" "talk" "term" ...) :predicate nil :require-match t :history counsel-M-x-history :action #[257 "\304\305!\203\f\306\307!!\210\307!\211\310\307!\311\")\207" [current-prefix-arg prefix-arg this-command real-this-command featurep smex smex-rank intern command-execute record] 4 "\n\n(fn CMD)"] :sort nil :keymap (keymap (67108908 . counsel--info-lookup-symbol) (67108910 . counsel-find-symbol)) :initial-input nil :caller counsel-M-x)) ivy-historian--nadvice/ivy-read(#[642 "\306\307\"A@\306\310\"A@\306\311\"A@\306\312\"A@\306\313\"A@\306\314\"A@\306\315\"A@\306\316\"A@\306 \317\"A@\306\n\320\"A@\306 \321\"A@C\306\f\322\"A@\306 \323\"A@\306\324\"A@\306\325\"A@\211\203\222\211@\326>\203z\211AA\262\202g\327>A@\203\211\330\262\202g\331\332@\"\210\202g\210\333\334\335\336\"\335 \"\335\"#!\211\203\322\337!\203\274\340\341\342BBBB\202\320\204\311\340\343BB\202\320\333\334\"!\262\210\335\n\"\211\203\n\330\211\211\203\211@\211\344\232\203\361\211 B\202\377\211A\204\377\211@@ D BA\266\202\202\336\210\202\f\345\210\346 \205\f\335 \206\"\337!\205\"\"\347 ?\205:@\206:A\236\2069\336A\236A\203S\350B\"\211\203L\211A\202NC\262\202UC@D\351\352\353 \354 p\330\242E\330&&\355\f!\210\356\357\360\361\351 !\362\"\363$\216\364\330C\211\356\357\365\361\351\"\366\"\367$\240\210\356\357\370\361\351!\371\"\367$\216\372\373\242\"\210\206\313\374FGC\375 \203\337\330\202\352H\204\350\376\202\352HHI\203 JG\340U\203 \f\357HK>\204 \377\201Q\201R\fD\"\210\f\211\201SJ@I\266\201TL\202H\201U\f\357HK>\2049\377\201Q\201R\fD\"\210\f\363H\201VM\"\330%\210L\201T=\203\223N\203r\f\357HK>\204j\377\201Q\201R\fD\"\210\f\201SH\202tO\211\201W\232\204\222\201X\201YP#\201ZJA\"BL\210\210\f\357HK>\204\247\377\201Q\201R\fD\"\210\f\201SH,\262)\266\202)\201[ \210\f\357HK>\204\314\377\201Q\201R\fD\"\210\f\201SHG\357V\203\372\201\\357\340\201]\f\357HK>\204\363\377\201Q\201R\fD\"\210\f\201SH$\210\266\204\207" [ivy--actions-list this-command ivy--sources-list ivy--extra-candidates ivy-last ivy--display-transformers-list plist-member :predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :unwind :re-builder :matcher :dynamic-collection :caller (:predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :unwind :re-builder :matcher :dynamic-collection :caller :allow-other-keys) :allow-other-keys nil error "Keyword argument %s not one of (:predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :unwind :re-builder :matcher :dynamic-collection :caller)" delete-dups append plist-get t functionp 1 "o" ("default") ("o" identity "default") (original-source) ((original-source)) active-minibuffer-window window-minibuffer-p assoc vector cl-struct-ivy-state selected-frame selected-window ivy--reset-state make-byte-code 0 "\304\305\306\"\210\307\310!\311!\203\211 \210\210\300 \312H\n>\204\"\313\314\315 D\"\210 \316H\240\203-\300\242 \210 \317=?\2056\320 \207" vconcat ...] 48 ("/home/xxx/.emacs.d/elpa-25.3/ivy-20180515.1057/ivy.elc" . 75497)] "M-x " ("irony-enable" "toggle-debug-on-error" "package-list-packages" "rtags-install" "package-autoremove" "ediff" "package-reinstall" "irony-mode" "customize-themes" "ag" "cd" "5x5" "arp" "dbx" "dig" "ede" "erc" "ert" "eww" "ftp" "gdb" "irc" "jdb" "man" "mpc" "pdb" "pwd" "rsh" "sdb" "vlf" "xdb" "calc" "dark" "deft" "diff" "dirs" "ffap" "gnus" "grep" "help" "ielm" "info" "life" "mail" "mpuz" "ping" "pong" "smex" "talk" "term" ...) :predicate nil :require-match t :history counsel-M-x-history :action #[257 "\304\305!\203\f\306\307!!\210\307!\211\310\307!\311\")\207" [current-prefix-arg prefix-arg this-command real-this-command featurep smex smex-rank intern command-execute record] 4 "\n\n(fn CMD)"] :sort nil :keymap (keymap (67108908 . counsel--info-lookup-symbol) (67108910 . counsel-find-symbol)) :initial-input nil :caller counsel-M-x) apply(ivy-historian--nadvice/ivy-read #[642 "\306\307\"A@\306\310\"A@\306\311\"A@\306\312\"A@\306\313\"A@\306\314\"A@\306\315\"A@\306\316\"A@\306 \317\"A@\306\n\320\"A@\306 \321\"A@C\306\f\322\"A@\306 \323\"A@\306\324\"A@\306\325\"A@\211\203\222\211@\326>\203z\211AA\262\202g\327>A@\203\211\330\262\202g\331\332@\"\210\202g\210\333\334\335\336\"\335 \"\335\"#!\211\203\322\337!\203\274\340\341\342BBBB\202\320\204\311\340\343BB\202\320\333\334\"!\262\210\335\n\"\211\203\n\330\211\211\203\211@\211\344\232\203\361\211 B\202\377\211A\204\377\211@@ D BA\266\202\202\336\210\202\f\345\210\346 \205\f\335 \206\"\337!\205\"\"\347 ?\205:@\206:A\236\2069\336A\236A\203S\350B\"\211\203L\211A\202NC\262\202UC@D\351\352\353 \354 p\330\242E\330&&\355\f!\210\356\357\360\361\351 !\362\"\363$\216\364\330C\211\356\357\365\361\351\"\366\"\367$\240\210\356\357\370\361\351!\371\"\367$\216\372\373\242\"\210\206\313\374FGC\375 \203\337\330\202\352H\204\350\376\202\352HHI\203 JG\340U\203 \f\357HK>\204 \377\201Q\201R\fD\"\210\f\211\201SJ@I\266\201TL\202H\201U\f\357HK>\2049\377\201Q\201R\fD\"\210\f\363H\201VM\"\330%\210L\201T=\203\223N\203r\f\357HK>\204j\377\201Q\201R\fD\"\210\f\201SH\202tO\211\201W\232\204\222\201X\201YP#\201ZJA\"BL\210\210\f\357HK>\204\247\377\201Q\201R\fD\"\210\f\201SH,\262)\266\202)\201[ \210\f\357HK>\204\314\377\201Q\201R\fD\"\210\f\201SHG\357V\203\372\201\\357\340\201]\f\357HK>\204\363\377\201Q\201R\fD\"\210\f\201SH$\210\266\204\207" [ivy--actions-list this-command ivy--sources-list ivy--extra-candidates ivy-last ivy--display-transformers-list plist-member :predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :unwind :re-builder :matcher :dynamic-collection :caller (:predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :unwind :re-builder :matcher :dynamic-collection :caller :allow-other-keys) :allow-other-keys nil error "Keyword argument %s not one of (:predicate :require-match :initial-input :history :preselect :def :keymap :update-fn :sort :action :unwind :re-builder :matcher :dynamic-collection :caller)" delete-dups append plist-get t functionp 1 "o" ("default") ("o" identity "default") (original-source) ((original-source)) active-minibuffer-window window-minibuffer-p assoc vector cl-struct-ivy-state selected-frame selected-window ivy--reset-state make-byte-code 0 "\304\305\306\"\210\307\310!\311!\203\211 \210\210\300 \312H\n>\204\"\313\314\315 D\"\210 \316H\240\203-\300\242 \210 \317=?\2056\320 \207" vconcat ...] 48 ("/home/xxx/.emacs.d/elpa-25.3/ivy-20180515.1057/ivy.elc" . 75497)] ("M-x " ("irony-enable" "toggle-debug-on-error" "package-list-packages" "rtags-install" "package-autoremove" "ediff" "package-reinstall" "irony-mode" "customize-themes" "ag" "cd" "5x5" "arp" "dbx" "dig" "ede" "erc" "ert" "eww" "ftp" "gdb" "irc" "jdb" "man" "mpc" "pdb" "pwd" "rsh" "sdb" "vlf" "xdb" "calc" "dark" "deft" "diff" "dirs" "ffap" "gnus" "grep" "help" "ielm" "info" "life" "mail" "mpuz" "ping" "pong" "smex" "talk" "term" ...) :predicate nil :require-match t :history counsel-M-x-history :action #[257 "\304\305!\203\f\306\307!!\210\307!\211\310\307!\311\")\207" [current-prefix-arg prefix-arg this-command real-this-command featurep smex smex-rank intern command-execute record] 4 "\n\n(fn CMD)"] :sort nil :keymap (keymap (67108908 . counsel--info-lookup-symbol) (67108910 . counsel-find-symbol)) :initial-input nil :caller counsel-M-x)) ivy-read("M-x " ("irony-enable" "toggle-debug-on-error" "package-list-packages" "rtags-install" "package-autoremove" "ediff" "package-reinstall" "irony-mode" "customize-themes" "ag" "cd" "5x5" "arp" "dbx" "dig" "ede" "erc" "ert" "eww" "ftp" "gdb" "irc" "jdb" "man" "mpc" "pdb" "pwd" "rsh" "sdb" "vlf" "xdb" "calc" "dark" "deft" "diff" "dirs" "ffap" "gnus" "grep" "help" "ielm" "info" "life" "mail" "mpuz" "ping" "pong" "smex" "talk" "term" ...) :predicate nil :require-match t :history counsel-M-x-history :action #[257 "\304\305!\203\f\306\307!!\210\307!\211\310\307!\311\")\207" [current-prefix-arg prefix-arg this-command real-this-command featurep smex smex-rank intern command-execute record] 4 "\n\n(fn CMD)"] :sort nil :keymap (keymap (67108908 . counsel--info-lookup-symbol) (67108910 . counsel-find-symbol)) :initial-input nil :caller counsel-M-x) counsel-M-x() funcall-interactively(counsel-M-x) call-interactively(counsel-M-x nil nil) command-execute(counsel-M-x)

casch-at commented 6 years ago

I can't reproduce it. Have you guys tested it with emacs -Q already? At the moment I'm a bit clueless. Do you use spacemacs?

You could also try to debug rtags-call-rc with edbug, and check after what call this error occurs.

casch-at commented 6 years ago

Ahh, I think I know whats going on now, so still need to figure out a fix.

Here is what I think is going on:

Inside rtags-call-rc the variable result gets the value "Aborted", and later result is checked against some exit codes using the built-in function =, which takes as args, numbers or markers. But "Aborted" is none of that. Hence, the error (wrong-type-argument number-or-marker-p "Aborted").

Why result gets assigned "Aborted".... I don't know, not yet!

casch-at commented 6 years ago

@bradprob Better is to jump to the defun rtags-call-rc and call edebug-defun which is an auto-loaded defun (alias for edebug-eval-top-level-form).

M-x find-function [RET] rtags-call-rc [RET]
M-x edebug-defun [RET]
bradprob commented 6 years ago

I have the following: edebug-defun edebug-all-defs edebug-all-forms edebug-eval-top-level-from

bradprob commented 6 years ago

Debugger entered--Lisp error: (wrong-type-argument number-or-marker-p "Aborted") apply(debug error (wrong-type-argument number-or-marker-p "Aborted")) edebug(error (wrong-type-argument number-or-marker-p "Aborted")) signal(wrong-type-argument (number-or-marker-p "Aborted")) edebug-signal(wrong-type-argument (number-or-marker-p "Aborted")) =("Aborted" 0) (edebug-after (edebug-before 349) 352 (= (edebug-after 0 350 result) (edebug-after 0 351 rtags-exit-code-success))) (cond ((edebug-after (edebug-before 349) 352 (= (edebug-after 0 350 result) (edebug-after 0 351 rtags-exit-code-success))) (edebug-after (edebug-before 353) 357 (if (edebug-after 0 354 rtags-autostart-diagnostics) (progn (edebug-after (edebug-before 355) 356 (rtags-diagnostics)))))) ((edebug-after (edebug-before 358) 361 (= (edebug-after 0 359 result) (edebug-after 0 360 rtags-exit-code-connection-failure))) (edebug-after (edebug-before 362) 366 (if (edebug-after 0 363 output) (progn (edebug-after (edebug-before 364) 365 (erase-buffer))))) (edebug-after (edebug-before 367) 368 (setq rtags-last-request-not-connected t)) (edebug-after (edebug-before 369) 373 (if (edebug-after 0 370 noerror) nil (edebug-after (edebug-before 371) 372 (rtags--error (quote rtags-rdm-not-running)))))) ((edebug-after (edebug-before 374) 377 (= (edebug-after 0 375 result) (edebug-after 0 376 rtags-exit-code-protocol-failure))) (edebug-after (edebug-before 378) 382 (if (edebug-after 0 379 output) (progn (edebug-after (edebug-before 380) 381 (erase-buffer))))) (edebug-after (edebug-before 383) 387 (if (edebug-after 0 384 noerror) nil (edebug-after (edebug-before 385) 386 (rtags--error (quote rtags-protocol-mismatch)))))) ((edebug-after (edebug-before 388) 391 (= (edebug-after 0 389 result) (edebug-after 0 390 rtags-exit-code-not-indexed))) (edebug-after (edebug-before 392) 399 (if (edebug-after 0 393 noerror) nil (edebug-after (edebug-before 394) 398 (rtags--message (quote rtags-file-not-indexed) (edebug-after (edebug-before 395) 397 (or ... "buffer")))))) (edebug-after (edebug-before 400) 401 (erase-buffer)) (edebug-after (edebug-before 402) 403 (setq rtags-last-request-not-indexed t))) (t)) (edebug-after (edebug-before 348) 404 (cond ((edebug-after (edebug-before 349) 352 (= (edebug-after 0 350 result) (edebug-after 0 351 rtags-exit-code-success))) (edebug-after (edebug-before 353) 357 (if (edebug-after 0 354 rtags-autostart-diagnostics) (progn (edebug-after (edebug-before 355) 356 (rtags-diagnostics)))))) ((edebug-after (edebug-before 358) 361 (= (edebug-after 0 359 result) (edebug-after 0 360 rtags-exit-code-connection-failure))) (edebug-after (edebug-before 362) 366 (if (edebug-after 0 363 output) (progn (edebug-after (edebug-before 364) 365 (erase-buffer))))) (edebug-after (edebug-before 367) 368 (setq rtags-last-request-not-connected t)) (edebug-after (edebug-before 369) 373 (if (edebug-after 0 370 noerror) nil (edebug-after (edebug-before 371) 372 (rtags--error (quote rtags-rdm-not-running)))))) ((edebug-after (edebug-before 374) 377 (= (edebug-after 0 375 result) (edebug-after 0 376 rtags-exit-code-protocol-failure))) (edebug-after (edebug-before 378) 382 (if (edebug-after 0 379 output) (progn (edebug-after (edebug-before 380) 381 (erase-buffer))))) (edebug-after (edebug-before 383) 387 (if (edebug-after 0 384 noerror) nil (edebug-after (edebug-before 385) 386 (rtags--error (quote rtags-protocol-mismatch)))))) ((edebug-after (edebug-before 388) 391 (= (edebug-after 0 389 result) (edebug-after 0 390 rtags-exit-code-not-indexed))) (edebug-after (edebug-before 392) 399 (if (edebug-after 0 393 noerror) nil (edebug-after (edebug-before 394) 398 (rtags--message (quote rtags-file-not-indexed) (edebug-after ... 397 ...))))) (edebug-after (edebug-before 400) 401 (erase-buffer)) (edebug-after (edebug-before 402) 403 (setq rtags-last-request-not-indexed t))) (t))) (save-excursion (edebug-after (edebug-before 348) 404 (cond ((edebug-after (edebug-before 349) 352 (= (edebug-after 0 350 result) (edebug-after 0 351 rtags-exit-code-success))) (edebug-after (edebug-before 353) 357 (if (edebug-after 0 354 rtags-autostart-diagnostics) (progn (edebug-after ... 356 ...))))) ((edebug-after (edebug-before 358) 361 (= (edebug-after 0 359 result) (edebug-after 0 360 rtags-exit-code-connection-failure))) (edebug-after (edebug-before 362) 366 (if (edebug-after 0 363 output) (progn (edebug-after ... 365 ...)))) (edebug-after (edebug-before 367) 368 (setq rtags-last-request-not-connected t)) (edebug-after (edebug-before 369) 373 (if (edebug-after 0 370 noerror) nil (edebug-after (edebug-before 371) 372 (rtags--error ...))))) ((edebug-after (edebug-before 374) 377 (= (edebug-after 0 375 result) (edebug-after 0 376 rtags-exit-code-protocol-failure))) (edebug-after (edebug-before 378) 382 (if (edebug-after 0 379 output) (progn (edebug-after ... 381 ...)))) (edebug-after (edebug-before 383) 387 (if (edebug-after 0 384 noerror) nil (edebug-after (edebug-before 385) 386 (rtags--error ...))))) ((edebug-after (edebug-before 388) 391 (= (edebug-after 0 389 result) (edebug-after 0 390 rtags-exit-code-not-indexed))) (edebug-after (edebug-before 392) 399 (if (edebug-after 0 393 noerror) nil (edebug-after (edebug-before 394) 398 (rtags--message ... ...)))) (edebug-after (edebug-before 400) 401 (erase-buffer)) (edebug-after (edebug-before 402) 403 (setq rtags-last-request-not-indexed t))) (t)))) (edebug-after (edebug-before 347) 405 (save-excursion (edebug-after (edebug-before 348) 404 (cond ((edebug-after (edebug-before 349) 352 (= (edebug-after 0 350 result) (edebug-after 0 351 rtags-exit-code-success))) (edebug-after (edebug-before 353) 357 (if (edebug-after 0 354 rtags-autostart-diagnostics) (progn ...)))) ((edebug-after (edebug-before 358) 361 (= (edebug-after 0 359 result) (edebug-after 0 360 rtags-exit-code-connection-failure))) (edebug-after (edebug-before 362) 366 (if (edebug-after 0 363 output) (progn ...))) (edebug-after (edebug-before 367) 368 (setq rtags-last-request-not-connected t)) (edebug-after (edebug-before 369) 373 (if (edebug-after 0 370 noerror) nil (edebug-after ... 372 ...)))) ((edebug-after (edebug-before 374) 377 (= (edebug-after 0 375 result) (edebug-after 0 376 rtags-exit-code-protocol-failure))) (edebug-after (edebug-before 378) 382 (if (edebug-after 0 379 output) (progn ...))) (edebug-after (edebug-before 383) 387 (if (edebug-after 0 384 noerror) nil (edebug-after ... 386 ...)))) ((edebug-after (edebug-before 388) 391 (= (edebug-after 0 389 result) (edebug-after 0 390 rtags-exit-code-not-indexed))) (edebug-after (edebug-before 392) 399 (if (edebug-after 0 393 noerror) nil (edebug-after ... 398 ...))) (edebug-after (edebug-before 400) 401 (erase-buffer)) (edebug-after (edebug-before 402) 403 (setq rtags-last-request-not-indexed t))) (t))))) (if (edebug-after (edebug-before 313) 315 (processp (edebug-after 0 314 result))) (edebug-after (edebug-before 316) 342 (progn (edebug-after (edebug-before 317) 319 (set-process-query-on-exit-flag (edebug-after 0 318 result) nil)) (edebug-after (edebug-before 320) 330 (if (edebug-after (edebug-before 321) 323 (car (edebug-after 0 322 async))) (progn (edebug-after (edebug-before 324) 329 (set-process-filter ... ...))))) (edebug-after (edebug-before 331) 341 (if (edebug-after (edebug-before 332) 334 (cdr (edebug-after 0 333 async))) (progn (edebug-after (edebug-before 335) 340 (set-process-sentinel ... ...))))))) (edebug-after (edebug-before 343) 346 (goto-char (edebug-after (edebug-before 344) 345 (point-min)))) (edebug-after (edebug-before 347) 405 (save-excursion (edebug-after (edebug-before 348) 404 (cond ((edebug-after (edebug-before 349) 352 (= ... ...)) (edebug-after (edebug-before 353) 357 (if ... ...))) ((edebug-after (edebug-before 358) 361 (= ... ...)) (edebug-after (edebug-before 362) 366 (if ... ...)) (edebug-after (edebug-before 367) 368 (setq rtags-last-request-not-connected t)) (edebug-after (edebug-before 369) 373 (if ... nil ...))) ((edebug-after (edebug-before 374) 377 (= ... ...)) (edebug-after (edebug-before 378) 382 (if ... ...)) (edebug-after (edebug-before 383) 387 (if ... nil ...))) ((edebug-after (edebug-before 388) 391 (= ... ...)) (edebug-after (edebug-before 392) 399 (if ... nil ...)) (edebug-after (edebug-before 400) 401 (erase-buffer)) (edebug-after (edebug-before 402) 403 (setq rtags-last-request-not-indexed t))) (t)))))) (edebug-after (edebug-before 312) 406 (if (edebug-after (edebug-before 313) 315 (processp (edebug-after 0 314 result))) (edebug-after (edebug-before 316) 342 (progn (edebug-after (edebug-before 317) 319 (set-process-query-on-exit-flag (edebug-after 0 318 result) nil)) (edebug-after (edebug-before 320) 330 (if (edebug-after (edebug-before 321) 323 (car ...)) (progn (edebug-after ... 329 ...)))) (edebug-after (edebug-before 331) 341 (if (edebug-after (edebug-before 332) 334 (cdr ...)) (progn (edebug-after ... 340 ...)))))) (edebug-after (edebug-before 343) 346 (goto-char (edebug-after (edebug-before 344) 345 (point-min)))) (edebug-after (edebug-before 347) 405 (save-excursion (edebug-after (edebug-before 348) 404 (cond ((edebug-after ... 352 ...) (edebug-after ... 357 ...)) ((edebug-after ... 361 ...) (edebug-after ... 366 ...) (edebug-after ... 368 ...) (edebug-after ... 373 ...)) ((edebug-after ... 377 ...) (edebug-after ... 382 ...) (edebug-after ... 387 ...)) ((edebug-after ... 391 ...) (edebug-after ... 399 ...) (edebug-after ... 401 ...) (edebug-after ... 403 ...)) (t))))))) (let ((result (edebug-after (edebug-before 221) 311 (cond ((edebug-after (edebug-before 222) 225 (and ... ...)) (edebug-after (edebug-before 226) 250 (let ... ... ...))) ((edebug-after 0 251 async) (edebug-after (edebug-before 252) 259 (apply ... "rc" ... ... ...))) ((edebug-after (edebug-before 260) 272 (and ... ...)) (edebug-after (edebug-before 273) 290 (save-current-buffer ... ...))) ((edebug-after 0 291 unsaved) (edebug-after (edebug-before 292) 303 (apply ... ... ... ... nil ...)) nil) (t (edebug-after (edebug-before 304) 310 (apply ... ... nil ... nil ...))))))) (edebug-after (edebug-before 312) 406 (if (edebug-after (edebug-before 313) 315 (processp (edebug-after 0 314 result))) (edebug-after (edebug-before 316) 342 (progn (edebug-after (edebug-before 317) 319 (set-process-query-on-exit-flag (edebug-after 0 318 result) nil)) (edebug-after (edebug-before 320) 330 (if (edebug-after ... 323 ...) (progn ...))) (edebug-after (edebug-before 331) 341 (if (edebug-after ... 334 ...) (progn ...))))) (edebug-after (edebug-before 343) 346 (goto-char (edebug-after (edebug-before 344) 345 (point-min)))) (edebug-after (edebug-before 347) 405 (save-excursion (edebug-after (edebug-before 348) 404 (cond (... ...) (... ... ... ...) (... ... ...) (... ... ... ...) (t))))))) (edebug-after (edebug-before 407) 421 (or (edebug-after 0 408 async) (edebug-after (edebug-before 409) 420 (and (edebug-after (edebug-before 410) 415 (> (edebug-after ... 412 ...) (edebug-after ... 414 ...))) (edebug-after (edebug-before 416) 419 (= (edebug-after 0 417 result) (edebug-after 0 418 rtags-exit-code-success)))))))) (edebug-after (edebug-before 220) 422 (let ((result (edebug-after (edebug-before 221) 311 (cond ((edebug-after ... 225 ...) (edebug-after ... 250 ...)) ((edebug-after 0 251 async) (edebug-after ... 259 ...)) ((edebug-after ... 272 ...) (edebug-after ... 290 ...)) ((edebug-after 0 291 unsaved) (edebug-after ... 303 ...) nil) (t (edebug-after ... 310 ...)))))) (edebug-after (edebug-before 312) 406 (if (edebug-after (edebug-before 313) 315 (processp (edebug-after 0 314 result))) (edebug-after (edebug-before 316) 342 (progn (edebug-after (edebug-before 317) 319 (set-process-query-on-exit-flag ... nil)) (edebug-after (edebug-before 320) 330 (if ... ...)) (edebug-after (edebug-before 331) 341 (if ... ...)))) (edebug-after (edebug-before 343) 346 (goto-char (edebug-after (edebug-before 344) 345 (point-min)))) (edebug-after (edebug-before 347) 405 (save-excursion (edebug-after (edebug-before 348) 404 (cond ... ... ... ... ...)))))) (edebug-after (edebug-before 407) 421 (or (edebug-after 0 408 async) (edebug-after (edebug-before 409) 420 (and (edebug-after (edebug-before 410) 415 (> ... ...)) (edebug-after (edebug-before 416) 419 (= ... ...)))))))) (if (edebug-after (edebug-before 9) 11 (not (edebug-after 0 10 rc))) (edebug-after (edebug-before 12) 16 (if (edebug-after 0 13 noerror) nil (edebug-after (edebug-before 14) 15 (rtags--error (quote rtags-cannot-find-rc))))) (edebug-after (edebug-before 17) 21 (setq output (edebug-after (edebug-before 18) 20 (rtags--convert-output-buffer (edebug-after 0 19 output))))) (edebug-after (edebug-before 22) 23 (setq rtags-last-request-not-connected nil)) (edebug-after (edebug-before 24) 25 (setq rtags-last-request-not-indexed nil)) (edebug-after (edebug-before 26) 30 (setq arguments (edebug-after (edebug-before 27) 29 (rtags-remove-keyword-params (edebug-after 0 28 arguments))))) (edebug-after (edebug-before 31) 35 (setq arguments (edebug-after (edebug-before 32) 34 (rtags-remove (quote (lambda (arg) (not arg))) (edebug-after 0 33 arguments))))) (edebug-after (edebug-before 36) 40 (setq arguments (edebug-after (edebug-before 37) 39 (mapcar (quote rtags-untrampify) (edebug-after 0 38 arguments))))) (edebug-after (edebug-before 41) 46 (let ((v (edebug-after (edebug-before 42) 44 (format "--verify-version=%d" (edebug-after 0 43 rtags-protocol-version))))) (setq arguments (cons v (edebug-after 0 45 arguments))))) (edebug-after (edebug-before 47) 49 (setq arguments (cons "-z" (edebug-after 0 48 arguments)))) (edebug-after (edebug-before 50) 54 (setq path (edebug-after (edebug-before 51) 53 (rtags-untrampify (edebug-after 0 52 path))))) (edebug-after (edebug-before 55) 71 (if (edebug-after 0 56 path-filter) (progn (edebug-after (edebug-before 57) 64 (let ((v ...)) (setq arguments (cons v ...)))) (edebug-after (edebug-before 65) 70 (if (edebug-after 0 66 path-filter-regex) (progn (edebug-after ... 69 ...))))))) (edebug-after (edebug-before 72) 94 (if (edebug-after (edebug-before 73) 78 (and (edebug-after 0 74 unsaved) (edebug-after (edebug-before 75) 77 (rtags-buffer-file-name (edebug-after 0 76 unsaved))))) (progn (edebug-after (edebug-before 79) 93 (let ((v ...)) (setq arguments (cons v ...))))))) (edebug-after (edebug-before 95) 105 (if (edebug-after 0 96 rtags-rc-config-path) (progn (edebug-after (edebug-before 97) 104 (let ((v ...)) (setq arguments (cons v ...))))))) (edebug-after (edebug-before 106) 111 (if (edebug-after 0 107 rtags-completions-enabled) (progn (edebug-after (edebug-before 108) 110 (setq arguments (cons "-b" (edebug-after 0 109 arguments))))))) (edebug-after (edebug-before 112) 119 (if (edebug-after 0 113 silent) (progn (edebug-after (edebug-before 114) 116 (setq arguments (cons "--silent" (edebug-after 0 115 arguments)))) (edebug-after (edebug-before 117) 118 (setq output nil))))) (edebug-after (edebug-before 120) 125 (if (edebug-after 0 121 silent-query) (progn (edebug-after (edebug-before 122) 124 (setq arguments (cons "--silent-query" (edebug-after 0 123 arguments))))))) (edebug-after (edebug-before 126) 147 (if (edebug-after 0 127 range-filter) (progn (edebug-after (edebug-before 128) 146 (let ((v ...)) (setq arguments (cons v ...))))))) (edebug-after (edebug-before 148) 162 (if (edebug-after (edebug-before 149) 152 (or (edebug-after 0 150 timeout) (edebug-after 0 151 rtags-timeout))) (progn (edebug-after (edebug-before 153) 161 (let ((v ...)) (setq arguments (cons v ...))))))) (edebug-after (edebug-before 163) 175 (if (edebug-after (edebug-before 164) 171 (and (edebug-after 0 165 rtags-show-containing-function) (edebug-after (edebug-before 166) 170 (not (edebug-after ... 169 ...))))) (progn (edebug-after (edebug-before 172) 174 (setq arguments (cons "-o" (edebug-after 0 173 arguments))))))) (edebug-after (edebug-before 176) 196 (cond ((edebug-after (edebug-before 177) 179 (stringp (edebug-after 0 178 path))) (edebug-after (edebug-before 180) 185 (let ((v ...)) (setq arguments (cons v ...))))) ((edebug-after 0 186 path) nil) ((edebug-after 0 187 default-directory) (edebug-after (edebug-before 188) 195 (let ((v ...)) (setq arguments (cons v ...))))) (t nil))) (edebug-after (edebug-before 197) 208 (if (edebug-after (edebug-before 198) 202 (> (edebug-after (edebug-before 199) 201 (length (edebug-after 0 200 rtags-socket-file))) 0)) (progn (edebug-after (edebug-before 203) 207 (let ((v ...)) (setq arguments (cons v ...))))))) (edebug-after (edebug-before 209) 219 (if (edebug-after 0 210 rtags-rc-log-enabled) (progn (edebug-after (edebug-before 211) 218 (rtags-log (edebug-after (edebug-before 212) 217 (concat ... " " ...))))))) (edebug-after (edebug-before 220) 422 (let ((result (edebug-after (edebug-before 221) 311 (cond (... ...) (... ...) (... ...) (... ... nil) (t ...))))) (edebug-after (edebug-before 312) 406 (if (edebug-after (edebug-before 313) 315 (processp (edebug-after 0 314 result))) (edebug-after (edebug-before 316) 342 (progn (edebug-after ... 319 ...) (edebug-after ... 330 ...) (edebug-after ... 341 ...))) (edebug-after (edebug-before 343) 346 (goto-char (edebug-after ... 345 ...))) (edebug-after (edebug-before 347) 405 (save-excursion (edebug-after ... 404 ...))))) (edebug-after (edebug-before 407) 421 (or (edebug-after 0 408 async) (edebug-after (edebug-before 409) 420 (and (edebug-after ... 415 ...) (edebug-after ... 419 ...)))))))) (edebug-after (edebug-before 8) 423 (if (edebug-after (edebug-before 9) 11 (not (edebug-after 0 10 rc))) (edebug-after (edebug-before 12) 16 (if (edebug-after 0 13 noerror) nil (edebug-after (edebug-before 14) 15 (rtags--error (quote rtags-cannot-find-rc))))) (edebug-after (edebug-before 17) 21 (setq output (edebug-after (edebug-before 18) 20 (rtags--convert-output-buffer (edebug-after 0 19 output))))) (edebug-after (edebug-before 22) 23 (setq rtags-last-request-not-connected nil)) (edebug-after (edebug-before 24) 25 (setq rtags-last-request-not-indexed nil)) (edebug-after (edebug-before 26) 30 (setq arguments (edebug-after (edebug-before 27) 29 (rtags-remove-keyword-params (edebug-after 0 28 arguments))))) (edebug-after (edebug-before 31) 35 (setq arguments (edebug-after (edebug-before 32) 34 (rtags-remove (quote (lambda ... ...)) (edebug-after 0 33 arguments))))) (edebug-after (edebug-before 36) 40 (setq arguments (edebug-after (edebug-before 37) 39 (mapcar (quote rtags-untrampify) (edebug-after 0 38 arguments))))) (edebug-after (edebug-before 41) 46 (let ((v (edebug-after (edebug-before 42) 44 (format "--verify-version=%d" ...)))) (setq arguments (cons v (edebug-after 0 45 arguments))))) (edebug-after (edebug-before 47) 49 (setq arguments (cons "-z" (edebug-after 0 48 arguments)))) (edebug-after (edebug-before 50) 54 (setq path (edebug-after (edebug-before 51) 53 (rtags-untrampify (edebug-after 0 52 path))))) (edebug-after (edebug-before 55) 71 (if (edebug-after 0 56 path-filter) (progn (edebug-after (edebug-before 57) 64 (let (...) (setq arguments ...))) (edebug-after (edebug-before 65) 70 (if (edebug-after 0 66 path-filter-regex) (progn ...)))))) (edebug-after (edebug-before 72) 94 (if (edebug-after (edebug-before 73) 78 (and (edebug-after 0 74 unsaved) (edebug-after (edebug-before 75) 77 (rtags-buffer-file-name ...)))) (progn (edebug-after (edebug-before 79) 93 (let (...) (setq arguments ...)))))) (edebug-after (edebug-before 95) 105 (if (edebug-after 0 96 rtags-rc-config-path) (progn (edebug-after (edebug-before 97) 104 (let (...) (setq arguments ...)))))) (edebug-after (edebug-before 106) 111 (if (edebug-after 0 107 rtags-completions-enabled) (progn (edebug-after (edebug-before 108) 110 (setq arguments (cons "-b" ...)))))) (edebug-after (edebug-before 112) 119 (if (edebug-after 0 113 silent) (progn (edebug-after (edebug-before 114) 116 (setq arguments (cons "--silent" ...))) (edebug-after (edebug-before 117) 118 (setq output nil))))) (edebug-after (edebug-before 120) 125 (if (edebug-after 0 121 silent-query) (progn (edebug-after (edebug-before 122) 124 (setq arguments (cons "--silent-query" ...)))))) (edebug-after (edebug-before 126) 147 (if (edebug-after 0 127 range-filter) (progn (edebug-after (edebug-before 128) 146 (let (...) (setq arguments ...)))))) (edebug-after (edebug-before 148) 162 (if (edebug-after (edebug-before 149) 152 (or (edebug-after 0 150 timeout) (edebug-after 0 151 rtags-timeout))) (progn (edebug-after (edebug-before 153) 161 (let (...) (setq arguments ...)))))) (edebug-after (edebug-before 163) 175 (if (edebug-after (edebug-before 164) 171 (and (edebug-after 0 165 rtags-show-containing-function) (edebug-after (edebug-before 166) 170 (not ...)))) (progn (edebug-after (edebug-before 172) 174 (setq arguments (cons "-o" ...)))))) (edebug-after (edebug-before 176) 196 (cond ((edebug-after (edebug-before 177) 179 (stringp (edebug-after 0 178 path))) (edebug-after (edebug-before 180) 185 (let (...) (setq arguments ...)))) ((edebug-after 0 186 path) nil) ((edebug-after 0 187 default-directory) (edebug-after (edebug-before 188) 195 (let (...) (setq arguments ...)))) (t nil))) (edebug-after (edebug-before 197) 208 (if (edebug-after (edebug-before 198) 202 (> (edebug-after (edebug-before 199) 201 (length ...)) 0)) (progn (edebug-after (edebug-before 203) 207 (let (...) (setq arguments ...)))))) (edebug-after (edebug-before 209) 219 (if (edebug-after 0 210 rtags-rc-log-enabled) (progn (edebug-after (edebug-before 211) 218 (rtags-log (edebug-after ... 217 ...)))))) (edebug-after (edebug-before 220) 422 (let ((result (edebug-after (edebug-before 221) 311 (cond ... ... ... ... ...)))) (edebug-after (edebug-before 312) 406 (if (edebug-after (edebug-before 313) 315 (processp ...)) (edebug-after (edebug-before 316) 342 (progn ... ... ...)) (edebug-after (edebug-before 343) 346 (goto-char ...)) (edebug-after (edebug-before 347) 405 (save-excursion ...)))) (edebug-after (edebug-before 407) 421 (or (edebug-after 0 408 async) (edebug-after (edebug-before 409) 420 (and ... ...)))))))) (let ((rc (edebug-after (edebug-before 6) 7 (rtags-executable-find "rc")))) (edebug-after (edebug-before 8) 423 (if (edebug-after (edebug-before 9) 11 (not (edebug-after 0 10 rc))) (edebug-after (edebug-before 12) 16 (if (edebug-after 0 13 noerror) nil (edebug-after (edebug-before 14) 15 (rtags--error (quote rtags-cannot-find-rc))))) (edebug-after (edebug-before 17) 21 (setq output (edebug-after (edebug-before 18) 20 (rtags--convert-output-buffer (edebug-after 0 19 output))))) (edebug-after (edebug-before 22) 23 (setq rtags-last-request-not-connected nil)) (edebug-after (edebug-before 24) 25 (setq rtags-last-request-not-indexed nil)) (edebug-after (edebug-before 26) 30 (setq arguments (edebug-after (edebug-before 27) 29 (rtags-remove-keyword-params (edebug-after 0 28 arguments))))) (edebug-after (edebug-before 31) 35 (setq arguments (edebug-after (edebug-before 32) 34 (rtags-remove (quote ...) (edebug-after 0 33 arguments))))) (edebug-after (edebug-before 36) 40 (setq arguments (edebug-after (edebug-before 37) 39 (mapcar (quote rtags-untrampify) (edebug-after 0 38 arguments))))) (edebug-after (edebug-before 41) 46 (let ((v (edebug-after ... 44 ...))) (setq arguments (cons v (edebug-after 0 45 arguments))))) (edebug-after (edebug-before 47) 49 (setq arguments (cons "-z" (edebug-after 0 48 arguments)))) (edebug-after (edebug-before 50) 54 (setq path (edebug-after (edebug-before 51) 53 (rtags-untrampify (edebug-after 0 52 path))))) (edebug-after (edebug-before 55) 71 (if (edebug-after 0 56 path-filter) (progn (edebug-after (edebug-before 57) 64 (let ... ...)) (edebug-after (edebug-before 65) 70 (if ... ...))))) (edebug-after (edebug-before 72) 94 (if (edebug-after (edebug-before 73) 78 (and (edebug-after 0 74 unsaved) (edebug-after ... 77 ...))) (progn (edebug-after (edebug-before 79) 93 (let ... ...))))) (edebug-after (edebug-before 95) 105 (if (edebug-after 0 96 rtags-rc-config-path) (progn (edebug-after (edebug-before 97) 104 (let ... ...))))) (edebug-after (edebug-before 106) 111 (if (edebug-after 0 107 rtags-completions-enabled) (progn (edebug-after (edebug-before 108) 110 (setq arguments ...))))) (edebug-after (edebug-before 112) 119 (if (edebug-after 0 113 silent) (progn (edebug-after (edebug-before 114) 116 (setq arguments ...)) (edebug-after (edebug-before 117) 118 (setq output nil))))) (edebug-after (edebug-before 120) 125 (if (edebug-after 0 121 silent-query) (progn (edebug-after (edebug-before 122) 124 (setq arguments ...))))) (edebug-after (edebug-before 126) 147 (if (edebug-after 0 127 range-filter) (progn (edebug-after (edebug-before 128) 146 (let ... ...))))) (edebug-after (edebug-before 148) 162 (if (edebug-after (edebug-before 149) 152 (or (edebug-after 0 150 timeout) (edebug-after 0 151 rtags-timeout))) (progn (edebug-after (edebug-before 153) 161 (let ... ...))))) (edebug-after (edebug-before 163) 175 (if (edebug-after (edebug-before 164) 171 (and (edebug-after 0 165 rtags-show-containing-function) (edebug-after ... 170 ...))) (progn (edebug-after (edebug-before 172) 174 (setq arguments ...))))) (edebug-after (edebug-before 176) 196 (cond ((edebug-after (edebug-before 177) 179 (stringp ...)) (edebug-after (edebug-before 180) 185 (let ... ...))) ((edebug-after 0 186 path) nil) ((edebug-after 0 187 default-directory) (edebug-after (edebug-before 188) 195 (let ... ...))) (t nil))) (edebug-after (edebug-before 197) 208 (if (edebug-after (edebug-before 198) 202 (> (edebug-after ... 201 ...) 0)) (progn (edebug-after (edebug-before 203) 207 (let ... ...))))) (edebug-after (edebug-before 209) 219 (if (edebug-after 0 210 rtags-rc-log-enabled) (progn (edebug-after (edebug-before 211) 218 (rtags-log ...))))) (edebug-after (edebug-before 220) 422 (let ((result (edebug-after ... 311 ...))) (edebug-after (edebug-before 312) 406 (if (edebug-after ... 315 ...) (edebug-after ... 342 ...) (edebug-after ... 346 ...) (edebug-after ... 405 ...))) (edebug-after (edebug-before 407) 421 (or (edebug-after 0 408 async) (edebug-after ... 420 ...)))))))) (edebug-after (edebug-before 5) 424 (let ((rc (edebug-after (edebug-before 6) 7 (rtags-executable-find "rc")))) (edebug-after (edebug-before 8) 423 (if (edebug-after (edebug-before 9) 11 (not (edebug-after 0 10 rc))) (edebug-after (edebug-before 12) 16 (if (edebug-after 0 13 noerror) nil (edebug-after (edebug-before 14) 15 (rtags--error ...)))) (edebug-after (edebug-before 17) 21 (setq output (edebug-after (edebug-before 18) 20 (rtags--convert-output-buffer ...)))) (edebug-after (edebug-before 22) 23 (setq rtags-last-request-not-connected nil)) (edebug-after (edebug-before 24) 25 (setq rtags-last-request-not-indexed nil)) (edebug-after (edebug-before 26) 30 (setq arguments (edebug-after (edebug-before 27) 29 (rtags-remove-keyword-params ...)))) (edebug-after (edebug-before 31) 35 (setq arguments (edebug-after (edebug-before 32) 34 (rtags-remove ... ...)))) (edebug-after (edebug-before 36) 40 (setq arguments (edebug-after (edebug-before 37) 39 (mapcar ... ...)))) (edebug-after (edebug-before 41) 46 (let ((v ...)) (setq arguments (cons v ...)))) (edebug-after (edebug-before 47) 49 (setq arguments (cons "-z" (edebug-after 0 48 arguments)))) (edebug-after (edebug-before 50) 54 (setq path (edebug-after (edebug-before 51) 53 (rtags-untrampify ...)))) (edebug-after (edebug-before 55) 71 (if (edebug-after 0 56 path-filter) (progn (edebug-after ... 64 ...) (edebug-after ... 70 ...)))) (edebug-after (edebug-before 72) 94 (if (edebug-after (edebug-before 73) 78 (and ... ...)) (progn (edebug-after ... 93 ...)))) (edebug-after (edebug-before 95) 105 (if (edebug-after 0 96 rtags-rc-config-path) (progn (edebug-after ... 104 ...)))) (edebug-after (edebug-before 106) 111 (if (edebug-after 0 107 rtags-completions-enabled) (progn (edebug-after ... 110 ...)))) (edebug-after (edebug-before 112) 119 (if (edebug-after 0 113 silent) (progn (edebug-after ... 116 ...) (edebug-after ... 118 ...)))) (edebug-after (edebug-before 120) 125 (if (edebug-after 0 121 silent-query) (progn (edebug-after ... 124 ...)))) (edebug-after (edebug-before 126) 147 (if (edebug-after 0 127 range-filter) (progn (edebug-after ... 146 ...)))) (edebug-after (edebug-before 148) 162 (if (edebug-after (edebug-before 149) 152 (or ... ...)) (progn (edebug-after ... 161 ...)))) (edebug-after (edebug-before 163) 175 (if (edebug-after (edebug-before 164) 171 (and ... ...)) (progn (edebug-after ... 174 ...)))) (edebug-after (edebug-before 176) 196 (cond ((edebug-after ... 179 ...) (edebug-after ... 185 ...)) ((edebug-after 0 186 path) nil) ((edebug-after 0 187 default-directory) (edebug-after ... 195 ...)) (t nil))) (edebug-after (edebug-before 197) 208 (if (edebug-after (edebug-before 198) 202 (> ... 0)) (progn (edebug-after ... 207 ...)))) (edebug-after (edebug-before 209) 219 (if (edebug-after 0 210 rtags-rc-log-enabled) (progn (edebug-after ... 218 ...)))) (edebug-after (edebug-before 220) 422 (let ((result ...)) (edebug-after (edebug-before 312) 406 (if ... ... ... ...)) (edebug-after (edebug-before 407) 421 (or ... ...)))))))) (save-excursion (edebug-after (edebug-before 5) 424 (let ((rc (edebug-after (edebug-before 6) 7 (rtags-executable-find "rc")))) (edebug-after (edebug-before 8) 423 (if (edebug-after (edebug-before 9) 11 (not (edebug-after 0 10 rc))) (edebug-after (edebug-before 12) 16 (if (edebug-after 0 13 noerror) nil (edebug-after ... 15 ...))) (edebug-after (edebug-before 17) 21 (setq output (edebug-after ... 20 ...))) (edebug-after (edebug-before 22) 23 (setq rtags-last-request-not-connected nil)) (edebug-after (edebug-before 24) 25 (setq rtags-last-request-not-indexed nil)) (edebug-after (edebug-before 26) 30 (setq arguments (edebug-after ... 29 ...))) (edebug-after (edebug-before 31) 35 (setq arguments (edebug-after ... 34 ...))) (edebug-after (edebug-before 36) 40 (setq arguments (edebug-after ... 39 ...))) (edebug-after (edebug-before 41) 46 (let (...) (setq arguments ...))) (edebug-after (edebug-before 47) 49 (setq arguments (cons "-z" ...))) (edebug-after (edebug-before 50) 54 (setq path (edebug-after ... 53 ...))) (edebug-after (edebug-before 55) 71 (if (edebug-after 0 56 path-filter) (progn ... ...))) (edebug-after (edebug-before 72) 94 (if (edebug-after ... 78 ...) (progn ...))) (edebug-after (edebug-before 95) 105 (if (edebug-after 0 96 rtags-rc-config-path) (progn ...))) (edebug-after (edebug-before 106) 111 (if (edebug-after 0 107 rtags-completions-enabled) (progn ...))) (edebug-after (edebug-before 112) 119 (if (edebug-after 0 113 silent) (progn ... ...))) (edebug-after (edebug-before 120) 125 (if (edebug-after 0 121 silent-query) (progn ...))) (edebug-after (edebug-before 126) 147 (if (edebug-after 0 127 range-filter) (progn ...))) (edebug-after (edebug-before 148) 162 (if (edebug-after ... 152 ...) (progn ...))) (edebug-after (edebug-before 163) 175 (if (edebug-after ... 171 ...) (progn ...))) (edebug-after (edebug-before 176) 196 (cond (... ...) (... nil) (... ...) (t nil))) (edebug-after (edebug-before 197) 208 (if (edebug-after ... 202 ...) (progn ...))) (edebug-after (edebug-before 209) 219 (if (edebug-after 0 210 rtags-rc-log-enabled) (progn ...))) (edebug-after (edebug-before 220) 422 (let (...) (edebug-after ... 406 ...) (edebug-after ... 421 ...)))))))) (edebug-after (edebug-before 4) 425 (save-excursion (edebug-after (edebug-before 5) 424 (let ((rc (edebug-after (edebug-before 6) 7 (rtags-executable-find "rc")))) (edebug-after (edebug-before 8) 423 (if (edebug-after (edebug-before 9) 11 (not ...)) (edebug-after (edebug-before 12) 16 (if ... nil ...)) (edebug-after (edebug-before 17) 21 (setq output ...)) (edebug-after (edebug-before 22) 23 (setq rtags-last-request-not-connected nil)) (edebug-after (edebug-before 24) 25 (setq rtags-last-request-not-indexed nil)) (edebug-after (edebug-before 26) 30 (setq arguments ...)) (edebug-after (edebug-before 31) 35 (setq arguments ...)) (edebug-after (edebug-before 36) 40 (setq arguments ...)) (edebug-after (edebug-before 41) 46 (let ... ...)) (edebug-after (edebug-before 47) 49 (setq arguments ...)) (edebug-after (edebug-before 50) 54 (setq path ...)) (edebug-after (edebug-before 55) 71 (if ... ...)) (edebug-after (edebug-before 72) 94 (if ... ...)) (edebug-after (edebug-before 95) 105 (if ... ...)) (edebug-after (edebug-before 106) 111 (if ... ...)) (edebug-after (edebug-before 112) 119 (if ... ...)) (edebug-after (edebug-before 120) 125 (if ... ...)) (edebug-after (edebug-before 126) 147 (if ... ...)) (edebug-after (edebug-before 148) 162 (if ... ...)) (edebug-after (edebug-before 163) 175 (if ... ...)) (edebug-after (edebug-before 176) 196 (cond ... ... ... ...)) (edebug-after (edebug-before 197) 208 (if ... ...)) (edebug-after (edebug-before 209) 219 (if ... ...)) (edebug-after (edebug-before 220) 422 (let ... ... ...)))))))) (closure ((silent-query) (silent) (timeout) (noerror . t) (range-max) (range-min) (output #<buffer temp> nil) (range-filter) (path-filter-regex) (path-filter) (async) (unsaved) (path . "/home/user/project/program.cpp") (arguments "--current-file=/home/user/project/program.cpp" "-z" "--verify-version=125" "-U" "/home/user/project/program.cpp:18:11:" "--elisp" "-K") t) nil (edebug-after (edebug-before 4) 425 (save-excursion (edebug-after (edebug-before 5) 424 (let ((rc (edebug-after ... 7 ...))) (edebug-after (edebug-before 8) 423 (if (edebug-after ... 11 ...) (edebug-after ... 16 ...) (edebug-after ... 21 ...) (edebug-after ... 23 ...) (edebug-after ... 25 ...) (edebug-after ... 30 ...) (edebug-after ... 35 ...) (edebug-after ... 40 ...) (edebug-after ... 46 ...) (edebug-after ... 49 ...) (edebug-after ... 54 ...) (edebug-after ... 71 ...) (edebug-after ... 94 ...) (edebug-after ... 105 ...) (edebug-after ... 111 ...) (edebug-after ... 119 ...) (edebug-after ... 125 ...) (edebug-after ... 147 ...) (edebug-after ... 162 ...) (edebug-after ... 175 ...) (edebug-after ... 196 ...) (edebug-after ... 208 ...) (edebug-after ... 219 ...) (edebug-after ... 422 ...))))))))() edebug-enter(rtags-call-rc ((:path "/home/user/project/program.cpp" :noerror t :silent-query nil "-U" "/home/user/project/program.cpp:18:11:" "--elisp" "-K" nil nil nil nil) "/home/user/project/program.cpp" nil nil nil nil nil (t nil) nil nil t nil nil nil) (closure ((silent-query) (silent) (timeout) (noerror . t) (range-max) (range-min) (output #<buffer temp> nil) (range-filter) (path-filter-regex) (path-filter) (async) (unsaved) (path . "/home/user/project/program.cpp") (arguments "--current-file=/home/user/project/program.cpp" "-z" "--verify-version=125" "-U" "/home/user/project/program.cpp:18:11:" "--elisp" "-K") t) nil (edebug-after (edebug-before 4) 425 (save-excursion (edebug-after (edebug-before 5) 424 (let ((rc (edebug-after ... 7 ...))) (edebug-after (edebug-before 8) 423 (if (edebug-after ... 11 ...) (edebug-after ... 16 ...) (edebug-after ... 21 ...) (edebug-after ... 23 ...) (edebug-after ... 25 ...) (edebug-after ... 30 ...) (edebug-after ... 35 ...) (edebug-after ... 40 ...) (edebug-after ... 46 ...) (edebug-after ... 49 ...) (edebug-after ... 54 ...) (edebug-after ... 71 ...) (edebug-after ... 94 ...) (edebug-after ... 105 ...) (edebug-after ... 111 ...) (edebug-after ... 119 ...) (edebug-after ... 125 ...) (edebug-after ... 147 ...) (edebug-after ... 162 ...) (edebug-after ... 175 ...) (edebug-after ... 196 ...) (edebug-after ... 208 ...) (edebug-after ... 219 ...) (edebug-after ... 422 ...))))))))) edebug-enter(rtags-call-rc ((:path "/home/user/project/program.cpp" :noerror t :silent-query nil "-U" "/home/user/project/program.cpp:18:11:" "--elisp" "-K" nil nil nil nil) "/home/user/project/program.cpp" nil nil nil nil nil (t nil) nil nil t nil nil nil) (closure ((silent-query) (silent) (timeout) (noerror . t) (range-max) (range-min) (output #<buffer temp> nil) (range-filter) (path-filter-regex) (path-filter) (async) (unsaved) (path . "/home/user/project/program.cpp") (arguments "--current-file=/home/user/project/program.cpp" "-z" "--verify-version=125" "-U" "/home/user/project/program.cpp:18:11:" "--elisp" "-K") t) nil (edebug-after (edebug-before 4) 425 (save-excursion (edebug-after (edebug-before 5) 424 (let ((rc (edebug-after ... 7 ...))) (edebug-after (edebug-before 8) 423 (if (edebug-after ... 11 ...) (edebug-after ... 16 ...) (edebug-after ... 21 ...) (edebug-after ... 23 ...) (edebug-after ... 25 ...) (edebug-after ... 30 ...) (edebug-after ... 35 ...) (edebug-after ... 40 ...) (edebug-after ... 46 ...) (edebug-after ... 49 ...) (edebug-after ... 54 ...) (edebug-after ... 71 ...) (edebug-after ... 94 ...) (edebug-after ... 105 ...) (edebug-after ... 111 ...) (edebug-after ... 119 ...) (edebug-after ... 125 ...) (edebug-after ... 147 ...) (edebug-after ... 162 ...) (edebug-after ... 175 ...) (edebug-after ... 196 ...) (edebug-after ... 208 ...) (edebug-after ... 219 ...) (edebug-after ... 422 ...))))))))) (let ((path (car (cdr (or (plist-member arguments (quote :path)) (list nil (edebug-enter ... nil ...)))))) (unsaved (car (cdr (plist-member arguments (quote :unsaved))))) (async (car (cdr (plist-member arguments (quote :async))))) (path-filter (car (cdr (plist-member arguments (quote :path-filter))))) (path-filter-regex (car (cdr (plist-member arguments (quote :path-filter-regex))))) (range-filter (car (cdr (plist-member arguments (quote :range-filter))))) (output (car (cdr (or (plist-member arguments (quote :output)) (list nil (edebug-enter ... nil ...)))))) (range-min (car (cdr (plist-member arguments (quote :range-min))))) (range-max (car (cdr (plist-member arguments (quote :range-max))))) (noerror (car (cdr (plist-member arguments (quote :noerror))))) (timeout (car (cdr (plist-member arguments (quote :timeout))))) (silent (car (cdr (plist-member arguments (quote :silent))))) (silent-query (car (cdr (plist-member arguments (quote :silent-query)))))) (edebug-enter (quote rtags-call-rc) (list arguments path unsaved async path-filter path-filter-regex range-filter output range-min range-max noerror timeout silent silent-query) (function (lambda nil (edebug-after (edebug-before 4) 425 (save-excursion (edebug-after (edebug-before 5) 424 (let ... ...)))))))) rtags-call-rc(:path "/home/user/project/program.cpp" :noerror t :silent-query nil "-U" "/home/user/project/program.cpp:18:11:" "--elisp" "-K" nil nil nil nil) rtags-symbol-info-internal(:location nil) rtags-current-symbol-name() rtags-current-symbol() rtags-find-symbol-at-point(nil) funcall-interactively(rtags-find-symbol-at-point nil) call-interactively(rtags-find-symbol-at-point nil nil) command-execute(rtags-find-symbol-at-point) recursive-edit() edebug--recursive-edit(before) edebug--display-1(nil 4 before) edebug--display(nil 4 before) edebug-debugger(4 before nil) edebug-before(4) (edebug-after (edebug-before 4) 425 (save-excursion (edebug-after (edebug-before 5) 424 (let ((rc (edebug-after (edebug-before 6) 7 (rtags-executable-find "rc")))) (edebug-after (edebug-before 8) 423 (if (edebug-after (edebug-before 9) 11 (not ...)) (edebug-after (edebug-before 12) 16 (if ... nil ...)) (edebug-after (edebug-before 17) 21 (setq output ...)) (edebug-after (edebug-before 22) 23 (setq rtags-last-request-not-connected nil)) (edebug-after (edebug-before 24) 25 (setq rtags-last-request-not-indexed nil)) (edebug-after (edebug-before 26) 30 (setq arguments ...)) (edebug-after (edebug-before 31) 35 (setq arguments ...)) (edebug-after (edebug-before 36) 40 (setq arguments ...)) (edebug-after (edebug-before 41) 46 (let ... ...)) (edebug-after (edebug-before 47) 49 (setq arguments ...)) (edebug-after (edebug-before 50) 54 (setq path ...)) (edebug-after (edebug-before 55) 71 (if ... ...)) (edebug-after (edebug-before 72) 94 (if ... ...)) (edebug-after (edebug-before 95) 105 (if ... ...)) (edebug-after (edebug-before 106) 111 (if ... ...)) (edebug-after (edebug-before 112) 119 (if ... ...)) (edebug-after (edebug-before 120) 125 (if ... ...)) (edebug-after (edebug-before 126) 147 (if ... ...)) (edebug-after (edebug-before 148) 162 (if ... ...)) (edebug-after (edebug-before 163) 175 (if ... ...)) (edebug-after (edebug-before 176) 196 (cond ... ... ... ...)) (edebug-after (edebug-before 197) 208 (if ... ...)) (edebug-after (edebug-before 209) 219 (if ... ...)) (edebug-after (edebug-before 220) 422 (let ... ... ...)))))))) (closure ((silent-query . t) (silent . t) (timeout) (noerror . t) (range-max) (range-min) (output) (range-filter) (path-filter-regex) (path-filter) (async) (unsaved) (path . t) (arguments :noerror t :silent-query t :output nil :silent t :path t "--set-buffers" "/home/user/project/program.h") t) nil (edebug-after (edebug-before 4) 425 (save-excursion (edebug-after (edebug-before 5) 424 (let ((rc (edebug-after ... 7 ...))) (edebug-after (edebug-before 8) 423 (if (edebug-after ... 11 ...) (edebug-after ... 16 ...) (edebug-after ... 21 ...) (edebug-after ... 23 ...) (edebug-after ... 25 ...) (edebug-after ... 30 ...) (edebug-after ... 35 ...) (edebug-after ... 40 ...) (edebug-after ... 46 ...) (edebug-after ... 49 ...) (edebug-after ... 54 ...) (edebug-after ... 71 ...) (edebug-after ... 94 ...) (edebug-after ... 105 ...) (edebug-after ... 111 ...) (edebug-after ... 119 ...) (edebug-after ... 125 ...) (edebug-after ... 147 ...) (edebug-after ... 162 ...) (edebug-after ... 175 ...) (edebug-after ... 196 ...) (edebug-after ... 208 ...) (edebug-after ... 219 ...) (edebug-after ... 422 ...))))))))() edebug-enter(rtags-call-rc ((:noerror t :silent-query t :output nil :silent t :path t "--set-buffers" "/home/user/project/program.h") t nil nil nil nil nil nil nil nil t nil t t) (closure ((silent-query . t) (silent . t) (timeout) (noerror . t) (range-max) (range-min) (output) (range-filter) (path-filter-regex) (path-filter) (async) (unsaved) (path . t) (arguments :noerror t :silent-query t :output nil :silent t :path t "--set-buffers" "/home/user/project/program.h") t) nil (edebug-after (edebug-before 4) 425 (save-excursion (edebug-after (edebug-before 5) 424 (let ((rc (edebug-after ... 7 ...))) (edebug-after (edebug-before 8) 423 (if (edebug-after ... 11 ...) (edebug-after ... 16 ...) (edebug-after ... 21 ...) (edebug-after ... 23 ...) (edebug-after ... 25 ...) (edebug-after ... 30 ...) (edebug-after ... 35 ...) (edebug-after ... 40 ...) (edebug-after ... 46 ...) (edebug-after ... 49 ...) (edebug-after ... 54 ...) (edebug-after ... 71 ...) (edebug-after ... 94 ...) (edebug-after ... 105 ...) (edebug-after ... 111 ...) (edebug-after ... 119 ...) (edebug-after ... 125 ...) (edebug-after ... 147 ...) (edebug-after ... 162 ...) (edebug-after ... 175 ...) (edebug-after ... 196 ...) (edebug-after ... 208 ...) (edebug-after ... 219 ...) (edebug-after ... 422 ...))))))))) edebug-enter(rtags-call-rc ((:noerror t :silent-query t :output nil :silent t :path t "--set-buffers" "/home/user/project/program.h") t nil nil nil nil nil nil nil nil t nil t t) (closure ((silent-query . t) (silent . t) (timeout) (noerror . t) (range-max) (range-min) (output) (range-filter) (path-filter-regex) (path-filter) (async) (unsaved) (path . t) (arguments :noerror t :silent-query t :output nil :silent t :path t "--set-buffers" "/home/user/project/program.h") t) nil (edebug-after (edebug-before 4) 425 (save-excursion (edebug-after (edebug-before 5) 424 (let ((rc (edebug-after ... 7 ...))) (edebug-after (edebug-before 8) 423 (if (edebug-after ... 11 ...) (edebug-after ... 16 ...) (edebug-after ... 21 ...) (edebug-after ... 23 ...) (edebug-after ... 25 ...) (edebug-after ... 30 ...) (edebug-after ... 35 ...) (edebug-after ... 40 ...) (edebug-after ... 46 ...) (edebug-after ... 49 ...) (edebug-after ... 54 ...) (edebug-after ... 71 ...) (edebug-after ... 94 ...) (edebug-after ... 105 ...) (edebug-after ... 111 ...) (edebug-after ... 119 ...) (edebug-after ... 125 ...) (edebug-after ... 147 ...) (edebug-after ... 162 ...) (edebug-after ... 175 ...) (edebug-after ... 196 ...) (edebug-after ... 208 ...) (edebug-after ... 219 ...) (edebug-after ... 422 ...))))))))) (let* ((path (car (cdr (or (plist-member arguments (quote :path)) (list nil (edebug-enter ... nil ...)))))) (unsaved (car (cdr (plist-member arguments (quote :unsaved))))) (async (car (cdr (plist-member arguments (quote :async))))) (path-filter (car (cdr (plist-member arguments (quote :path-filter))))) (path-filter-regex (car (cdr (plist-member arguments (quote :path-filter-regex))))) (range-filter (car (cdr (plist-member arguments (quote :range-filter))))) (output (car (cdr (or (plist-member arguments (quote :output)) (list nil (edebug-enter ... nil ...)))))) (range-min (car (cdr (plist-member arguments (quote :range-min))))) (range-max (car (cdr (plist-member arguments (quote :range-max))))) (noerror (car (cdr (plist-member arguments (quote :noerror))))) (timeout (car (cdr (plist-member arguments (quote :timeout))))) (silent (car (cdr (plist-member arguments (quote :silent))))) (silent-query (car (cdr (plist-member arguments (quote :silent-query)))))) (edebug-enter (quote rtags-call-rc) (list arguments path unsaved async path-filter path-filter-regex range-filter output range-min range-max noerror timeout silent silent-query) (function (lambda nil (edebug-after (edebug-before 4) 425 (save-excursion (edebug-after (edebug-before 5) 424 (let ... ...)))))))) rtags-call-rc(:noerror t :silent-query t :output nil :silent t :path t "--set-buffers" "/home/user/project/program.h") rtags-update-buffer-list() set-window-buffer(nil #) switch-to-buffer("program.h" nil force-same-window) ivy--switch-buffer-action("program.h") ivy-call() ivy-read("Switch to buffer: " internal-complete-buffer :matcher ivy--switch-buffer-matcher :preselect "program.h" :action ivy--switch-buffer-action :keymap (keymap (3 keymap (11 . ivy-switch-buffer-kill))) :caller ivy-switch-buffer) ivy-switch-buffer() funcall-interactively(ivy-switch-buffer) call-interactively(ivy-switch-buffer nil nil) command-execute(ivy-switch-buffer)

sree314 commented 6 years ago

Something very strange, but I got it to work like this.

mv ~/bin/rc ~/bin/rc_orig

Then, I created a shell script ~/bin/rc:

#!/bin/bash

#echo "$@" > /tmp/rc-call # was trying to see what the command line parameters were
`dirname $0`/rc_orig "$@"

And it worked! No more abort on error. It opens up a new buffer and moves to the location.

FWIW, running rc on the command line always worked.

build/bin/rc --follow-location src/rdm.cpp:73:34

would return:

src/Server.h:55:20:     static Server *instance() { return sInstance; }
sree314 commented 6 years ago

So I ran emacs through strace, and what's happening is that when rc (the binary) is called, it aborts (via a SIGABRT) on the third call to rc.

--- SIGCHLD {si_signo=SIGCHLD, si_code=CLD_DUMPED, si_pid=26736, si_uid=2066, si_status=SIGABRT, si_utime=0, si_stime=0} ---

With the bash script wrapper, the rc binary is called six times, and all of them work.

I don't have selinux or anything like that installed. I'll try to get a core dump.

casch-at commented 6 years ago

@sree314 I didn't think about that. That makes sense. Thanks for helping finding the cause of the problem.

Beside, it would probably make sense that the return value to rc calls will be checked, and print an error message on "Aborted", ...

sree314 commented 6 years ago

Okay, now I understand why the bash wrapper worked -- it merely masked the abort return code. After some more digging, I can now reproduce the abort on the command line, outside of emacs:

~/bin/rc_orig  --current-file=/localdisk/sree/rtags/src/rdm.cpp -z --verify-version=125 -U /localdisk/sree/rtags/src/rdm.cpp:73:34: --elisp -K
terminate called after throwing an instance of 'std::regex_error'
  what():  regex_error
Aborted (core dumped)

Unfortunately I can't get core dumps easily on this machine, but I'll try to figure something out ...

casch-at commented 6 years ago

There were quit some issues regarding std::regex_error and gcc < 4.9. https://github.com/Andersbakken/rtags/issues?utf8=%E2%9C%93&q=is%3Aissue+std%3A%3Aregex

Could someone try to build RTags with GCC >= 4.9 and check if it works than?

casch-at commented 6 years ago

Maybe since 3a23a433 rc crashes when build with GCC < 4.9

sree314 commented 6 years ago

Yes, I originally built it with gcc 4.8.5.

I rebuilt using gcc 6.3.1 and it works fine. Thanks!

README indicates gcc-4.7+ is fine, it should be updated?

casch-at commented 6 years ago

I rebuilt using gcc 6.3.1 and it works fine. Thanks!

Great news!

README indicates gcc-4.7+ is fine, it should be updated?

Either that, or use std::regex_constants::basic instead of std::regex_constants::extended. But increasing the minimum required version to 4.9 is probably be the better (easier) option.

sree314 notifications@github.com writes:

Yes, I originally built it with gcc 4.8.5.

I rebuilt using gcc 6.3.1 and it works fine. Thanks!

README indicates gcc-4.7+ is fine, it should be updated?

— You are receiving this because you commented. Reply to this email directly, view it on GitHub, or mute the thread.

casch-at commented 6 years ago

Reverting 3a23a43 would fix it too. Tested on CentOS 7.