Skip to content

Instantly share code, notes, and snippets.

@chopmo
Created February 22, 2018 08:58
Show Gist options
  • Save chopmo/dc0fbafbc98eda5bb1d1c679b3c0d0e8 to your computer and use it in GitHub Desktop.
Save chopmo/dc0fbafbc98eda5bb1d1c679b3c0d0e8 to your computer and use it in GitHub Desktop.
Debugger entered--Lisp error: (wrong-type-argument integer-or-marker-p nil)
goto-char(nil)
(progn (while (cider-stacktrace-next-cause)) (goto-char (next-single-property-change (point) (quote flags))))
(if compile-error-p (goto-char (next-single-property-change (point) (quote compile-error))) (progn (while (cider-stacktrace-next-cause)) (goto-char (next-single-property-change (point) (quote flags)))))
(save-current-buffer (set-buffer cider-error-buffer) (goto-char (point-min)) (if compile-error-p (goto-char (next-single-property-change (point) (quote compile-error))) (progn (while (cider-stacktrace-next-cause)) (goto-char (next-single-property-change (point) (quote flags))))))
(progn (select-window (car save-selected-window--state) (quote norecord)) (save-current-buffer (set-buffer cider-error-buffer) (goto-char (point-min)) (if compile-error-p (goto-char (next-single-property-change (point) (quote compile-error))) (progn (while (cider-stacktrace-next-cause)) (goto-char (next-single-property-change (point) (quote flags)))))))
(unwind-protect (progn (select-window (car save-selected-window--state) (quote norecord)) (save-current-buffer (set-buffer cider-error-buffer) (goto-char (point-min)) (if compile-error-p (goto-char (next-single-property-change (point) (quote compile-error))) (progn (while (cider-stacktrace-next-cause)) (goto-char (next-single-property-change (point) (quote flags))))))) (internal--after-with-selected-window save-selected-window--state))
(save-current-buffer (unwind-protect (progn (select-window (car save-selected-window--state) (quote norecord)) (save-current-buffer (set-buffer cider-error-buffer) (goto-char (point-min)) (if compile-error-p (goto-char (next-single-property-change (point) (quote compile-error))) (progn (while (cider-stacktrace-next-cause)) (goto-char (next-single-property-change ... ...)))))) (internal--after-with-selected-window save-selected-window--state)))
(let ((save-selected-window--state (internal--before-with-selected-window (or (get-buffer-window cider-error-buffer) (selected-window))))) (save-current-buffer (unwind-protect (progn (select-window (car save-selected-window--state) (quote norecord)) (save-current-buffer (set-buffer cider-error-buffer) (goto-char (point-min)) (if compile-error-p (goto-char (next-single-property-change ... ...)) (progn (while ...) (goto-char ...))))) (internal--after-with-selected-window save-selected-window--state))))
(let ((compile-error-p (equal class "clojure.lang.Compiler$CompilerException"))) (if compile-error-p (progn (cider-stacktrace-cycle-cause (length causes) 1))) (cider-stacktrace-cycle-cause 1 cider-stacktrace-detail-max) (let ((save-selected-window--state (internal--before-with-selected-window (or (get-buffer-window cider-error-buffer) (selected-window))))) (save-current-buffer (unwind-protect (progn (select-window (car save-selected-window--state) (quote norecord)) (save-current-buffer (set-buffer cider-error-buffer) (goto-char (point-min)) (if compile-error-p (goto-char ...) (progn ... ...)))) (internal--after-with-selected-window save-selected-window--state)))))
(let ((class (nrepl-dict-get (car causes) "class"))) (let ((compile-error-p (equal class "clojure.lang.Compiler$CompilerException"))) (if compile-error-p (progn (cider-stacktrace-cycle-cause (length causes) 1))) (cider-stacktrace-cycle-cause 1 cider-stacktrace-detail-max) (let ((save-selected-window--state (internal--before-with-selected-window (or (get-buffer-window cider-error-buffer) (selected-window))))) (save-current-buffer (unwind-protect (progn (select-window (car save-selected-window--state) (quote norecord)) (save-current-buffer (set-buffer cider-error-buffer) (goto-char ...) (if compile-error-p ... ...))) (internal--after-with-selected-window save-selected-window--state))))))
cider-stacktrace-initialize(((dict "class" "java.lang.NullPointerException" "id" "411" "message" nil "session" "0868d054-7d13-45b6-b1ea-f3d782afc98d" "stacktrace" (nil))))
(save-current-buffer (set-buffer buffer) (let ((inhibit-read-only t)) (erase-buffer) (insert "\n") (cider-stacktrace-render-filters buffer (list (quote ("Project-Only" project)) (list "All" nil)) (quote (("Clojure" clj) ("Java" java) ("REPL" repl) ("Tooling" tooling) ("Duplicates" dup)))) (insert "\n") (if error-types (progn (cider-stacktrace-render-suppression-toggle buffer error-types) (insert "\n\n"))) (let ((num (length causes))) (let ((--dolist-tail-- causes)) (while --dolist-tail-- (let ((cause ...)) (let (...) (cider-stacktrace-render-cause buffer cause num note) (setq num ...)) (setq --dolist-tail-- (cdr --dolist-tail--))))))) (cider-stacktrace-initialize causes) (font-lock-refresh-defaults))
cider-stacktrace-render(#<buffer *cider-error*> ((dict "class" "java.lang.NullPointerException" "id" "411" "message" nil "session" "0868d054-7d13-45b6-b1ea-f3d782afc98d" "stacktrace" (nil))))
#[257 "\303\304\"\303\305\"\203
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment