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@LEAVENS on Mon Sep 15 16:19:49 2003 ;;; from file d:/emacs/ecb/silentcomp.el ;;; in Emacs version 21.3.1 ;;; with bytecomp version 2.85.4.1 ;;; 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 "`silentcomp.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\301B\304\301!\204\f\305\302B\304\302!\204\305\303B\304\303!\204$\305\305\207" [current-load-list silentcomp-unbound-variables silentcomp-original-functions silentcomp-environment-set boundp nil] 2) (defalias 'silentcomp-restore-environment #[nil "?\205u\306\n\211\203. @\307!\203&\310\311\312!P!=\203&\313!\210) A\211\204 \f\211\203p @@ @AA@\314!\203h\310\315\312!P!K=\203h \316=\203c\317!\210\202h M\210* A\211\2044\306\211)\207" [load-in-progress p silentcomp-unbound-variables var silentcomp-original-functions def nil boundp intern "silentcomp-ignore-var:" symbol-name makunbound fboundp "silentcomp-ignore-fun:" unbound fmakunbound fun silentcomp-environment-set] 5]) #@87 Return non-nil if eval'ed during compilation. Don't use outside `eval-when-compile'. (defalias 'silentcomp-is-compiling #[nil "\301\300!\205;\207" [byte-compile-dest-file boundp] 2 (#$ . 1331)]) #@133 Binds the symbol as a variable during compilation of the file, to silence the byte compiler. Don't use within `eval-when-compile'. (defalias 'silentcomp-defvar '(macro . #[(var) "\301\302\303\304DD\305\302\306\307\304D\310BBD\311\312\313\304D\314BBEE\302\315\316\317D\320\304D\321\322\323\324\304DDEDEEE\257D\207" [var eval-when-compile if boundp quote nil not memq (silentcomp-unbound-variables) setq silentcomp-unbound-variables cons (silentcomp-unbound-variables) (and (silentcomp-is-compiling) (not load-in-progress)) progn defvar set intern concat "silentcomp-ignore-var:" symbol-name] 17 (#$ . 1537)])) #@458 Bind the symbol as a function during compilation of the file, to silence the byte compiler. Don't use within `eval-when-compile'. If the symbol already is bound as a function, it will keep that definition. That means that this macro will not shut up warnings about incorrect number of arguments. It's dangerous to try to replace existing functions since the byte compiler might need the definition at compile time, e.g. for macros and inline functions. (defalias 'silentcomp-defun '(macro . #[(fun) "\301\302\303\304\305D\306BBD\307\310\311\312\305D\313\302\314\305DD\315\305DD\316BBBF\317BBEE\302\320\321\322\303\314\305DDDF\323\305D\324\325\326\327\305DDEDEEE\207" [fun eval-when-compile if not assq quote (silentcomp-original-functions) setq silentcomp-original-functions cons list nil fboundp symbol-function ('unbound) (silentcomp-original-functions) and (silentcomp-is-compiling) (not load-in-progress) fset intern concat "silentcomp-ignore-fun:" symbol-name] 14 (#$ . 2161)])) #@130 A replacement for the `provide' form that restores the environment after the compilation. Don't use within `eval-when-compile'. (defalias 'silentcomp-provide '(macro . #[(feature) "\301\302\303DE\207" [feature progn (eval-when-compile (silentcomp-restore-environment)) provide] 4 (#$ . 3163)])) (provide 'silentcomp)