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/read.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 "`read.el' was compiled for Emacs 19.29 or later"))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(provide 'read)
#@230 Read a number from the minibuffer.
Optional arguments: PROMPT DEFAULT.
If DEFAULT is non-nil, it is written within parenthesis after the prompt.
DEFAULT can be either a number, or of the type which `(interactive P)'
generates.
(defalias 'read-number #[(&optional prompt default) "\204 \305\202 \250\203 \202 <\203 @\202 \305\305\211\n\204_ \306\f\203. \f\202/ \307 \2057 \310\311 \"P!\211\312\230\203J \203J \211\202\" \313\314 \"\203Y \315 !\211\202\" \316 \210\202! \n+\207" [default numstr number numdefault prompt nil read-string "Enter a number: " format "(%d) " "" string-match "\\`[0-9]+\\'" string-to-int beep] 6 (#$ . 602)])
#@242 Read a number within an interval from the minibuffer.
Args: LOW HIGH &optional PROMPT SHOW-RANGE.
The number read must be within the range [LOW HIGH].
If SHOW-RANGE is non-nil, the prompt will include the range for information
to the user.
(defalias 'read-num-range #[(low high &optional prompt show-range) "S\211W\204 \nV\203- \305 \203 \202 \306\f\203% \307\310\n#\202& \311P!\211\202 )\207" [low number high prompt show-range read-number "Enter a number: " format "(%d-%d) " ""] 7 (#$ . 1264)])
#@145 Read a string in the minibuffer without echoing.
Args: PROMPT &optional OUTCHAR.
For each character the user writes, one OUTCHAR is displayed.
(defalias 'read-silent #[(prompt &optional outchar) "\306!\210\307\310\311\307 \312 \211\313=\204_ \314=\204_ \315=\2035 \fG\316\232\204R \316\317O\f\316\317O\202R \320=\203B \307\307\202R
\203L \321
!P\f\321 !P\306
\205Y P!\210\202\f \306\307!\210\f,\207" [prompt showstring cursor-in-echo-area input-char input-string outchar message "" nil t read-char 13 10 127 0 -1 21 char-to-string] 4 (#$ . 1782)])