Gecko [ fernandoquevedodop.com ]

Name	Size	Permission
advice.elc	54 KB	-rw-r--r--
autoload.elc	28.25 KB	-rw-r--r--
avl-tree.elc	27.45 KB	-rw-r--r--
backquote.elc	4.68 KB	-rw-r--r--
backtrace.elc	40.98 KB	-rw-r--r--
benchmark.elc	3.74 KB	-rw-r--r--
bindat.elc	10.73 KB	-rw-r--r--
byte-opt.elc	39.59 KB	-rw-r--r--
byte-run.elc	17.44 KB	-rw-r--r--
bytecomp.elc	154.17 KB	-rw-r--r--
cconv.elc	20.71 KB	-rw-r--r--
chart.elc	25.98 KB	-rw-r--r--
check-declare.elc	9.01 KB	-rw-r--r--
checkdoc.elc	74.78 KB	-rw-r--r--
cl-extra.elc	29.37 KB	-rw-r--r--
cl-generic.elc	59.25 KB	-rw-r--r--
cl-indent.elc	18.03 KB	-rw-r--r--
cl-lib.elc	31.72 KB	-rw-r--r--
cl-loaddefs.el	45.79 KB	-rw-r--r--
cl-macs.elc	90.7 KB	-rw-r--r--
cl-preloaded.elc	27.28 KB	-rw-r--r--
cl-print.elc	14.77 KB	-rw-r--r--
cl-seq.elc	38.35 KB	-rw-r--r--
copyright.elc	10.17 KB	-rw-r--r--
crm.elc	7.62 KB	-rw-r--r--
cursor-sensor.elc	6.74 KB	-rw-r--r--
debug.elc	36.42 KB	-rw-r--r--
derived.elc	11.88 KB	-rw-r--r--
disass.elc	6.11 KB	-rw-r--r--
easy-mmode.elc	19.78 KB	-rw-r--r--
easymenu.elc	19.88 KB	-rw-r--r--
edebug.elc	123.13 KB	-rw-r--r--
eieio-base.elc	17.17 KB	-rw-r--r--
eieio-compat.elc	8.41 KB	-rw-r--r--
eieio-core.elc	36.91 KB	-rw-r--r--
eieio-custom.elc	15.8 KB	-rw-r--r--
eieio-datadebug.elc	3.17 KB	-rw-r--r--
eieio-loaddefs.el	3.96 KB	-rw-r--r--
eieio-opt.elc	9.32 KB	-rw-r--r--
eieio-speedbar.elc	13.13 KB	-rw-r--r--
eieio.elc	33.03 KB	-rw-r--r--
eldoc.elc	19.14 KB	-rw-r--r--
elint.elc	30.6 KB	-rw-r--r--
elp.elc	12.68 KB	-rw-r--r--
ert-x.elc	11.48 KB	-rw-r--r--
ert.elc	177.96 KB	-rw-r--r--
ewoc.elc	25.26 KB	-rw-r--r--
faceup.elc	16.97 KB	-rw-r--r--
find-func.elc	21.61 KB	-rw-r--r--
float-sup.elc	1.21 KB	-rw-r--r--
generator.elc	27.42 KB	-rw-r--r--
generic.elc	7.18 KB	-rw-r--r--
gv.elc	22.69 KB	-rw-r--r--
helper.elc	3.96 KB	-rw-r--r--
inline.elc	8.37 KB	-rw-r--r--
let-alist.elc	3.04 KB	-rw-r--r--
lisp-mnt.elc	22.59 KB	-rw-r--r--
lisp-mode.elc	38.03 KB	-rw-r--r--
lisp.elc	21.44 KB	-rw-r--r--
macroexp.elc	18.01 KB	-rw-r--r--
map-ynp.elc	10.54 KB	-rw-r--r--
map.elc	18.25 KB	-rw-r--r--
nadvice.elc	17.65 KB	-rw-r--r--
package-x.elc	9.06 KB	-rw-r--r--
package.elc	146.54 KB	-rw-r--r--
pcase.elc	23.11 KB	-rw-r--r--
pp.elc	5.5 KB	-rw-r--r--
radix-tree.elc	5.88 KB	-rw-r--r--
re-builder.elc	25.78 KB	-rw-r--r--
regexp-opt.elc	6.3 KB	-rw-r--r--
regi.elc	6 KB	-rw-r--r--
ring.elc	6.32 KB	-rw-r--r--
rmc.elc	4.79 KB	-rw-r--r--
rx.elc	40.69 KB	-rw-r--r--
seq.elc	23.64 KB	-rw-r--r--
shadow.elc	9.34 KB	-rw-r--r--
smie.elc	48.84 KB	-rw-r--r--
subr-x.elc	11.17 KB	-rw-r--r--
syntax.elc	26.13 KB	-rw-r--r--
tabulated-list.elc	26.57 KB	-rw-r--r--
tcover-ses.elc	14.29 KB	-rw-r--r--
tcover-unsafep.elc	3.87 KB	-rw-r--r--
testcover.elc	23.03 KB	-rw-r--r--
text-property-search.elc	8.13 KB	-rw-r--r--
thunk.elc	3.06 KB	-rw-r--r--
timer-list.elc	4.3 KB	-rw-r--r--
timer.elc	21.65 KB	-rw-r--r--
tq.elc	3.99 KB	-rw-r--r--
trace.elc	7.27 KB	-rw-r--r--
unsafep.elc	4.45 KB	-rw-r--r--
warnings.elc	9.75 KB	-rw-r--r--

