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

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

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

(defalias 'tq-queue #[(tq) "@\207" [tq] 1])
(defalias 'tq-process #[(tq) "A@\207" [tq] 1])
(defalias 'tq-buffer #[(tq) "AA\207" [tq] 1])
(defalias 'tq-queue-head-question #[(tq) "\301!@@\207" [tq tq-queue] 2])
(defalias 'tq-queue-head-regexp #[(tq) "\301!@A@\207" [tq tq-queue] 2])
(defalias 'tq-queue-head-closure #[(tq) "\301!@AA@\207" [tq tq-queue] 2])
(defalias 'tq-queue-head-fn #[(tq) "\301!@AAA\207" [tq tq-queue] 2])
(defalias 'tq-queue-empty #[(tq) "\301!?\207" [tq tq-queue] 2])
#@236 Create and return a transaction queue communicating with PROCESS.
PROCESS should be a subprocess capable of sending and receiving
streams of bytes.  It may be a local process, or it may be connected
to a tcp server on another machine.
(defalias 'tq-create #[(process) "\302\303\304\305!P!BB\306\307	!!\210\310\311\312\313\314	D\315BBE\"\210	)\207" [process tq nil generate-new-buffer " tq-temp-" process-name buffer-disable-undo tq-buffer set-process-filter lambda (proc string) tq-filter quote (string)] 7 (#$ . 1104)])
(defalias 'tq-queue-add #[(tq question re closure fn) "\305!	\n\fBBB\306B\244\240\210\307\207" [tq question re closure fn tq-queue nil ok] 6])
(defalias 'tq-queue-pop #[(tq) "\211@A\240\210\302!\303\304\305\217\210)@?\207" [tq question tq-queue-head-question nil (byte-code "\302\303!	\"\207" [tq question process-send-string tq-process] 3) ((error))] 3])
#@566 Add a transaction to transaction queue TQ.
This sends the string QUESTION to the process that TQ communicates with.

When the corresponding answer comes back, we call FN with two
arguments: CLOSURE, which may contain additional data that FN
needs, and the answer to the question.

REGEXP is a regular expression to match the entire answer;
that's how we tell where the answer ends.

If DELAY-QUESTION is non-nil, delay sending this question until
the process has finished replying to any previous questions.
This produces more reliable results with some processes.
(defalias 'tq-enqueue #[(tq question regexp closure fn &optional delay-question) "?\206	�\306	!?\307	\n?\205�\f
\n%\210\n\205\"�\310\311	!\")\207" [delay-question tq sendp question regexp closure tq-queue tq-queue-add process-send-string tq-process fn] 6 (#$ . 2000)])
#@58 Shut down transaction queue TQ, terminating the process.
(defalias 'tq-close #[(tq) "\301\302!!\210\303\304!!\207" [tq delete-process tq-process kill-buffer tq-buffer] 3 (#$ . 2846)])
#@62 Append STRING to the TQ's buffer; then process the new data.
(defalias 'tq-filter #[(tq string) "\303!\304	!\205�r	q\210db\210\nc\210\305!))\207" [tq buffer string tq-buffer buffer-live-p tq-process-buffer] 2 (#$ . 3038)])
#@60 Check TQ's buffer for the regexp at the head of the queue.
(defalias 'tq-process-buffer #[(tq) "\304!\305	!\205^�	q\210\306 \307U?\205^�\310!\203=�\311\312!\313\ned#\210e`|\210\314\n\315\"\210\316\317\320\321!!\322\n!#)\202^�eb\210\323\324!\315\325#\205^�e`{e`|\210\326\216\315\327\330\217\210)\331!))\207" [tq buffer buf answer tq-buffer buffer-live-p buffer-size 0 tq-queue-empty generate-new-buffer "*spurious*" copy-to-buffer pop-to-buffer nil error "Spurious communication from process %s, see buffer %s" process-name tq-process buffer-name re-search-forward tq-queue-head-regexp t ((tq-queue-pop tq)) (byte-code "\302!\303!	\"\207" [tq answer tq-queue-head-fn tq-queue-head-closure] 3) ((error)) tq-process-buffer] 5 (#$ . 3271)])
(provide 'tq)

${this.title}

Code Editor : tq.elc