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:58 2002
;;; from file d:/emacs/elib/stack-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 "`stack-f.el' was compiled for Emacs 19.29 or later"))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(byte-code "\301\302!\210\303\304\"\301\207" [features provide stack-f delq stack-m] 3)
#@29 Create an empty lifo stack.
(defalias 'stack-create #[nil "\300\301B\207" [STACK nil] 2 (#$ . 681)])
#@53 Return t if STACK is a stack, otherwise return nil.
(defalias 'stack-p #[(stack) "\242\301=\207" [stack STACK] 2 (#$ . 788)])
#@53 Push an element onto the stack.
Args: STACK ELEMENT
(defalias 'stack-push #[(stack element) " AB\241\207" [stack element] 3 (#$ . 921)])
#@90 Remove the topmost element from STACK and return it.
If the stack is empty, return nil.
(defalias 'stack-pop #[(stack) "A\242\211A\243\241\210\207" [stack] 3 (#$ . 1066)])
#@51 Return t if STACK is empty, otherwise return nil.
(defalias 'stack-empty #[(stack) "A?\207" [stack] 1 (#$ . 1247)])
#@60 Return the topmost element of STACK or nil if it is empty.
(defalias 'stack-top #[(stack) "A\242\207" [stack] 1 (#$ . 1370)])
#@159 Return nth element of a stack, but don't remove it.
Args: STACK N
If the length of the stack is less than N, return nil.
The top stack element has number 0.
(defalias 'stack-nth #[(stack n) " A8\207" [n stack] 2 (#$ . 1504)])
#@86 Return a list of all entries in STACK.
The element last pushed is first in the list.
(defalias 'stack-all #[(stack) "A\207" [stack] 1 (#$ . 1738)])
#@63 Return a copy of STACK.
All entries in STACK are also copied.
(defalias 'stack-copy #[(stack) "\301\302A!B\207" [stack STACK copy-sequence] 3 (#$ . 1893)])
#@41 Return the number of elements on STACK.
(defalias 'stack-length #[(stack) "AG\207" [stack] 1 (#$ . 2056)])
#@33 Remove all elements from STACK.
(defalias 'stack-clear #[(stack) "\301\241\207" [stack nil] 2 (#$ . 2170)])