Gecko [ 122.154.134.11 ]

Name	Size	Permission
advice.elc	60.71 KB	-rw-r--r--
assoc.elc	4.37 KB	-rw-r--r--
authors.elc	27.41 KB	-rw-r--r--
autoload.elc	15.7 KB	-rw-r--r--
avl-tree.elc	15.92 KB	-rw-r--r--
backquote.elc	4.46 KB	-rw-r--r--
benchmark.elc	3.33 KB	-rw-r--r--
bindat.elc	10.84 KB	-rw-r--r--
byte-opt.elc	34.22 KB	-rw-r--r--
byte-run.elc	6.65 KB	-rw-r--r--
bytecomp.elc	124.99 KB	-rw-r--r--
check-declare.elc	8.77 KB	-rw-r--r--
checkdoc.elc	65.08 KB	-rw-r--r--
cl-compat.elc	4.28 KB	-rw-r--r--
cl-extra.elc	21.48 KB	-rw-r--r--
cl-indent.elc	13.98 KB	-rw-r--r--
cl-loaddefs.el	39.57 KB	-rw-r--r--
cl-macs.elc	99.36 KB	-rw-r--r--
cl-seq.elc	43.98 KB	-rw-r--r--
cl-specs.el	13.87 KB	-rw-r--r--
cl.elc	20.74 KB	-rw-r--r--
copyright.elc	8.64 KB	-rw-r--r--
crm.elc	7.94 KB	-rw-r--r--
cust-print.elc	12.77 KB	-rw-r--r--
debug.elc	24.86 KB	-rw-r--r--
derived.elc	10.72 KB	-rw-r--r--
disass.elc	5.09 KB	-rw-r--r--
easy-mmode.elc	14.85 KB	-rw-r--r--
easymenu.elc	20.15 KB	-rw-r--r--
edebug.elc	100.82 KB	-rw-r--r--
eldoc.elc	15.31 KB	-rw-r--r--
elint.elc	19.76 KB	-rw-r--r--
elp.elc	12.78 KB	-rw-r--r--
ewoc.elc	28.62 KB	-rw-r--r--
find-func.elc	17.26 KB	-rw-r--r--
find-gc.elc	3.74 KB	-rw-r--r--
float-sup.elc	1.39 KB	-rw-r--r--
generic.elc	6.55 KB	-rw-r--r--
gulp.elc	4.82 KB	-rw-r--r--
helper.elc	3.84 KB	-rw-r--r--
levents.elc	10.29 KB	-rw-r--r--
lisp-mnt.elc	21.87 KB	-rw-r--r--
lisp-mode.elc	37.14 KB	-rw-r--r--
lisp.elc	21.61 KB	-rw-r--r--
lmenu.elc	11.67 KB	-rw-r--r--
lucid.elc	6.22 KB	-rw-r--r--
macroexp.elc	4.45 KB	-rw-r--r--
map-ynp.elc	6.3 KB	-rw-r--r--
pp.elc	5.09 KB	-rw-r--r--
re-builder.elc	22.36 KB	-rw-r--r--
regexp-opt.elc	4.43 KB	-rw-r--r--
regi.elc	6.15 KB	-rw-r--r--
ring.elc	6.41 KB	-rw-r--r--
rx.elc	26.61 KB	-rw-r--r--
shadow.elc	5.63 KB	-rw-r--r--
sregex.elc	12.45 KB	-rw-r--r--
syntax.elc	5.18 KB	-rw-r--r--
tcover-ses.elc	14.68 KB	-rw-r--r--
tcover-unsafep.elc	4.09 KB	-rw-r--r--
testcover.elc	13.41 KB	-rw-r--r--
timer.elc	22.73 KB	-rw-r--r--
tq.elc	3.94 KB	-rw-r--r--
trace.elc	5.28 KB	-rw-r--r--
unsafep.elc	5.01 KB	-rw-r--r--
warnings.elc	9.61 KB	-rw-r--r--

Code Editor : disass.elc

;ELC���
;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:02:54 2015
;;; from file /builddir/build/BUILD/emacs-23.1/lisp/emacs-lisp/disass.el
;;; in Emacs version 23.1.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.
(if (and (boundp 'emacs-version)
	 (< (aref emacs-version (1- (length emacs-version))) ?A)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19.29")))
    (error "`disass.el' was compiled for Emacs 19.29 or later"))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(require 'byte-compile "bytecomp")
#@3 *
(defvar disassemble-column-1-indent 8 (#$ . -648))
#@3 *
(defvar disassemble-column-2-indent 10 (#$ . -706))
#@3 *
(defvar disassemble-recursive-indent 3 (#$ . -765))
#@274 Print disassembled code for OBJECT in (optional) BUFFER.
OBJECT can be a symbol defined as a function, or a function itself
(a lambda expression or a compiled-function object).
If OBJECT is not already compiled, we compile it, but do not
redefine OBJECT if it is a symbol.
(defalias 'disassemble #[(object &optional buffer indent interactive-p) ":\203�@\304=\204�\304\305E	\204�\306\212\n\204 �\2040�\307\220\307q\210\310	\n?#\221\210\2029�q\210\310	\305#\210)\305\207" [object indent interactive-p buffer lambda nil 0 "*Disassemble*" disassemble-internal] 5 (#$ . 826) (list (intern (completing-read "Disassemble function: " obarray 'fboundp t)) nil 0 t)])
(defalias 'disassemble-internal #[(obj indent interactive-p) "\306\211\211\211\f9\203�\f\fK\211\202	�\307\f!\203!�\310\311\n\"\210\f<\2036�\f@\312=\2036�\313\fA@!\210\nK\f\242\303=\203B�\314\fA\f<\203S�\f@\315=\203S�\316\306\fE\f<\203c�\f@\316=\204c�\310\317!\210\f:\203\213�\315\f\236\204\213�
\203�\320\n\203{�\321\202|�\322\n\"\210\323\f!
\203\213�\320\324!\210\f:\203\234�\fA\211@\fA\202\255�\325\f!\203\251�\f\326H\202\255�\310\327!\210\330-!\203\337�-j\210\331\332\204\302�\n\203\306�\333\202\307�\334\203\317�\335\202\320�\334\n\203\333�\331\336\n\"\202\334�\334$c\210\f:\203\357�\f@;\205\363�\f@\202\363�\337\f\314\"\211\203\"	;\203\"\f:\203\fA-j\210\340\341p\"\210\342\343	\"\203	\326\211\224O\344P	\343\261\210)-j\210\345c\210\346p\"\210\343c\210\f:\203=\347\f\236\202I\fG\350V\205I\347\f\350HD\211'\203\214'A@'\f\242\242\347=\203`\fA-j\210\351c\210'\242\315=\203\343c\210\352'-.\\\"\210\202\211\314/\346'p\"\210)\343c\210)\f:\203\243\315\f\236\203\243\352\315\f\236-\"\210\202\312\325\f!\203\262\352\f-\"\210\202\312\353c\210\314/\346\fA\203\304\354\fB\202\306\f@p\"\210),
\205\322\320\334!\207" [args doc name macro obj interactive-p nil subrp error "Can't disassemble #<subr %s>" autoload load t byte-code lambda "not a function" message "Compiling %s's definition..." "Compiling definition..." byte-compile "Done compiling.  Disassembling..." byte-code-function-p 0 "Compilation failed" zerop format "byte code%s%s%s:\n" " for" "" " macro" " %s" documentation princ "  doc:  " string-match "\n" " ..." "  args: " prin1 interactive 5 " interactive: " disassemble-1 "Uncompiled body:  " progn indent disassemble-recursive-indent print-escape-newlines] 8])
#@120 Prints the byte-code call OBJ in the current buffer.
OBJ should be a call to BYTE-CODE generated by the byte compiler.
(defalias 'disassemble-1 #[(obj indent) "\306\211\n:\203�\nA@\nAA@\202!�\307\n!\210\n\310H\n\311H\312\313	!\"\306\211\211\211/0\314\3060012\3150\236\2111\203\\�1A2T\2112\240\21010>A0\202<�+0\203\267\3060@\247\203t�0@0A00@@/0@A0A03j\210/\315=\203\242�\203\231�\316\317\"c\210\320
@!c\210\202]�\203\254�\316\321\"c\21034\\j\210/\203\314�\322\323\324/!\211\"\203\314�\f\325\306O\202\316�\326/\327=\203\330�\330c\210\fc\210\331345\332$j\210\333c\210/6>\203\373�\320
A@!c\210\202\261/\334>\203\n\320
!c\210\202\261/\335>\203\336
@p\"\210\202\261/\337>\203\261
@\340
!\204T
\242\341=\2037\342
\236\204T
\242\343=\203\340
A!\204T
A\242\341=\203\342
A\236\203\340
!\203`\344c\210\202p
\242\341=\203m\345c\210\202p\346c\210\347
\33137\310#\306#\210\202\261
\242\342=\203\225\350c\210\351
37\\\"\210\202\261
\242\242\342=\203\250\352c\210\353\354
\"\210\202\261\3558\336
p\"\210)\356c\210\202]�.\306\207" [constvec bytes obj pc-value opname arg nil fetch-bytecode 1 2 byte-decompile-bytecode string-as-unibyte 0 TAG format "%d:" int-to-string "%d" string-match "^byte-" symbol-name 5 "<not-an-opcode>" byte-constant2 " #### shouldn't have seen constant2 here!\n  " + -1 " " (byte-call byte-unbind byte-listN byte-concatN byte-insertN) (byte-varref byte-varset byte-varbind) prin1 (byte-constant byte-constant2) byte-code-function-p lambda byte-code macro "<compiled-function>\n" "<compiled lambda>" "<compiled macro>\n" disassemble-internal "<byte code>\n" disassemble-1 "(<byte code>...)\n" mapc #[(obj) "\303	\n\\\"\207" [obj indent disassemble-recursive-indent disassemble-1] 4] t "\n" op lap tmp tagno indent disassemble-column-1-indent disassemble-column-2-indent byte-goto-ops disassemble-recursive-indent print-escape-newlines] 6 (#$ . 3235)])
(provide 'disass)

${this.title}

Code Editor : disass.elc