Code Editor : tq.elc

;ELC���
;;; Compiled
;;; in Emacs version 27.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

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

#@11

(fn TQ)
(defalias 'tq-queue #[257 "\211@\207" [] 2 (#$ . 408)])
#@11

(fn TQ)
(defalias 'tq-process #[257 "\211A@\207" [] 2 (#$ . 480)])
#@11

(fn TQ)
(defalias 'tq-buffer #[257 "\211AA\207" [] 2 (#$ . 555)])
#@11

(fn TQ)
(defalias 'tq-queue-head-question #[257 "\300!@@\207" [tq-queue] 3 (#$ . 629)])
#@11

(fn TQ)
(defalias 'tq-queue-head-regexp #[257 "\300!@A@\207" [tq-queue] 3 (#$ . 726)])
#@11

(fn TQ)
(defalias 'tq-queue-head-closure #[257 "\300!@AA@\207" [tq-queue] 3 (#$ . 822)])
#@11

(fn TQ)
(defalias 'tq-queue-head-fn #[257 "\300!@AAA\207" [tq-queue] 3 (#$ . 920)])
#@11

(fn TQ)
(defalias 'tq-queue-empty #[257 "\300!?\207" [tq-queue] 3 (#$ . 1013)])
#@250 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.

(fn PROCESS)
(defalias 'tq-create #[257 "\300\301\302\303!P!BB\304\305!!\210\306\307\310\311\312\313!\314\"\315\316%\"\210\211\207" [nil generate-new-buffer " tq-temp-" process-name buffer-disable-undo tq-buffer set-process-filter make-byte-code 514 "\301\300\"\207" vconcat vector [tq-filter] 5 "\n\n(fn PROC STRING)"] 10 (#$ . 1103)])
#@34

(fn TQ QUESTION RE CLOSURE FN)
(defalias 'tq-queue-add #[1285 "\300!BBB\301B\244\240\210\302\207" [tq-queue nil ok] 11 (#$ . 1689)])
#@11

(fn TQ)
(defalias 'tq-queue-pop #[257 "\211@A\240\210\300!\3011�\302\303!\"0\202�\210\202�\210\210\211@?\207" [tq-queue-head-question (error) process-send-string tq-process] 5 (#$ . 1837)])
#@627 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.

(fn TQ QUESTION REGEXP CLOSURE FN &optional DELAY-QUESTION)
(defalias 'tq-enqueue #[1541 "\211?\206\n�\300!?\301?\205�%\210\211\205(�\302\303!\"\207" [tq-queue tq-queue-add process-send-string tq-process] 13 (#$ . 2043)])
#@67 Shut down transaction queue TQ, terminating the process.

(fn TQ)
(defalias 'tq-close #[257 "\300\301!!\210\302\303!!\207" [delete-process tq-process kill-buffer tq-buffer] 4 (#$ . 2855)])
#@78 Append STRING to the TQ's buffer; then process the new data.

(fn TQ STRING)
(defalias 'tq-filter #[514 "\300!\301!\205�r\211q\210db\210c\210\302!)\207" [tq-buffer buffer-live-p tq-process-buffer] 5 (#$ . 3052)])
#@69 Check TQ's buffer for the regexp at the head of the queue.

(fn TQ)
(defalias 'tq-process-buffer #[257 "\300!\301!\205u�\211q\210\302 \303U?\205u�\304!\203=�\305\306!\307ed#\210e`|\210\310\311\"\210\312\313\314\315!!\316!#\262\202u�eb\210\317\320!\311\321#\205u�e`{\322!\323!e`|\210\324!\210\3251g�\"0\202o�\326\327\330!\"\262\210\331!\266\203\207" [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-head-fn tq-queue-head-closure tq-queue-pop (error) message "Error while processing tq callback: %s" error-message-string tq-process-buffer] 10 (#$ . 3276)])
(provide 'tq)

${this.title}

Code Editor : tq.elc