Deprecated: The each() function is deprecated. This message will be suppressed on further calls in /home/zhenxiangba/zhenxiangba.com/public_html/phproxy-improved-master/index.php on line 456
;ELC ;;; Compiled by leavens@CMC3251632-A on Fri Aug 09 22:33:57 2002 ;;; from file d:/emacs/elib/queue-f.el ;;; in Emacs version 21.2.1 ;;; with bytecomp version 2.85 ;;; 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 "`queue-f.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\301\302!\210\303\304\"\301\207" [features provide queue-f delq queue-m] 3) #@29 Create an empty fifo queue. (defalias 'queue-create #[nil "\300\301\211BB\207" [QUEUE nil] 3 (#$ . 681)]) #@53 Return t if QUEUE is a queue, otherwise return nil. (defalias 'queue-p #[(queue) "\242\301=\207" [queue QUEUE] 2 (#$ . 793)]) #@52 Enter an element into a queue. Args: QUEUE ELEMENT (defalias 'queue-enqueue #[(queue element) "\303B\nA@\204\nA\nA \241\240\202\nAA \241\210\nA \241)\207" [element elementcell queue nil] 3 (#$ . 926)]) #@96 Remove the first element of QUEUE and return it. If QUEUE is empty, return nil and do nothing. (defalias 'queue-dequeue #[(queue) "A@??\205A@@AA@A\240\210A@\204A\301\241\210\207" [queue nil] 3 (#$ . 1140)]) #@51 Return t if QUEUE is empty, otherwise return nil. (defalias 'queue-empty #[(queue) "A@?\207" [queue] 1 (#$ . 1363)]) #@86 Return the first element of QUEUE or nil if it is empty. The element is not removed. (defalias 'queue-first #[(queue) "A@\242\207" [queue] 1 (#$ . 1487)]) #@176 Return the nth element of a queue, but don't remove it. Args: QUEUE N If the length of the queue is less than N, return nil. The oldest element (the first one) has number 0. (defalias 'queue-nth #[(queue n) " A@8\207" [n queue] 2 (#$ . 1650)]) #@57 Return the last element of QUEUE or nil if it is empty. (defalias 'queue-last #[(queue) "AA\242\207" [queue] 1 (#$ . 1902)]) #@121 Return a list of all elements of QUEUE or nil if it is empty. The oldest element in the queue is the first in the list. (defalias 'queue-all #[(queue) "A@\207" [queue] 1 (#$ . 2035)]) #@64 Return a copy of QUEUE. All entries in QUEUE are also copied. (defalias 'queue-copy #[(queue) "\303A@!\211\211A\203\nA\211\202 \304 \n*BB\207" [queue first last copy-sequence QUEUE] 4 (#$ . 2226)]) #@41 Return the number of elements in QUEUE. (defalias 'queue-length #[(queue) "A@G\207" [queue] 1 (#$ . 2438)]) #@33 Remove all elements from QUEUE. (defalias 'queue-clear #[(queue) "\301\211B\241\207" [queue nil] 3 (#$ . 2553)])