Skip to content

Instantly share code, notes, and snippets.

@ledbettj
Created April 4, 2016 15:25
Show Gist options
  • Save ledbettj/0f660f9546f605b0c95b3e7e72613c01 to your computer and use it in GitHub Desktop.
Save ledbettj/0f660f9546f605b0c95b3e7e72613c01 to your computer and use it in GitHub Desktop.
Debugger entered--Lisp error: (error "Recursive load" "/usr/local/Cellar/emacs/HEAD/share/emacs/25.0.50/lisp/emacs-lisp/bytecomp.elc" "/usr/local/Cellar/emacs/HEAD/share/emacs/25.0.50/lisp/emacs-lisp/cl-generic.elc" "/Users/john/.emacs.d/elpa/seq-2.15/seq-25.el" "/Users/john/.emacs.d/elpa/seq-2.15/seq.el" "/usr/local/Cellar/emacs/HEAD/share/emacs/25.0.50/lisp/emacs-lisp/cl-extra.elc" "/usr/local/Cellar/emacs/HEAD/share/emacs/25.0.50/lisp/emacs-lisp/bytecomp.elc" "/usr/local/Cellar/emacs/HEAD/share/emacs/25.0.50/lisp/emacs-lisp/cl-generic.elc" "/Users/john/.emacs.d/elpa/seq-2.15/seq-25.el" "/Users/john/.emacs.d/elpa/seq-2.15/seq.el" "/usr/local/Cellar/emacs/HEAD/share/emacs/25.0.50/lisp/emacs-lisp/cl-extra.elc" "/usr/local/Cellar/emacs/HEAD/share/emacs/25.0.50/lisp/emacs-lisp/bytecomp.elc" "/usr/local/Cellar/emacs/HEAD/share/emacs/25.0.50/lisp/emacs-lisp/cl-generic.elc" "/Users/john/.emacs.d/elpa/seq-2.15/seq-25.el" "/Users/john/.emacs.d/elpa/seq-2.15/seq.el" "/usr/local/Cellar/emacs/HEAD/share/emacs/25.0.50/lisp/emacs-lisp/cl-extra.elc" "/usr/local/Cellar/emacs/HEAD/share/emacs/25.0.50/lisp/emacs-lisp/bytecomp.elc" "/usr/local/Cellar/emacs/HEAD/share/emacs/25.0.50/lisp/emacs-lisp/cl-generic.elc" "/Users/john/.emacs.d/elpa/seq-2.15/seq-25.el" "/Users/john/.emacs.d/elpa/seq-2.15/seq.el" "/usr/local/Cellar/emacs/HEAD/share/emacs/25.0.50/lisp/emacs-lisp/cl-extra.elc" "/usr/local/Cellar/emacs/HEAD/share/emacs/25.0.50/lisp/emacs-lisp/bytecomp.elc" "/Users/john/.emacs.d/elpa/use-package-20160403.1129/use-package.elc" "/Users/john/.emacs.d/init.el")
byte-compile((lambda (generic dispatches-left methods) (let ((method-cache (make-hash-table :test (function eql)))) (lambda (arg &rest args) (apply (cl--generic-with-memoization (gethash (or (gethash ... cl--generic-head-used)) method-cache) (cl--generic-cache-miss generic (quote 0) dispatches-left methods (append (funcall ... ...) (funcall ... nil)))) arg args)))))
cl--generic-get-dispatcher((0 [cl-struct-cl--generic-generalizer 80 #[257 "\300\301D\302BB\207" [gethash car-safe (cl--generic-head-used)] 4 "\n\n(fn NAME)"] #[257 "\211\242\300=\205 \211C\207" [head] 3 "\n\n(fn TAG)"]] [cl-struct-cl--generic-generalizer 0 #[257 "\300\207" [nil] 2 "\n\n(fn NAME)"] #[257 "\300\207" [(t)] 2 "\n\n(fn TAG)"]]))
cl--generic-make-next-function([cl-struct-cl--generic cl-generic-generalizers ((0 [cl-struct-cl--generic-generalizer 80 #[257 "\300\301D\302BB\207" [gethash car-safe (cl--generic-head-used)] 4 "\n\n(fn NAME)"] #[257 "\211\242\300=\205 \211C\207" [head] 3 "\n\n(fn TAG)"]] [cl-struct-cl--generic-generalizer 0 #[257 "\300\207" [nil] 2 "\n\n(fn NAME)"] #[257 "\300\207" [(t)] 2 "\n\n(fn TAG)"]])) ([cl-struct-cl--generic-method ((head eql)) nil nil #[257 "\302A@#\210 C\207" [cl--generic-eql-used cl--generic-eql-generalizer puthash] 5 "Support for the `(eql VAL)' specializers.\n\n(fn SPECIALIZER)"]] [cl-struct-cl--generic-method (t) (:extra "head") t #[514 "\211\242\302=\204\n \207\211A@\303\"\204\304#\266\266 C\207" [cl--generic-head-used cl--generic-head-generalizer head gethash puthash] 9 "Support for the `(head VAL)' specializers.\n\n(fn CL--CNM SPECIALIZER)"]] [cl-struct-cl--generic-method (t) nil nil #[257 "\211\301=\203 C\207\302\303\"\207" [cl--generic-t-generalizer t error "Unknown specializer %S"] 4 "Support for the catch-all `t' specializer.\n\n(fn SPECIALIZER)"]]) nil] ((0 [cl-struct-cl--generic-generalizer 80 #[257 "\300\301D\302BB\207" [gethash car-safe (cl--generic-head-used)] 4 "\n\n(fn NAME)"] #[257 "\211\242\300=\205 \211C\207" [head] 3 "\n\n(fn TAG)"]] [cl-struct-cl--generic-generalizer 0 #[257 "\300\207" [nil] 2 "\n\n(fn NAME)"] #[257 "\300\207" [(t)] 2 "\n\n(fn TAG)"]])) ([cl-struct-cl--generic-method ((head eql)) nil nil #[257 "\302A@#\210 C\207" [cl--generic-eql-used cl--generic-eql-generalizer puthash] 5 "Support for the `(eql VAL)' specializers.\n\n(fn SPECIALIZER)"]] [cl-struct-cl--generic-method (t) (:extra "head") t #[514 "\211\242\302=\204\n \207\211A@\303\"\204\304#\266\266 C\207" [cl--generic-head-used cl--generic-head-generalizer head gethash puthash] 9 "Support for the `(head VAL)' specializers.\n\n(fn CL--CNM SPECIALIZER)"]] [cl-struct-cl--generic-method (t) nil nil #[257 "\211\301=\203 C\207\302\303\"\207" [cl--generic-t-generalizer t error "Unknown specializer %S"] 4 "Support for the catch-all `t' specializer.\n\n(fn SPECIALIZER)"]]))
cl--generic-make-function([cl-struct-cl--generic cl-generic-generalizers ((0 [cl-struct-cl--generic-generalizer 80 #[257 "\300\301D\302BB\207" [gethash car-safe (cl--generic-head-used)] 4 "\n\n(fn NAME)"] #[257 "\211\242\300=\205 \211C\207" [head] 3 "\n\n(fn TAG)"]] [cl-struct-cl--generic-generalizer 0 #[257 "\300\207" [nil] 2 "\n\n(fn NAME)"] #[257 "\300\207" [(t)] 2 "\n\n(fn TAG)"]])) ([cl-struct-cl--generic-method ((head eql)) nil nil #[257 "\302A@#\210 C\207" [cl--generic-eql-used cl--generic-eql-generalizer puthash] 5 "Support for the `(eql VAL)' specializers.\n\n(fn SPECIALIZER)"]] [cl-struct-cl--generic-method (t) (:extra "head") t #[514 "\211\242\302=\204\n \207\211A@\303\"\204\304#\266\266 C\207" [cl--generic-head-used cl--generic-head-generalizer head gethash puthash] 9 "Support for the `(head VAL)' specializers.\n\n(fn CL--CNM SPECIALIZER)"]] [cl-struct-cl--generic-method (t) nil nil #[257 "\211\301=\203 C\207\302\303\"\207" [cl--generic-t-generalizer t error "Unknown specializer %S"] 4 "Support for the catch-all `t' specializer.\n\n(fn SPECIALIZER)"]]) nil])
cl-generic-define-method(cl-generic-generalizers nil ((specializer (head eql))) nil #[257 "\302A@#\210 C\207" [cl--generic-eql-used cl--generic-eql-generalizer puthash] 5 "Support for the `(eql VAL)' specializers.\n\n(fn SPECIALIZER)"])
require(cl-generic)
eval-buffer(#<buffer *load*-977840> nil "/Users/john/.emacs.d/elpa/seq-2.15/seq-25.el" nil t) ; Reading at buffer position 17441
load-with-code-conversion("/Users/john/.emacs.d/elpa/seq-2.15/seq-25.el" "/Users/john/.emacs.d/elpa/seq-2.15/seq-25.el" nil t)
require(seq-25)
(if (version< emacs-version "25") (require (quote seq-24)) (require (quote seq-25)))
eval-buffer(#<buffer *load*-711530> nil "/Users/john/.emacs.d/elpa/seq-2.15/seq.el" nil t) ; Reading at buffer position 1503
load-with-code-conversion("/Users/john/.emacs.d/elpa/seq-2.15/seq.el" "/Users/john/.emacs.d/elpa/seq-2.15/seq.el" nil t)
require(seq)
byte-code("\300\301!\210\300\302!\207" [require cl-lib seq] 2)
require(cl-extra)
byte-code("\300\301!\210\300\302!\210\300\303!\210\300\304!\210\305\306!\204\307\310!\210\311\312\313\314\315\316%\210\317\320\321\322\323DD\324\315\312\325\326&\210\317\327\321\322\330DD\331\315\312\325\332\333\334& \207" [require backquote macroexp cconv cl-extra fboundp defsubst load "byte-run" custom-declare-group bytecomp nil "Emacs Lisp byte-compiler." :group lisp custom-declare-variable emacs-lisp-file-regexp funcall function #[0 "\300\207" ["\\.el\\'"] 1 "\\.el\\'"] "Regexp which matches Emacs Lisp source files.\nIf you change this, you might want to set `byte-compile-dest-file-function'." :type regexp byte-compile-dest-file-function #[0 "\300\207" [nil] 1] "Function for the function `byte-compile-dest-file' to call.\nIt should take one argument, the name of an Emacs Lisp source\nfile name, and return the name of the compiled file." (choice (const nil) function) :version "23.2"] 10)
byte-compile((lambda (generic dispatches-left methods) (let ((method-cache (make-hash-table :test (function eql)))) (lambda (arg &rest args) (apply (cl--generic-with-memoization (gethash (or (gethash ... cl--generic-head-used)) method-cache) (cl--generic-cache-miss generic (quote 0) dispatches-left methods (append (funcall ... ...) (funcall ... nil)))) arg args)))))
cl--generic-get-dispatcher((0 [cl-struct-cl--generic-generalizer 80 #[257 "\300\301D\302BB\207" [gethash car-safe (cl--generic-head-used)] 4 "\n\n(fn NAME)"] #[257 "\211\242\300=\205 \211C\207" [head] 3 "\n\n(fn TAG)"]] [cl-struct-cl--generic-generalizer 0 #[257 "\300\207" [nil] 2 "\n\n(fn NAME)"] #[257 "\300\207" [(t)] 2 "\n\n(fn TAG)"]]))
cl--generic-make-next-function([cl-struct-cl--generic cl-generic-generalizers ((0 [cl-struct-cl--generic-generalizer 80 #[257 "\300\301D\302BB\207" [gethash car-safe (cl--generic-head-used)] 4 "\n\n(fn NAME)"] #[257 "\211\242\300=\205 \211C\207" [head] 3 "\n\n(fn TAG)"]] [cl-struct-cl--generic-generalizer 0 #[257 "\300\207" [nil] 2 "\n\n(fn NAME)"] #[257 "\300\207" [(t)] 2 "\n\n(fn TAG)"]])) ([cl-struct-cl--generic-method ((head eql)) nil nil #[257 "\302A@#\210 C\207" [cl--generic-eql-used cl--generic-eql-generalizer puthash] 5 "Support for the `(eql VAL)' specializers.\n\n(fn SPECIALIZER)"]] [cl-struct-cl--generic-method (t) (:extra "head") t #[514 "\211\242\302=\204\n \207\211A@\303\"\204\304#\266\266 C\207" [cl--generic-head-used cl--generic-head-generalizer head gethash puthash] 9 "Support for the `(head VAL)' specializers.\n\n(fn CL--CNM SPECIALIZER)"]] [cl-struct-cl--generic-method (t) nil nil #[257 "\211\301=\203 C\207\302\303\"\207" [cl--generic-t-generalizer t error "Unknown specializer %S"] 4 "Support for the catch-all `t' specializer.\n\n(fn SPECIALIZER)"]]) nil] ((0 [cl-struct-cl--generic-generalizer 80 #[257 "\300\301D\302BB\207" [gethash car-safe (cl--generic-head-used)] 4 "\n\n(fn NAME)"] #[257 "\211\242\300=\205 \211C\207" [head] 3 "\n\n(fn TAG)"]] [cl-struct-cl--generic-generalizer 0 #[257 "\300\207" [nil] 2 "\n\n(fn NAME)"] #[257 "\300\207" [(t)] 2 "\n\n(fn TAG)"]])) ([cl-struct-cl--generic-method ((head eql)) nil nil #[257 "\302A@#\210 C\207" [cl--generic-eql-used cl--generic-eql-generalizer puthash] 5 "Support for the `(eql VAL)' specializers.\n\n(fn SPECIALIZER)"]] [cl-struct-cl--generic-method (t) (:extra "head") t #[514 "\211\242\302=\204\n \207\211A@\303\"\204\304#\266\266 C\207" [cl--generic-head-used cl--generic-head-generalizer head gethash puthash] 9 "Support for the `(head VAL)' specializers.\n\n(fn CL--CNM SPECIALIZER)"]] [cl-struct-cl--generic-method (t) nil nil #[257 "\211\301=\203 C\207\302\303\"\207" [cl--generic-t-generalizer t error "Unknown specializer %S"] 4 "Support for the catch-all `t' specializer.\n\n(fn SPECIALIZER)"]]))
cl--generic-make-function([cl-struct-cl--generic cl-generic-generalizers ((0 [cl-struct-cl--generic-generalizer 80 #[257 "\300\301D\302BB\207" [gethash car-safe (cl--generic-head-used)] 4 "\n\n(fn NAME)"] #[257 "\211\242\300=\205 \211C\207" [head] 3 "\n\n(fn TAG)"]] [cl-struct-cl--generic-generalizer 0 #[257 "\300\207" [nil] 2 "\n\n(fn NAME)"] #[257 "\300\207" [(t)] 2 "\n\n(fn TAG)"]])) ([cl-struct-cl--generic-method ((head eql)) nil nil #[257 "\302A@#\210 C\207" [cl--generic-eql-used cl--generic-eql-generalizer puthash] 5 "Support for the `(eql VAL)' specializers.\n\n(fn SPECIALIZER)"]] [cl-struct-cl--generic-method (t) (:extra "head") t #[514 "\211\242\302=\204\n \207\211A@\303\"\204\304#\266\266 C\207" [cl--generic-head-used cl--generic-head-generalizer head gethash puthash] 9 "Support for the `(head VAL)' specializers.\n\n(fn CL--CNM SPECIALIZER)"]] [cl-struct-cl--generic-method (t) nil nil #[257 "\211\301=\203 C\207\302\303\"\207" [cl--generic-t-generalizer t error "Unknown specializer %S"] 4 "Support for the catch-all `t' specializer.\n\n(fn SPECIALIZER)"]]) nil])
cl-generic-define-method(cl-generic-generalizers nil ((specializer (head eql))) nil #[257 "\302A@#\210 C\207" [cl--generic-eql-used cl--generic-eql-generalizer puthash] 5 "Support for the `(eql VAL)' specializers.\n\n(fn SPECIALIZER)"])
require(cl-generic)
eval-buffer(#<buffer *load*-321339> nil "/Users/john/.emacs.d/elpa/seq-2.15/seq-25.el" nil t) ; Reading at buffer position 17441
load-with-code-conversion("/Users/john/.emacs.d/elpa/seq-2.15/seq-25.el" "/Users/john/.emacs.d/elpa/seq-2.15/seq-25.el" nil t)
require(seq-25)
(if (version< emacs-version "25") (require (quote seq-24)) (require (quote seq-25)))
eval-buffer(#<buffer *load*-964308> nil "/Users/john/.emacs.d/elpa/seq-2.15/seq.el" nil t) ; Reading at buffer position 1503
load-with-code-conversion("/Users/john/.emacs.d/elpa/seq-2.15/seq.el" "/Users/john/.emacs.d/elpa/seq-2.15/seq.el" nil t)
require(seq)
byte-code("\300\301!\210\300\302!\207" [require cl-lib seq] 2)
require(cl-extra)
byte-code("\300\301!\210\300\302!\210\300\303!\210\300\304!\210\305\306!\204\307\310!\210\311\312\313\314\315\316%\210\317\320\321\322\323DD\324\315\312\325\326&\210\317\327\321\322\330DD\331\315\312\325\332\333\334& \207" [require backquote macroexp cconv cl-extra fboundp defsubst load "byte-run" custom-declare-group bytecomp nil "Emacs Lisp byte-compiler." :group lisp custom-declare-variable emacs-lisp-file-regexp funcall function #[0 "\300\207" ["\\.el\\'"] 1 "\\.el\\'"] "Regexp which matches Emacs Lisp source files.\nIf you change this, you might want to set `byte-compile-dest-file-function'." :type regexp byte-compile-dest-file-function #[0 "\300\207" [nil] 1] "Function for the function `byte-compile-dest-file' to call.\nIt should take one argument, the name of an Emacs Lisp source\nfile name, and return the name of the compiled file." (choice (const nil) function) :version "23.2"] 10)
byte-compile((lambda (generic dispatches-left methods) (let ((method-cache (make-hash-table :test (function eql)))) (lambda (arg &rest args) (apply (cl--generic-with-memoization (gethash (or (gethash ... cl--generic-head-used)) method-cache) (cl--generic-cache-miss generic (quote 0) dispatches-left methods (append (funcall ... ...) (funcall ... nil)))) arg args)))))
cl--generic-get-dispatcher((0 [cl-struct-cl--generic-generalizer 80 #[257 "\300\301D\302BB\207" [gethash car-safe (cl--generic-head-used)] 4 "\n\n(fn NAME)"] #[257 "\211\242\300=\205 \211C\207" [head] 3 "\n\n(fn TAG)"]] [cl-struct-cl--generic-generalizer 0 #[257 "\300\207" [nil] 2 "\n\n(fn NAME)"] #[257 "\300\207" [(t)] 2 "\n\n(fn TAG)"]]))
cl--generic-make-next-function([cl-struct-cl--generic cl-generic-generalizers ((0 [cl-struct-cl--generic-generalizer 80 #[257 "\300\301D\302BB\207" [gethash car-safe (cl--generic-head-used)] 4 "\n\n(fn NAME)"] #[257 "\211\242\300=\205 \211C\207" [head] 3 "\n\n(fn TAG)"]] [cl-struct-cl--generic-generalizer 0 #[257 "\300\207" [nil] 2 "\n\n(fn NAME)"] #[257 "\300\207" [(t)] 2 "\n\n(fn TAG)"]])) ([cl-struct-cl--generic-method ((head eql)) nil nil #[257 "\302A@#\210 C\207" [cl--generic-eql-used cl--generic-eql-generalizer puthash] 5 "Support for the `(eql VAL)' specializers.\n\n(fn SPECIALIZER)"]] [cl-struct-cl--generic-method (t) (:extra "head") t #[514 "\211\242\302=\204\n \207\211A@\303\"\204\304#\266\266 C\207" [cl--generic-head-used cl--generic-head-generalizer head gethash puthash] 9 "Support for the `(head VAL)' specializers.\n\n(fn CL--CNM SPECIALIZER)"]] [cl-struct-cl--generic-method (t) nil nil #[257 "\211\301=\203 C\207\302\303\"\207" [cl--generic-t-generalizer t error "Unknown specializer %S"] 4 "Support for the catch-all `t' specializer.\n\n(fn SPECIALIZER)"]]) nil] ((0 [cl-struct-cl--generic-generalizer 80 #[257 "\300\301D\302BB\207" [gethash car-safe (cl--generic-head-used)] 4 "\n\n(fn NAME)"] #[257 "\211\242\300=\205 \211C\207" [head] 3 "\n\n(fn TAG)"]] [cl-struct-cl--generic-generalizer 0 #[257 "\300\207" [nil] 2 "\n\n(fn NAME)"] #[257 "\300\207" [(t)] 2 "\n\n(fn TAG)"]])) ([cl-struct-cl--generic-method ((head eql)) nil nil #[257 "\302A@#\210 C\207" [cl--generic-eql-used cl--generic-eql-generalizer puthash] 5 "Support for the `(eql VAL)' specializers.\n\n(fn SPECIALIZER)"]] [cl-struct-cl--generic-method (t) (:extra "head") t #[514 "\211\242\302=\204\n \207\211A@\303\"\204\304#\266\266 C\207" [cl--generic-head-used cl--generic-head-generalizer head gethash puthash] 9 "Support for the `(head VAL)' specializers.\n\n(fn CL--CNM SPECIALIZER)"]] [cl-struct-cl--generic-method (t) nil nil #[257 "\211\301=\203 C\207\302\303\"\207" [cl--generic-t-generalizer t error "Unknown specializer %S"] 4 "Support for the catch-all `t' specializer.\n\n(fn SPECIALIZER)"]]))
cl--generic-make-function([cl-struct-cl--generic cl-generic-generalizers ((0 [cl-struct-cl--generic-generalizer 80 #[257 "\300\301D\302BB\207" [gethash car-safe (cl--generic-head-used)] 4 "\n\n(fn NAME)"] #[257 "\211\242\300=\205 \211C\207" [head] 3 "\n\n(fn TAG)"]] [cl-struct-cl--generic-generalizer 0 #[257 "\300\207" [nil] 2 "\n\n(fn NAME)"] #[257 "\300\207" [(t)] 2 "\n\n(fn TAG)"]])) ([cl-struct-cl--generic-method ((head eql)) nil nil #[257 "\302A@#\210 C\207" [cl--generic-eql-used cl--generic-eql-generalizer puthash] 5 "Support for the `(eql VAL)' specializers.\n\n(fn SPECIALIZER)"]] [cl-struct-cl--generic-method (t) (:extra "head") t #[514 "\211\242\302=\204\n \207\211A@\303\"\204\304#\266\266 C\207" [cl--generic-head-used cl--generic-head-generalizer head gethash puthash] 9 "Support for the `(head VAL)' specializers.\n\n(fn CL--CNM SPECIALIZER)"]] [cl-struct-cl--generic-method (t) nil nil #[257 "\211\301=\203 C\207\302\303\"\207" [cl--generic-t-generalizer t error "Unknown specializer %S"] 4 "Support for the catch-all `t' specializer.\n\n(fn SPECIALIZER)"]]) nil])
cl-generic-define-method(cl-generic-generalizers nil ((specializer (head eql))) nil #[257 "\302A@#\210 C\207" [cl--generic-eql-used cl--generic-eql-generalizer puthash] 5 "Support for the `(eql VAL)' specializers.\n\n(fn SPECIALIZER)"])
require(cl-generic)
eval-buffer(#<buffer *load*-889764> nil "/Users/john/.emacs.d/elpa/seq-2.15/seq-25.el" nil t) ; Reading at buffer position 17441
load-with-code-conversion("/Users/john/.emacs.d/elpa/seq-2.15/seq-25.el" "/Users/john/.emacs.d/elpa/seq-2.15/seq-25.el" nil t)
require(seq-25)
(if (version< emacs-version "25") (require (quote seq-24)) (require (quote seq-25)))
eval-buffer(#<buffer *load*-964886> nil "/Users/john/.emacs.d/elpa/seq-2.15/seq.el" nil t) ; Reading at buffer position 1503
load-with-code-conversion("/Users/john/.emacs.d/elpa/seq-2.15/seq.el" "/Users/john/.emacs.d/elpa/seq-2.15/seq.el" nil t)
require(seq)
byte-code("\300\301!\210\300\302!\207" [require cl-lib seq] 2)
require(cl-extra)
byte-code("\300\301!\210\300\302!\210\300\303!\210\300\304!\210\305\306!\204\307\310!\210\311\312\313\314\315\316%\210\317\320\321\322\323DD\324\315\312\325\326&\210\317\327\321\322\330DD\331\315\312\325\332\333\334& \207" [require backquote macroexp cconv cl-extra fboundp defsubst load "byte-run" custom-declare-group bytecomp nil "Emacs Lisp byte-compiler." :group lisp custom-declare-variable emacs-lisp-file-regexp funcall function #[0 "\300\207" ["\\.el\\'"] 1 "\\.el\\'"] "Regexp which matches Emacs Lisp source files.\nIf you change this, you might want to set `byte-compile-dest-file-function'." :type regexp byte-compile-dest-file-function #[0 "\300\207" [nil] 1] "Function for the function `byte-compile-dest-file' to call.\nIt should take one argument, the name of an Emacs Lisp source\nfile name, and return the name of the compiled file." (choice (const nil) function) :version "23.2"] 10)
byte-compile((lambda (generic dispatches-left methods) (let ((method-cache (make-hash-table :test (function eql)))) (lambda (arg &rest args) (apply (cl--generic-with-memoization (gethash (or (gethash ... cl--generic-head-used)) method-cache) (cl--generic-cache-miss generic (quote 0) dispatches-left methods (append (funcall ... ...) (funcall ... nil)))) arg args)))))
cl--generic-get-dispatcher((0 [cl-struct-cl--generic-generalizer 80 #[257 "\300\301D\302BB\207" [gethash car-safe (cl--generic-head-used)] 4 "\n\n(fn NAME)"] #[257 "\211\242\300=\205 \211C\207" [head] 3 "\n\n(fn TAG)"]] [cl-struct-cl--generic-generalizer 0 #[257 "\300\207" [nil] 2 "\n\n(fn NAME)"] #[257 "\300\207" [(t)] 2 "\n\n(fn TAG)"]]))
cl--generic-make-next-function([cl-struct-cl--generic cl-generic-generalizers ((0 [cl-struct-cl--generic-generalizer 80 #[257 "\300\301D\302BB\207" [gethash car-safe (cl--generic-head-used)] 4 "\n\n(fn NAME)"] #[257 "\211\242\300=\205 \211C\207" [head] 3 "\n\n(fn TAG)"]] [cl-struct-cl--generic-generalizer 0 #[257 "\300\207" [nil] 2 "\n\n(fn NAME)"] #[257 "\300\207" [(t)] 2 "\n\n(fn TAG)"]])) ([cl-struct-cl--generic-method ((head eql)) nil nil #[257 "\302A@#\210 C\207" [cl--generic-eql-used cl--generic-eql-generalizer puthash] 5 "Support for the `(eql VAL)' specializers.\n\n(fn SPECIALIZER)"]] [cl-struct-cl--generic-method (t) (:extra "head") t #[514 "\211\242\302=\204\n \207\211A@\303\"\204\304#\266\266 C\207" [cl--generic-head-used cl--generic-head-generalizer head gethash puthash] 9 "Support for the `(head VAL)' specializers.\n\n(fn CL--CNM SPECIALIZER)"]] [cl-struct-cl--generic-method (t) nil nil #[257 "\211\301=\203 C\207\302\303\"\207" [cl--generic-t-generalizer t error "Unknown specializer %S"] 4 "Support for the catch-all `t' specializer.\n\n(fn SPECIALIZER)"]]) nil] ((0 [cl-struct-cl--generic-generalizer 80 #[257 "\300\301D\302BB\207" [gethash car-safe (cl--generic-head-used)] 4 "\n\n(fn NAME)"] #[257 "\211\242\300=\205 \211C\207" [head] 3 "\n\n(fn TAG)"]] [cl-struct-cl--generic-generalizer 0 #[257 "\300\207" [nil] 2 "\n\n(fn NAME)"] #[257 "\300\207" [(t)] 2 "\n\n(fn TAG)"]])) ([cl-struct-cl--generic-method ((head eql)) nil nil #[257 "\302A@#\210 C\207" [cl--generic-eql-used cl--generic-eql-generalizer puthash] 5 "Support for the `(eql VAL)' specializers.\n\n(fn SPECIALIZER)"]] [cl-struct-cl--generic-method (t) (:extra "head") t #[514 "\211\242\302=\204\n \207\211A@\303\"\204\304#\266\266 C\207" [cl--generic-head-used cl--generic-head-generalizer head gethash puthash] 9 "Support for the `(head VAL)' specializers.\n\n(fn CL--CNM SPECIALIZER)"]] [cl-struct-cl--generic-method (t) nil nil #[257 "\211\301=\203 C\207\302\303\"\207" [cl--generic-t-generalizer t error "Unknown specializer %S"] 4 "Support for the catch-all `t' specializer.\n\n(fn SPECIALIZER)"]]))
cl--generic-make-function([cl-struct-cl--generic cl-generic-generalizers ((0 [cl-struct-cl--generic-generalizer 80 #[257 "\300\301D\302BB\207" [gethash car-safe (cl--generic-head-used)] 4 "\n\n(fn NAME)"] #[257 "\211\242\300=\205 \211C\207" [head] 3 "\n\n(fn TAG)"]] [cl-struct-cl--generic-generalizer 0 #[257 "\300\207" [nil] 2 "\n\n(fn NAME)"] #[257 "\300\207" [(t)] 2 "\n\n(fn TAG)"]])) ([cl-struct-cl--generic-method ((head eql)) nil nil #[257 "\302A@#\210 C\207" [cl--generic-eql-used cl--generic-eql-generalizer puthash] 5 "Support for the `(eql VAL)' specializers.\n\n(fn SPECIALIZER)"]] [cl-struct-cl--generic-method (t) (:extra "head") t #[514 "\211\242\302=\204\n \207\211A@\303\"\204\304#\266\266 C\207" [cl--generic-head-used cl--generic-head-generalizer head gethash puthash] 9 "Support for the `(head VAL)' specializers.\n\n(fn CL--CNM SPECIALIZER)"]] [cl-struct-cl--generic-method (t) nil nil #[257 "\211\301=\203 C\207\302\303\"\207" [cl--generic-t-generalizer t error "Unknown specializer %S"] 4 "Support for the catch-all `t' specializer.\n\n(fn SPECIALIZER)"]]) nil])
cl-generic-define-method(cl-generic-generalizers nil ((specializer (head eql))) nil #[257 "\302A@#\210 C\207" [cl--generic-eql-used cl--generic-eql-generalizer puthash] 5 "Support for the `(eql VAL)' specializers.\n\n(fn SPECIALIZER)"])
require(cl-generic)
eval-buffer(#<buffer *load*-659585> nil "/Users/john/.emacs.d/elpa/seq-2.15/seq-25.el" nil t) ; Reading at buffer position 17441
load-with-code-conversion("/Users/john/.emacs.d/elpa/seq-2.15/seq-25.el" "/Users/john/.emacs.d/elpa/seq-2.15/seq-25.el" nil t)
require(seq-25)
(if (version< emacs-version "25") (require (quote seq-24)) (require (quote seq-25)))
eval-buffer(#<buffer *load*-794888> nil "/Users/john/.emacs.d/elpa/seq-2.15/seq.el" nil t) ; Reading at buffer position 1503
load-with-code-conversion("/Users/john/.emacs.d/elpa/seq-2.15/seq.el" "/Users/john/.emacs.d/elpa/seq-2.15/seq.el" nil t)
require(seq)
byte-code("\300\301!\210\300\302!\207" [require cl-lib seq] 2)
require(cl-extra)
byte-code("\300\301!\210\300\302!\210\300\303!\210\300\304!\210\305\306!\204\307\310!\210\311\312\313\314\315\316%\210\317\320\321\322\323DD\324\315\312\325\326&\210\317\327\321\322\330DD\331\315\312\325\332\333\334& \207" [require backquote macroexp cconv cl-extra fboundp defsubst load "byte-run" custom-declare-group bytecomp nil "Emacs Lisp byte-compiler." :group lisp custom-declare-variable emacs-lisp-file-regexp funcall function #[0 "\300\207" ["\\.el\\'"] 1 "\\.el\\'"] "Regexp which matches Emacs Lisp source files.\nIf you change this, you might want to set `byte-compile-dest-file-function'." :type regexp byte-compile-dest-file-function #[0 "\300\207" [nil] 1] "Function for the function `byte-compile-dest-file' to call.\nIt should take one argument, the name of an Emacs Lisp source\nfile name, and return the name of the compiled file." (choice (const nil) function) :version "23.2"] 10)
require(bytecomp)
byte-code("\300\301!\210\300\302!\210\300\303\304\305#\210\300\302!\210\306\307\304\310\311\312%\210\313\314\304\315\316\317\311\307&\210\313\320\304\321\316\322\311\307&\210\313\323\304\324\316\322\311\307&\210\313\325\304\326\316\322\311\307&\210\313\327\304\330\316\331\311\307&\210\313\332\304\333\316\334\311\307&\210\313\335\336\337\316\340\311\307&\210\313\341\304\342\316\322\311\307&\210\313\343\344\345\316\346\311\307&\210\313\347\304\350\316\322\311\307&\207" [require bind-key bytecomp diminish nil t custom-declare-group use-package "A use-package declaration for simplifying your `.emacs'." :group startup custom-declare-variable use-package-verbose "Whether to report about loading and configuration details.\n\nIf you customize this, then you should require the `use-package'\nfeature in files that use `use-package', even if these files only\ncontain compiled expansions of the macros. If you don't do so,\nthen the expanded macros do their job silently." :type (choice (const :tag "Quiet" nil) (const :tag "Verbose" t) (const :tag "Debug" debug)) use-package-debug "Whether to display use-package expansions in a *use-package* buffer." boolean use-package-check-before-init "If non-nil, check that package exists before executing its `:init' block.\nThe check is performed by looking for the module using `locate-library'." use-package-always-defer "If non-nil, assume `:defer t` unless `:demand t` is given." use-package-always-ensure "Treat every package as though it had specified `:ensure SEXP`." sexp use-package-always-pin "Treat every package as though it had specified `:pin SYM." symbol use-package-minimum-reported-time 0.1 "Minimal load time that will be reported.\n\nNote that `use-package-verbose' has to be set to t, for anything\nto be reported at all.\n\nIf you customize this, then you should require the `use-package'\nfeature in files that use `use-package', even if these files only\ncontain compiled expansions of the macros. If you don't do so,\nthen the expanded macros do their job silently." number use-package-inject-hooks "If non-nil, add hooks to the `:init' and `:config' sections.\nIn particular, for a given package `foo', the following hooks\nbecome available:\n\n `use-package--foo--pre-init-hook'\n `use-package--foo--post-init-hook'\n `use-package--foo--pre-config-hook'\n `use-package--foo--post-config-hook'\n\nThis way, you can add to these hooks before evalaution of a\n`use-package` declaration, and exercise some control over what\nhappens.\n\nNote that if either `pre-init' hooks returns a nil value, that\nblock's user-supplied configuration is not evaluated, so be\ncertain to return `t' if you only wish to add behavior to what\nthe user specified." use-package-keywords (quote (:disabled :pin :ensure :if :when :unless :requires :load-path :preface :no-require :bind :bind* :bind-keymap :bind-keymap* :interpreter :mode :commands :defines :functions :defer :after :demand :init :config :diminish :delight)) "Establish which keywords are valid, and the order they are processed in.\n\nNote that `:disabled' is special, in that it causes nothing at all to happen,\neven if the rest of the use-package declaration is incorrect." (repeat symbol) use-package-expand-minimally "If non-nil, make the expanded code as minimal as possible.\nThis disables:\n - Printing to the *Messages* buffer of slowly-evaluating forms\n - Capture of load errors (normally redisplayed as warnings)\n - Conditional loading of packages (load failures become errors)\nThe only advantage is that, if you know your configuration works,\nthen your byte-compiled init file is as minimal as possible."] 8)
require(use-package nil t)
(null (require (quote use-package) nil t))
(if (null (require (quote use-package) nil t)) (progn (let* ((ARCHIVES (if (null package-archive-contents) (progn (package-refresh-contents) package-archive-contents) package-archive-contents)) (AVAIL (assoc (quote use-package) ARCHIVES))) (if AVAIL (package-install (quote use-package)))) (require (quote use-package))))
eval-buffer(#<buffer *load*> nil "/Users/john/.emacs.d/init.el" nil t) ; Reading at buffer position 1343
load-with-code-conversion("/Users/john/.emacs.d/init.el" "/Users/john/.emacs.d/init.el" t t)
load("/Users/john/.emacs.d/init" t t)
#[0 "\205\262 \306=\203\307\310Q\202; \311=\204\307\312Q\202;\313\307\314\315#\203*\316\202;\313\307\314\317#\203:\320\nB\321\202;\316\322\323\322\211#\210 \322=\203a\324\325\326\307\327Q!\"\323\322\211#\210 \322=\203`\210 \203\243\330 !\331\232\203\243\332 !\211\333P\334!\203}\211\202\210\334!\203\207\202\210\314\262\203\241\335 \"\203\237\336\337 #\210\340\341!\210\266\f?\205\260\314\323\342\322\211#)\262\207" [init-file-user system-type delayed-warnings-list user-init-file inhibit-default-init inhibit-startup-screen ms-dos "~" "/_emacs" windows-nt "/.emacs" directory-files nil "^\\.emacs\\(\\.elc?\\)?$" "~/.emacs" "^_emacs\\(\\.elc?\\)?$" (initialization "`_emacs' init file is deprecated, please use `.emacs'") "~/_emacs" t load expand-file-name "init" file-name-as-directory "/.emacs.d" file-name-extension "elc" file-name-sans-extension ".el" file-exists-p file-newer-than-file-p message "Warning: %s is newer than %s" sit-for 1 "default"] 7]()
command-line()
normal-top-level()
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment