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 : macroexp.elc

;ELC���
;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:02:55 2015
;;; from file /builddir/build/BUILD/emacs-23.1/lisp/emacs-lisp/macroexp.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 "`macroexp.el' was compiled for Emacs 19.29 or later"))

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

(byte-code "\301B\302\301!\204�\303\301\304\"\210\304\207" [current-load-list macroexpand-all-environment default-boundp set-default nil] 3)
#@54 Return (CAR . CDR), using ORIGINAL-CONS if possible.
(defalias 'maybe-cons #[(car cdr original-cons) "	@=\203�\n	A=\203�	\207\nB\207" [car original-cons cdr] 2 (#$ . 762)])
#@377 Return a list of the results of evaluating BODY for each element of LIST.
Evaluate BODY with VAR bound to each `car' from LIST, in turn.
Return a list of the values of the final form in BODY.
The list structure of the result will share as much with LIST as
possible (for instance, when BODY just returns VAR unchanged, the
result will be eq to LIST).

(fn (VAR LIST) BODY...)
(defalias 'macroexp-accumulate '(macro . #[(var+list &rest body) "@\211A@)\306\307!\306\310!\306\311!\306\312!\313
D\f\314B
D\n\257\315\316\317D\n\320B\257\321\322\nE\315\323\322
ED\324\325
D\fEE\316
\326
DE\324\n\fE\257\316\326DE\257\327\330\fD
EF.\207" [var+list x new-el tail unshared shared make-symbol "shared" "unshared" "tail" "new-el" let* (nil) while setq car progn unless eq not push pop cdr nconc nreverse list var body] 13 (#$ . 946)]))
(put 'macroexp-accumulate 'lisp-indent-function 1)
#@143 Return FORMS with macros expanded.  FORMS is a list of forms.
If SKIP is non-nil, then don't expand that many elements at the start of
FORMS.
(defalias 'macroexpand-all-forms #[(forms &optional skip) "\306	\306\211\203O�@	\203�\307	!\203#�\310\f!\202)�	S	\f\f
=\204H�	=\204A�	\211A@\nB\2020�	A
\nBA\211\204�\n\237	\244-\207" [forms #1=#:shared #2=#:unshared #3=#:tail form #4=#:new-el nil zerop macroexpand-all-1 skip] 3 (#$ . 1861)])
#@202 Return CLAUSES with macros expanded.
CLAUSES is a list of lists of forms; any clause that's not a list is ignored.
If SKIP is non-nil, then don't expand that many elements at the start of
each clause.
(defalias 'macroexpand-all-clauses #[(clauses &optional skip) "\306	\306\211\203E�@\211<\203�\307\f\"\202�\f\f
=\204>�	=\2047�	\211A@\nB\202&�	A
\nBA\211\204�\n\237	\244-\207" [clauses #1=#:shared #2=#:unshared #3=#:tail clause #4=#:new-el nil macroexpand-all-forms skip] 4 (#$ . 2326)])
#@138 Expand all macros in FORM.
This is an internal version of `macroexpand-all'.
Assumes the caller has bound `macroexpand-all-environment'.
(defalias 'macroexpand-all-1 #[(form) "<\203�@\304=\203�\305\306\307\"	\"\207\305	\"\211:\203\201@\211\310=\2032�\311\n\312A!#\202\n\313=\203\\�\311\n\311\211A@)\311\314\3158!\312\316\233\307\"\211AA)#A##\202\n\317=\203{�\211A@)\320\211AA)BB	B\306\316\"\202\n\321=\203\210�\306\316\"\202\n\322>\203\225�\306\315\"\202\n\323=\203\316�\211A@):\203\312�\211A@)@\320=\203\312�\311\n\311\306\211A@)\315\"\324\211A@)##\202\202\n\325>\203\360�\311\n\311\312\211A@)\307\"\306\211AA)!A##\202\n\326=\203\372�\202\n:\203\n@\320=\203\311\306\n\315\"\306A!#\202\n\327>\203I\211A@):\203I\211A@)@\326=\203I\n\314\323\211A@)AB!\306\211AA)!BB\202\n\330=\203{\3158:\203{\3158@\326=\203{\n\314\211A@)!\314\323\3158AB!\306\316\233!BBB\202\306\307\")\207\207" [form macroexpand-all-environment fun x backquote-list* macroexpand macroexpand-all-forms 1 cond maybe-cons macroexpand-all-clauses condition-case macroexpand-all-1 2 3 defmacro lambda defun (defvar defconst) function nil (let let*) quote (apply mapcar mapatoms mapconcat mapc) sort] 10 (#$ . 2844)])
#@255 Return result of expanding macros at all levels in FORM.
If no macros are expanded, FORM is returned unchanged.
The second optional arg ENVIRONMENT specifies an environment of macro
definitions to shadow the loaded ones for use in file byte-compilation.
(defalias 'macroexpand-all #[(form &optional environment) "\303\n!)\207" [environment macroexpand-all-environment form macroexpand-all-1] 2 (#$ . 4125)])
(provide 'macroexp)

${this.title}

Code Editor : macroexp.elc