-
-
Save ledbettj/0f660f9546f605b0c95b3e7e72613c01 to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
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