Skip to content

Instantly share code, notes, and snippets.

@zzamboni
Created August 28, 2020 11:56
Show Gist options
  • Save zzamboni/5c57baf3360ce998cbaddbc8ea8939d7 to your computer and use it in GitHub Desktop.
Save zzamboni/5c57baf3360ce998cbaddbc8ea8939d7 to your computer and use it in GitHub Desktop.
- Waiting for 726 async jobs...
Debugger entered--Lisp error: (invalid-read-syntax "#")
native-elisp-load("/Users/taazadi1/.emacs.d/.local/cache/eln/x86_64-a..." t)
#f(compiled-function (process event) #<bytecode 0x14414972eaf5e394>)(#<process Compiling: /Users/taazadi1/.emacs.d/.local/straight/build/org-edna/org-edna-tests.el> "finished\n")
sleep-for(0.1)
(let ((inhibit-message t)) (sleep-for 0.1))
(if (and (= 0 tick) (/= previous pending)) (progn (doom--print (doom--format (format "- Waiting for %d async jobs..." pending))) (setq previous pending)) (let ((inhibit-message t)) (sleep-for 0.1)))
(while (progn (setq pending (doom--native-compile-jobs)) (setq tick (if --cl-var-- 0 (% (1+ tick) 15))) (not (= 0 pending))) (if (and (= 0 tick) (/= previous pending)) (progn (doom--print (doom--format (format "- Waiting for %d async jobs..." pending))) (setq previous pending)) (let ((inhibit-message t)) (sleep-for 0.1))) (setq --cl-var-- nil))
(let* ((pending nil) (tick nil) (previous 0) (--cl-var-- t)) (while (progn (setq pending (doom--native-compile-jobs)) (setq tick (if --cl-var-- 0 (% (1+ tick) 15))) (not (= 0 pending))) (if (and (= 0 tick) (/= previous pending)) (progn (doom--print (doom--format (format "- Waiting for %d async jobs..." pending))) (setq previous pending)) (let ((inhibit-message t)) (sleep-for 0.1))) (setq --cl-var-- nil)) nil)
doom--wait-for-compile-jobs()
(progn (doom--wait-for-compile-jobs) (doom--print (doom--format (format (doom--output-class 'success "Rebuilt %d package(s)") (length built)))))
(if built (progn (doom--wait-for-compile-jobs) (doom--print (doom--format (format (doom--output-class 'success "Rebuilt %d package(s)") (length built))))) (progn (doom--print (doom--format (format (doom--output-class 'success "No packages need rebuilding")))) nil))
(let* ((built (and t (let* ((recipes recipes) (built nil) (straight-use-package-pre-build-functions (cons ... straight-use-package-pre-build-functions))) (let ((--dolist-tail-- recipes) recipe) (while --dolist-tail-- (setq recipe ...) (let* ... ...) (setq --dolist-tail-- ...)) (setq recipe nil) (nreverse built)))))) (if built (progn (doom--wait-for-compile-jobs) (doom--print (doom--format (format (doom--output-class 'success "Rebuilt %d package(s)") (length built))))) (progn (doom--print (doom--format (format (doom--output-class 'success "No packages need rebuilding")))) nil)))
(let ((straight-check-for-modifications (if (file-directory-p (straight--modified-dir)) (progn '(find-when-checking)))) (straight--allow-find (and straight-check-for-modifications (executable-find straight-find-executable) t)) (straight--packages-not-to-rebuild (or straight--packages-not-to-rebuild (make-hash-table :test #'equal))) (straight--packages-to-rebuild (or (if force-p :all straight--packages-to-rebuild) (make-hash-table :test #'equal))) (recipes (doom-package-recipe-list))) (add-hook 'comp-async-cu-done-hook #'doom--native-compile-done-h) (if force-p nil (straight--make-build-cache-available)) (let* ((built (and t (let* ((recipes recipes) (built nil) (straight-use-package-pre-build-functions ...)) (let (... recipe) (while --dolist-tail-- ... ... ...) (setq recipe nil) (nreverse built)))))) (if built (progn (doom--wait-for-compile-jobs) (doom--print (doom--format (format (doom--output-class ... "Rebuilt %d package(s)") (length built))))) (progn (doom--print (doom--format (format (doom--output-class ... "No packages need rebuilding")))) nil))))
(let ((doom-output-indent (+ doom-output-indent-increment doom-output-indent))) (let ((straight-check-for-modifications (if (file-directory-p (straight--modified-dir)) (progn '(find-when-checking)))) (straight--allow-find (and straight-check-for-modifications (executable-find straight-find-executable) t)) (straight--packages-not-to-rebuild (or straight--packages-not-to-rebuild (make-hash-table :test #'equal))) (straight--packages-to-rebuild (or (if force-p :all straight--packages-to-rebuild) (make-hash-table :test #'equal))) (recipes (doom-package-recipe-list))) (add-hook 'comp-async-cu-done-hook #'doom--native-compile-done-h) (if force-p nil (straight--make-build-cache-available)) (let* ((built (and t (let* (... ... ...) (let ... ... ... ...))))) (if built (progn (doom--wait-for-compile-jobs) (doom--print (doom--format (format ... ...)))) (progn (doom--print (doom--format (format ...))) nil)))))
doom-cli-packages-build(t)
(if (doom-cli-packages-build (not rebuild-p)) (progn (doom-autoloads-reload)))
(let ((rebuild-p (cdr (assq 'rebuild-p --alist--)))) (if (doom-cli-packages-build (not rebuild-p)) (progn (doom-autoloads-reload))) t)
(lambda (--alist--) (ignore --alist--) (let ((rebuild-p (cdr (assq 'rebuild-p --alist--)))) (if (doom-cli-packages-build (not rebuild-p)) (progn (doom-autoloads-reload))) t))(nil)
funcall((lambda (--alist--) (ignore --alist--) (let ((rebuild-p (cdr (assq 'rebuild-p --alist--)))) (if (doom-cli-packages-build (not rebuild-p)) (progn (doom-autoloads-reload))) t)) nil)
(if cli (funcall (progn (or (and (memq (type-of cli) cl-struct-doom-cli-tags) t) (signal 'wrong-type-argument (list 'doom-cli cli))) (aref cli 7)) (doom--cli-process cli (remq nil args))) (user-error "Couldn't find any %S command" command))
...
(unwind-protect (progn (fset #'message vnew) (ignore message) (unwind-protect (catch 'exit (if (and (not (getenv "__DOOMRESTART")) (or doomdir localdir debug-p auto-accept-p)) (progn (if doomdir (progn ... ...)) (if localdir (progn ... ...)) (if debug-p (progn ... ...)) (if auto-accept-p (progn ... ...)) (throw 'exit "__DOOMRESTART=1 $@"))) (delete-file doom-cli-log-file) (delete-file doom-cli-log-error-file) (if help-p (progn (if command (progn ...)) (setq command "help"))) (if (null command) (doom-cli-execute "help") (let ((start-time ...)) (run-hooks 'doom-cli-pre-hook) (if (apply ... command args) (progn ... ...))))) (save-current-buffer (set-buffer log-buffer) (require 'ansi-color) (ansi-color-filter-region (point-min) (point-max))) (let ((dest doom-cli-log-file)) (cond ((bufferp dest) (save-current-buffer (set-buffer dest) (insert-buffer-substring log-buffer))) ((stringp dest) (make-directory (file-name-directory dest) 'parents) (let (... ...) (unwind-protect ... ...)))) (kill-buffer log-buffer)))) (fset #'message old))
(let* ((vnew #'(lambda (msg &rest args) (save-current-buffer (set-buffer log-buffer) (let (...) (insert ... "\n"))) (if doom-debug-p (doom--print (doom--format ...)) (apply message msg args)))) (old (symbol-function #'message))) (unwind-protect (progn (fset #'message vnew) (ignore message) (unwind-protect (catch 'exit (if (and (not ...) (or doomdir localdir debug-p auto-accept-p)) (progn (if doomdir ...) (if localdir ...) (if debug-p ...) (if auto-accept-p ...) (throw ... "__DOOMRESTART=1 $@"))) (delete-file doom-cli-log-file) (delete-file doom-cli-log-error-file) (if help-p (progn (if command ...) (setq command "help"))) (if (null command) (doom-cli-execute "help") (let (...) (run-hooks ...) (if ... ...)))) (save-current-buffer (set-buffer log-buffer) (require 'ansi-color) (ansi-color-filter-region (point-min) (point-max))) (let ((dest doom-cli-log-file)) (cond ((bufferp dest) (save-current-buffer ... ...)) ((stringp dest) (make-directory ... ...) (let ... ...))) (kill-buffer log-buffer)))) (fset #'message old)))
(let ((message (symbol-function #'message))) (let* ((vnew #'(lambda (msg &rest args) (save-current-buffer (set-buffer log-buffer) (let ... ...)) (if doom-debug-p (doom--print ...) (apply message msg args)))) (old (symbol-function #'message))) (unwind-protect (progn (fset #'message vnew) (ignore message) (unwind-protect (catch 'exit (if (and ... ...) (progn ... ... ... ... ...)) (delete-file doom-cli-log-file) (delete-file doom-cli-log-error-file) (if help-p (progn ... ...)) (if (null command) (doom-cli-execute "help") (let ... ... ...))) (save-current-buffer (set-buffer log-buffer) (require 'ansi-color) (ansi-color-filter-region (point-min) (point-max))) (let ((dest doom-cli-log-file)) (cond (... ...) (... ... ...)) (kill-buffer log-buffer)))) (fset #'message old))))
(let* ((log-buffer (generate-new-buffer " *doom log*")) (standard-output #'(lambda (out) (save-current-buffer (set-buffer log-buffer) (insert-char out)) (send-string-to-terminal (char-to-string out))))) (let ((message (symbol-function #'message))) (let* ((vnew #'(lambda (msg &rest args) (save-current-buffer ... ...) (if doom-debug-p ... ...))) (old (symbol-function #'message))) (unwind-protect (progn (fset #'message vnew) (ignore message) (unwind-protect (catch 'exit (if ... ...) (delete-file doom-cli-log-file) (delete-file doom-cli-log-error-file) (if help-p ...) (if ... ... ...)) (save-current-buffer (set-buffer log-buffer) (require ...) (ansi-color-filter-region ... ...)) (let (...) (cond ... ...) (kill-buffer log-buffer)))) (fset #'message old)))))
(condition-case e (let* ((log-buffer (generate-new-buffer " *doom log*")) (standard-output #'(lambda (out) (save-current-buffer (set-buffer log-buffer) (insert-char out)) (send-string-to-terminal (char-to-string out))))) (let ((message (symbol-function #'message))) (let* ((vnew #'(lambda ... ... ...)) (old (symbol-function #'message))) (unwind-protect (progn (fset #'message vnew) (ignore message) (unwind-protect (catch ... ... ... ... ... ...) (save-current-buffer ... ... ...) (let ... ... ...))) (fset #'message old))))) (doom-cli-command-not-found-error (doom--print (doom--format (format (doom--output-class 'error "Command 'doom %s' not recognized") (string-join (cdr e) " ")))) (doom--print (doom--format (format "\nDid you mean one of these commands?"))) (apply #'doom-cli-execute "help" "--similar" (string-join (cdr e) " ")) 2) (doom-cli-wrong-number-of-arguments-error (let* ((--cl-rest-- (cdr e)) (route (if (= (length --cl-rest--) 5) (car-safe (prog1 --cl-rest-- ...)) (signal 'wrong-number-of-arguments (list ... ...)))) (opt (car-safe (prog1 --cl-rest-- (setq --cl-rest-- ...)))) (arg (car-safe (prog1 --cl-rest-- (setq --cl-rest-- ...)))) (n (car-safe (prog1 --cl-rest-- (setq --cl-rest-- ...)))) (d (car --cl-rest--))) (progn (doom--print (doom--format (format (doom--output-class ... "doom %s: %S requires %d arguments, but %d given\n") (mapconcat ... route " ") arg n d))) (let ((doom-output-indent (+ doom-output-indent-increment doom-output-indent))) (apply #'doom-cli-execute "help" (mapcar #'symbol-name route))))) 3) (doom-cli-unrecognized-option-error (let ((option (car (cdr e)))) (doom--print (doom--format (format (doom--output-class 'error "Unrecognized option: %S") option))) (if (string-match "^--[^=]+=\\(.+\\)$" option) (progn (doom--print (doom--format (format "The %S syntax isn't supported. Use '%s %s' instead..." option ... ...)))))) 4) (doom-cli-deprecated-error (let* ((commands (cdr e)) (route (if commands (car-safe (prog1 commands ...)) (signal 'wrong-number-of-arguments (list ... ...))))) (progn (doom--print (doom--format (format (doom--output-class ... "The 'doom %s' command was removed and replaced wit...") (mapconcat ... route " ")))) (let ((doom-output-indent (+ doom-output-indent-increment doom-output-indent))) (let ((--dolist-tail-- commands)) (while --dolist-tail-- (let ... ... ...)))))) 5) (user-error (doom--print (doom--format (format (doom--output-class 'warn "%s") (car (cdr e))))) 1))
(let ((help-p (cdr (assq 'help-p --alist--))) (auto-accept-p (cdr (assq 'auto-accept-p --alist--))) (debug-p (cdr (assq 'debug-p --alist--))) (doomdir (cdr (assq 'doomdir --alist--))) (localdir (cdr (assq 'localdir --alist--))) (command (cdr (assq 'command --alist--))) (args (cdr (assq 'args --alist--)))) (condition-case e (let* ((log-buffer (generate-new-buffer " *doom log*")) (standard-output #'(lambda (out) (save-current-buffer ... ...) (send-string-to-terminal ...)))) (let ((message (symbol-function #'message))) (let* ((vnew #'...) (old (symbol-function ...))) (unwind-protect (progn (fset ... vnew) (ignore message) (unwind-protect ... ... ...)) (fset #'message old))))) (doom-cli-command-not-found-error (doom--print (doom--format (format (doom--output-class 'error "Command 'doom %s' not recognized") (string-join (cdr e) " ")))) (doom--print (doom--format (format "\nDid you mean one of these commands?"))) (apply #'doom-cli-execute "help" "--similar" (string-join (cdr e) " ")) 2) (doom-cli-wrong-number-of-arguments-error (let* ((--cl-rest-- (cdr e)) (route (if (= ... 5) (car-safe ...) (signal ... ...))) (opt (car-safe (prog1 --cl-rest-- ...))) (arg (car-safe (prog1 --cl-rest-- ...))) (n (car-safe (prog1 --cl-rest-- ...))) (d (car --cl-rest--))) (progn (doom--print (doom--format (format ... ... arg n d))) (let ((doom-output-indent ...)) (apply #'doom-cli-execute "help" (mapcar ... route))))) 3) (doom-cli-unrecognized-option-error (let ((option (car (cdr e)))) (doom--print (doom--format (format (doom--output-class ... "Unrecognized option: %S") option))) (if (string-match "^--[^=]+=\\(.+\\)$" option) (progn (doom--print (doom--format ...))))) 4) (doom-cli-deprecated-error (let* ((commands (cdr e)) (route (if commands (car-safe ...) (signal ... ...)))) (progn (doom--print (doom--format (format ... ...))) (let ((doom-output-indent ...)) (let (...) (while --dolist-tail-- ...))))) 5) (user-error (doom--print (doom--format (format (doom--output-class 'warn "%s") (car (cdr e))))) 1)))
(closure ((plist) (aliases) (name . :doom) cl-struct-doom-cli-option-tags cl-struct-doom-cli-tags t) (--alist--) (ignore --alist--) (let ((help-p (cdr (assq 'help-p --alist--))) (auto-accept-p (cdr (assq 'auto-accept-p --alist--))) (debug-p (cdr (assq 'debug-p --alist--))) (doomdir (cdr (assq 'doomdir --alist--))) (localdir (cdr (assq 'localdir --alist--))) (command (cdr (assq 'command --alist--))) (args (cdr (assq 'args --alist--)))) (condition-case e (let* ((log-buffer (generate-new-buffer " *doom log*")) (standard-output #'...)) (let ((message ...)) (let* (... ...) (unwind-protect ... ...)))) (doom-cli-command-not-found-error (doom--print (doom--format (format ... ...))) (doom--print (doom--format (format "\nDid you mean one of these commands?"))) (apply #'doom-cli-execute "help" "--similar" (string-join (cdr e) " ")) 2) (doom-cli-wrong-number-of-arguments-error (let* ((--cl-rest-- ...) (route ...) (opt ...) (arg ...) (n ...) (d ...)) (progn (doom--print ...) (let ... ...))) 3) (doom-cli-unrecognized-option-error (let ((option ...)) (doom--print (doom--format ...)) (if (string-match "^--[^=]+=\\(.+\\)$" option) (progn ...))) 4) (doom-cli-deprecated-error (let* ((commands ...) (route ...)) (progn (doom--print ...) (let ... ...))) 5) (user-error (doom--print (doom--format (format ... ...))) 1))))(((command . "build")))
funcall((closure ((plist) (aliases) (name . :doom) cl-struct-doom-cli-option-tags cl-struct-doom-cli-tags t) (--alist--) (ignore --alist--) (let ((help-p (cdr (assq 'help-p --alist--))) (auto-accept-p (cdr (assq 'auto-accept-p --alist--))) (debug-p (cdr (assq 'debug-p --alist--))) (doomdir (cdr (assq 'doomdir --alist--))) (localdir (cdr (assq 'localdir --alist--))) (command (cdr (assq 'command --alist--))) (args (cdr (assq 'args --alist--)))) (condition-case e (let* ((log-buffer (generate-new-buffer " *doom log*")) (standard-output #'...)) (let ((message ...)) (let* (... ...) (unwind-protect ... ...)))) (doom-cli-command-not-found-error (doom--print (doom--format (format ... ...))) (doom--print (doom--format (format "\nDid you mean one of these commands?"))) (apply #'doom-cli-execute "help" "--similar" (string-join (cdr e) " ")) 2) (doom-cli-wrong-number-of-arguments-error (let* ((--cl-rest-- ...) (route ...) (opt ...) (arg ...) (n ...) (d ...)) (progn (doom--print ...) (let ... ...))) 3) (doom-cli-unrecognized-option-error (let ((option ...)) (doom--print (doom--format ...)) (if (string-match "^--[^=]+=\\(.+\\)$" option) (progn ...))) 4) (doom-cli-deprecated-error (let* ((commands ...) (route ...)) (progn (doom--print ...) (let ... ...))) 5) (user-error (doom--print (doom--format (format ... ...))) 1)))) ((command . "build")))
(if cli (funcall (progn (or (and (memq (type-of cli) cl-struct-doom-cli-tags) t) (signal 'wrong-type-argument (list 'doom-cli cli))) (aref cli 7)) (doom--cli-process cli (remq nil args))) (user-error "Couldn't find any %S command" command))
(let* ((cli (and t (doom-cli-get command)))) (if cli (funcall (progn (or (and (memq (type-of cli) cl-struct-doom-cli-tags) t) (signal 'wrong-type-argument (list 'doom-cli cli))) (aref cli 7)) (doom--cli-process cli (remq nil args))) (user-error "Couldn't find any %S command" command)))
doom-cli-execute(:doom "build")
apply(doom-cli-execute :doom "build")
(catch 'exit (apply #'doom-cli-execute :doom (cdr (member "--" argv))))
(let* ((val (catch 'exit (apply #'doom-cli-execute :doom (cdr (member "--" argv))))) (pcase-0 #'(lambda (command) (let ((script ...) (coding-system-for-write ...) (coding-system-for-read ...)) (let (... ...) (unwind-protect ... ...)) (set-file-modes script 448)) 128))) (cond ((integerp val) (let ((code val)) code)) ((or (consp val) (or (stringp val) (keywordp val))) (funcall pcase-0 val)) (t 0)))
(kill-emacs (let* ((val (catch 'exit (apply #'doom-cli-execute :doom (cdr (member "--" argv))))) (pcase-0 #'(lambda (command) (let (... ... ...) (let ... ...) (set-file-modes script 448)) 128))) (cond ((integerp val) (let ((code val)) code)) ((or (consp val) (or (stringp val) (keywordp val))) (funcall pcase-0 val)) (t 0))))
eval-buffer(#<buffer *load*> nil "/Users/taazadi1/.emacs.d/bin/doom" nil t) ; Reading at buffer position 6442
load-with-code-conversion("/Users/taazadi1/.emacs.d/bin/doom" "/Users/taazadi1/.emacs.d/bin/doom" nil t)
command-line-1(("-scriptload" "/Users/taazadi1/.emacs.d/bin/doom" "--" "build"))
command-line()
normal-top-level()
Exception: doom exited with 255
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment