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:34:00 2002
;;; from file d:/emacs/elib/string.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 "`string.el' was compiled for Emacs 19.29 or later"))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(provide 'string)
#@595 Replace first match of REGEXP in STRING with NEWTEXT.
If no match is found, nil is returned instead of the new string.
Optional arg LITERAL non-nil means to take NEWTEXT literally. If LITERAL is
nil, character `\' is the start of one of the following sequences:
\\ will be replaced by a single \.
\& will be replaced by the text which matched the regexp.
\N where N is a number and 1 <= N <= 9, will be replaced
by the Nth subexpression in REGEXP. Subexpressions are grouped
inside \( \).
Optional arg GLOBAL means to replace all matches instead of only the first.
(defalias 'string-replace-match #[(regexp string newtext &optional literal global) "\306 \307\216 \203I \310\311\312\211 \313
\f#\203: \311\224\311\225
\f O\2031 \2023 \314 Q\n\202 \205E
\f\312OP,\202l \313
\311#\205l \311\211\224O\203c \202e \314 \311\225\312OQ*\207" [data global matchend matchbeginning start result match-data ((store-match-data data)) "" 0 nil string-match elib-string-expand-newtext regexp string literal newtext] 5 (#$ . 608)])
(defalias 'elib-string-expand-newtext #[nil "\306G\307\211\nW\203g H\211 \310U\203Z T\211H\211\311U\203.
\306\224\306\225O\202] \f\312Y\203T \f\313X\203T \f\314Z\211 \224\203O
\224\225O\202P \307)\202] \315\f!\202] \315\f!)P T\211\202 +\207" [newtext expanded-newtext len pos c string 0 "" 92 38 49 57 48 char-to-string n] 5])
#@156 Splitting on regexp PATTERN, turn string STRING into a list of substrings.
Optional third arg LIMIT (>= 1) is a limit to the length of the
resulting list.
(defalias 'string-split #[(pattern string &optional limit) "\306 \307\216\310 \n\"\n\311 OC \312 \205 \311\225\211 \f\203K
\250\203+
W\203K \310 \n\f#\203K \311\224
T\n\f O\fB\311\225\211\f\202
\250\203X
W\203e \f\203e \n\f\313O\fB\f\237.\207" [data pattern string start result count match-data ((store-match-data data)) string-match 0 1 nil end limit] 5 (#$ . 2042)])