Linux ns8.secondary29.go.th 2.6.32-754.28.1.el6.x86_64 #1 SMP Wed Mar 11 18:38:45 UTC 2020 x86_64
Apache/2.2.15 (CentOS)
: 122.154.134.11 | : 122.154.134.9
Cant Read [ /etc/named.conf ]
5.6.40
apache
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
CREATE WP USER
README
+ Create Folder
+ Create File
/
usr /
share /
emacs /
23.1 /
lisp /
progmodes /
[ HOME SHELL ]
Name
Size
Permission
Action
ada-mode.elc
107.46
KB
-rw-r--r--
ada-prj.elc
17.96
KB
-rw-r--r--
ada-stmt.elc
36.03
KB
-rw-r--r--
ada-xref.elc
54.99
KB
-rw-r--r--
antlr-mode.elc
77.63
KB
-rw-r--r--
asm-mode.elc
6.08
KB
-rw-r--r--
autoconf.elc
3.37
KB
-rw-r--r--
bug-reference.elc
5.83
KB
-rw-r--r--
cap-words.elc
3.54
KB
-rw-r--r--
cc-align.elc
35.43
KB
-rw-r--r--
cc-awk.elc
20.23
KB
-rw-r--r--
cc-bytecomp.elc
10.45
KB
-rw-r--r--
cc-cmds.elc
92.26
KB
-rw-r--r--
cc-compat.elc
2.97
KB
-rw-r--r--
cc-defs.elc
46.7
KB
-rw-r--r--
cc-engine.elc
143.05
KB
-rw-r--r--
cc-fonts.elc
140.72
KB
-rw-r--r--
cc-langs.elc
70.29
KB
-rw-r--r--
cc-menus.elc
7.32
KB
-rw-r--r--
cc-mode.elc
144.75
KB
-rw-r--r--
cc-styles.elc
16.11
KB
-rw-r--r--
cc-subword.elc
6.99
KB
-rw-r--r--
cc-vars.elc
71.07
KB
-rw-r--r--
cfengine.elc
8.09
KB
-rw-r--r--
cmacexp.elc
6.58
KB
-rw-r--r--
compile.elc
69.45
KB
-rw-r--r--
cperl-mode.elc
215.39
KB
-rw-r--r--
cpp.elc
21.52
KB
-rw-r--r--
cwarn.elc
12.8
KB
-rw-r--r--
dcl-mode.elc
49.31
KB
-rw-r--r--
delphi.elc
50.03
KB
-rw-r--r--
ebnf-abn.elc
7.39
KB
-rw-r--r--
ebnf-bnf.elc
7.99
KB
-rw-r--r--
ebnf-dtd.elc
13.82
KB
-rw-r--r--
ebnf-ebx.elc
8.77
KB
-rw-r--r--
ebnf-iso.elc
8.14
KB
-rw-r--r--
ebnf-otz.elc
8.51
KB
-rw-r--r--
ebnf-yac.elc
7.53
KB
-rw-r--r--
ebnf2ps.elc
121.25
KB
-rw-r--r--
ebrowse.elc
202.93
KB
-rw-r--r--
etags.elc
54.14
KB
-rw-r--r--
executable.elc
7.6
KB
-rw-r--r--
f90.elc
82.59
KB
-rw-r--r--
flymake.elc
61.25
KB
-rw-r--r--
fortran.elc
60.13
KB
-rw-r--r--
gdb-ui.elc
138.61
KB
-rw-r--r--
glasses.elc
10.15
KB
-rw-r--r--
grep.elc
27.75
KB
-rw-r--r--
gud.elc
93.94
KB
-rw-r--r--
hideif.elc
26.67
KB
-rw-r--r--
hideshow.elc
24.54
KB
-rw-r--r--
icon.elc
16.23
KB
-rw-r--r--
idlw-complete-structtag.elc
4.75
KB
-rw-r--r--
idlw-help.elc
35.31
KB
-rw-r--r--
idlw-shell.elc
134.39
KB
-rw-r--r--
idlw-toolbar.elc
28.34
KB
-rw-r--r--
idlwave.elc
254.7
KB
-rw-r--r--
inf-lisp.elc
18.43
KB
-rw-r--r--
ld-script.elc
4.91
KB
-rw-r--r--
m4-mode.elc
4.91
KB
-rw-r--r--
make-mode.elc
58.79
KB
-rw-r--r--
mantemp.elc
3.77
KB
-rw-r--r--
meta-mode.elc
27.42
KB
-rw-r--r--
mixal-mode.elc
35.32
KB
-rw-r--r--
modula2.elc
14.23
KB
-rw-r--r--
octave-inf.elc
11.87
KB
-rw-r--r--
octave-mod.elc
44.6
KB
-rw-r--r--
pascal.elc
40.31
KB
-rw-r--r--
perl-mode.elc
22.42
KB
-rw-r--r--
prolog.elc
12.7
KB
-rw-r--r--
ps-mode.elc
33.38
KB
-rw-r--r--
python.elc
86.23
KB
-rw-r--r--
ruby-mode.elc
34.59
KB
-rw-r--r--
scheme.elc
15.94
KB
-rw-r--r--
sh-script.elc
94.73
KB
-rw-r--r--
simula.elc
44.81
KB
-rw-r--r--
sql.elc
101.34
KB
-rw-r--r--
sym-comp.elc
7.15
KB
-rw-r--r--
tcl.elc
38.58
KB
-rw-r--r--
vera-mode.elc
44.5
KB
-rw-r--r--
verilog-mode.elc
331.76
KB
-rw-r--r--
vhdl-mode.elc
510.47
KB
-rw-r--r--
which-func.elc
9.72
KB
-rw-r--r--
xscheme.elc
37.76
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : scheme.elc
;ELC ;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:05:11 2015 ;;; from file /builddir/build/BUILD/emacs-23.1/lisp/progmodes/scheme.el ;;; in Emacs version 23.1.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 "`scheme.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\303\304!\210\305B\306\305!\204\343 \307\305\310 \311 \312W\203( \313 \314\n#\210 T\211\202 \315\211\316X\203= \313 \317\n#\210 T\211\202+ \320\211\321X\203R \313 \317\n#\210 T\211\202@ \322\211\323X\203g \313 \317\n#\210 T\211\202U \313\324\325\n#\210\313\326\327\n#\210\313\330\325\n#\210\313\331\325\n#\210\313\332\325\n#\210\313\333\334\n#\210\313\335\336\n#\210\313\337\340\n#\210\313\341\342\n#\210\313\343\344\n#\210\313\345\346\n#\210\313\347\350\n#\210\313\351\352\n#\210\313\353\354\n#\210\313\355\356\n#\210\313\357\356\n#\210\313\360\356\n#\210\313\361\356\n#\210\313\362\363\n#\210\313\364\365\n#\210\n*\"\210\366B\306\366!\204\362 \307\366\367\"\210\370\366\367\"\207" [current-load-list i st require lisp-mode scheme-mode-syntax-table default-boundp set-default make-syntax-table 0 256 modify-syntax-entry "_ " 48 57 "w " 65 90 97 122 9 " " 10 "> " 12 13 32 91 "(] " 93 ")[ " 123 "(} " 125 "){ " 124 "\" 23bn" 40 "() " 41 ")( " 59 "< 2 " 34 "\" " 39 "' " 96 44 64 35 "' 14b" 92 "\\ " scheme-mode-abbrev-table nil define-abbrev-table] 7) #@76 Imenu generic expression for Scheme mode. See `imenu-generic-expression'. (defvar scheme-imenu-generic-expression '((nil "^(define\\(\\|-\\(generic\\(\\|-procedure\\)\\|method\\)\\)*\\s-+(?\\(\\sw+\\)" 4) ("Types" "^(define-class\\s-+(?\\(\\sw+\\)" 1) ("Macros" "^(\\(defmacro\\|define-macro\\|define-syntax\\)\\s-+(?\\(\\sw+\\)" 2)) (#$ . 1712)) (defalias 'scheme-mode-variables #[nil "\306!\210 \307\304!\210\310P\307\305!\210\f\307\311!\210\312 \307\313!\210\314\307\315!\210\316 \307\317!\210\320\307\321!\210\312\307\322!\210\323\307\324!\210\325\307\326!\210\327\307\330!\210\331\307\332!\210\333\307\334!\210\335\307\321!\210\312\307\336!\210\337\340(\307\341!\210\312!)*\307\342!\210\343\"\307\344!\210\345$\307\346!\210\347\211&\207" [scheme-mode-syntax-table scheme-mode-abbrev-table local-abbrev-table page-delimiter paragraph-start paragraph-separate set-syntax-table make-local-variable "$\\|" paragraph-ignore-fill-prefix t fill-paragraph-function lisp-fill-paragraph adaptive-fill-mode nil indent-line-function lisp-indent-line parse-sexp-ignore-comments outline-regexp ";;; \\|(...." comment-start ";" comment-add 1 comment-start-skip "\\(\\(^\\|[^\\\\\n]\\)\\(\\\\\\\\\\)*\\);+[ ]*" font-lock-comment-start-skip ";+ *" comment-column 40 lisp-indent-function scheme-indent-function ("" scheme-mode-line-process) imenu-case-fold-search imenu-syntax-alist (("+-*/.<>=?!$%_&~^:" . "w")) font-lock-defaults ((scheme-font-lock-keywords scheme-font-lock-keywords-1 scheme-font-lock-keywords-2) nil t (("+-*/.<>=!?$%_&~^:" . "w") (35 . "w 14")) beginning-of-defun (font-lock-mark-block-function . mark-defun) (font-lock-syntactic-face-function . scheme-font-lock-syntactic-face-function) (parse-sexp-lookup-properties . t) (font-lock-extra-managed-props syntax-table)) lisp-doc-string-elt-property scheme-doc-string-elt mode-line-process scheme-imenu-generic-expression imenu-generic-expression] 2]) (byte-code "\301B\302\301!\204 \303\301\304\"\210\301\207" [current-load-list scheme-mode-line-process default-boundp set-default ""] 3) #@91 Keymap for Scheme mode. All commands in `lisp-mode-shared-map' are inherited by this map. (defvar scheme-mode-map (byte-code "\303 \303\304!\305 \n\"\210\306 \307\304B#\210\306\310\311#\210\306\312\313#\210\306\314\315#\210\306\316\317#\210\306\320\321#\210\322\323\324\325#\210\322\326\324\325#\210\322\327\324\325#\210 *\207" [map smap lisp-mode-shared-map make-sparse-keymap "Scheme" set-keymap-parent define-key [menu-bar scheme] [run-scheme] ("Run Inferior Scheme" . run-scheme) [uncomment-region] ("Uncomment Out Region" lambda (beg end) (interactive "r") (comment-region beg end '(4))) [comment-region] ("Comment Out Region" . comment-region) [indent-region] ("Indent Region" . indent-region) [indent-line] ("Indent Line" . lisp-indent-line) put comment-region menu-enable mark-active uncomment-region indent-region] 5) (#$ . 3805)) (defalias 'scheme-mode-commands #[(map) "\301\302\303#\210\301\304\305#\207" [map define-key "" backward-delete-char-untabify "" indent-sexp] 4]) #@861 Major mode for editing Scheme code. Editing commands are similar to those of `lisp-mode'. In addition, if an inferior Scheme process is running, some additional commands will be defined, for evaluating expressions and controlling the interpreter, and the state of the process will be displayed in the modeline of all Scheme buffers. The names of commands that interact with the Scheme process start with "xscheme-" if you use the MIT Scheme-specific `xscheme' package; for more information see the documentation for `xscheme-interaction-mode'. Use \[run-scheme] to start an inferior Scheme using the more general `cmuscheme' package. Commands: Delete converts tabs to spaces as it moves back. Blank lines separate paragraphs. Semicolons start comments. \{scheme-mode-map} Entry to this mode calls the value of `scheme-mode-hook' if that value is non-nil. (defalias 'scheme-mode #[nil "\303 \210\304!\210\305\306\307 \210\310\311!\207" [scheme-mode-map major-mode mode-name kill-all-local-variables use-local-map scheme-mode "Scheme" scheme-mode-variables run-mode-hooks scheme-mode-hook] 2 (#$ . 4811) nil]) (custom-declare-group 'scheme nil "Editing Scheme code." :link '(custom-group-link :tag "Font Lock Faces group" font-lock-faces) :group 'lisp) #@109 If non-nil, scheme mode is specialized for MIT Scheme. Set this to nil if you normally use another dialect. (custom-declare-variable 'scheme-mit-dialect 't '(#$ . 6077) :type 'boolean :group 'scheme) #@214 *An SGML declaration for the DSSSL file. If it is defined as a string this will be inserted into an empty buffer which is in `dsssl-mode'. It is typically James Clark's style-sheet doctype, as required for Jade. (custom-declare-variable 'dsssl-sgml-declaration '"<!DOCTYPE style-sheet PUBLIC \"-//James Clark//DTD DSSSL Style Sheet//EN\">\n" '(#$ . -6284) :type '(choice (string :tag "Specified string") (const :tag "None" :value nil)) :group 'scheme) #@63 Normal hook run when entering `scheme-mode'. See `run-hooks'. (custom-declare-variable 'scheme-mode-hook 'nil '(#$ . 6743) :type 'hook :group 'scheme) #@62 Normal hook run when entering `dsssl-mode'. See `run-hooks'. (custom-declare-variable 'dsssl-mode-hook 'nil '(#$ . 6900) :type 'hook :group 'scheme) #@47 *Program invoked by the `run-scheme' command. (custom-declare-variable 'scheme-program-name '"scheme" '(#$ . -7055) :type 'string :group 'scheme) #@75 Imenu generic expression for DSSSL mode. See `imenu-generic-expression'. (defvar dsssl-imenu-generic-expression '(("Defines" "^(define\\s-+(?\\(\\sw+\\)" 1) ("Modes" "^\\s-*(mode\\s-+\\(\\(\\sw\\|\\s-\\)+\\)" 1) ("Elements" "^\\s-*(element\\s-+(?\\(\\(\\sw\\|\\s-\\)+\\))?" 1) ("Declarations" "^(declare\\(-\\sw+\\)+\\>\\s-+\\(\\sw+\\)" 2)) (#$ . 7207)) #@51 Subdued expressions to highlight in Scheme modes. (defconst scheme-font-lock-keywords-1 '(("(\\(define\\*?\\(\\(\\|-public\\|-method\\|-generic\\(-procedure\\)?\\)\\|\\(-syntax\\|-macro\\)\\|-class\\|-module\\)\\)\\>[ ]*(?\\(\\sw+\\)?" (1 font-lock-keyword-face) (6 (cond ((match-beginning 3) font-lock-function-name-face) ((match-beginning 5) font-lock-variable-name-face) (t font-lock-type-face)) nil t))) (#$ . 7568)) #@49 Gaudy expressions to highlight in Scheme modes. (defconst scheme-font-lock-keywords-2 (append scheme-font-lock-keywords-1 '(("(\\(and\\|begin\\|c\\(?:a\\(?:ll\\(?:-with-\\(?:current-continuation\\|\\(?:in\\|out\\)put-file\\)\\|/cc\\)\\|se\\)\\|ond\\)\\|d\\(?:elay\\|o\\)\\|else\\|for\\(?:-each\\|ce\\)\\|if\\|l\\(?:ambda\\|et\\(?:\\*\\(?:-values\\)?\\|-\\(?:syntax\\|values\\)\\|rec\\(?:-syntax\\)?\\)?\\)\\|map\\|or\\|syntax\\(?:-rules\\)?\\)\\>" . 1) ("(let\\s-+\\(\\sw+\\)" (1 font-lock-function-name-face)) ("\\<<\\sw+>\\>" . font-lock-type-face) ("\\<#?:\\sw+\\>" . font-lock-builtin-face))) (#$ . 7996)) #@51 Default expressions to highlight in Scheme modes. (defvar scheme-font-lock-keywords scheme-font-lock-keywords-1 (#$ . 8612)) (byte-code "\303B\304\305 !\306\307\310\n#\210\306\311\312\n#\210\306\313\314\n#\210\n)!\210\315\316\317\320#\210\315\321\317\322#\207" [current-load-list scheme-mode-syntax-table st scheme-sexp-comment-syntax-table (lambda (#1=#:defconst-tmp-var) (defconst scheme-sexp-comment-syntax-table #1#)) make-syntax-table modify-syntax-entry 59 "." 10 " " 35 "'" put lambda scheme-doc-string-elt 2 define #[nil "\300d!\210\301f\302=\203 \303\207\304\207" [forward-comment nil 40 2 0] 2]] 5) (defalias 'scheme-font-lock-syntactic-face-function #[(state) "\3048\204; \3058f\306=\203; \3058Tf\307=\203; \212`\310\311\312\217\211 \313ZW\2032 \314\n \313Z\315$\210\314 S \315\316$\210+\317!\207" [state end pos scheme-sexp-comment-syntax-table 3 8 35 59 err (byte-code "\302\303\304 8\\b\210\305\306!\210`)\207" [parse-sexp-lookup-properties state nil 2 8 forward-sexp 1] 3) ((scan-error (nth 2 err))) 2 put-text-property syntax-table (12) lisp-font-lock-syntactic-face-function] 6]) (byte-code "\302\303N\204\f \304\302\303\305#\210\306\307!\204 \304\307\310\311#\210\307B\312\307!\204( \313\307\314 \"\210\306\315!\2044 \304\315\310\311#\210\315B\312\315!\204D \313\315\316 \"\210\304\301\310\311#\210\301B\312\301!\204^ \313\301\317\301\320\"\210 \"\210\304\311\321\322#\207" [current-load-list dsssl-mode-abbrev-table dsssl-mode-hook variable-documentation put "Hook run when entering DSSSL mode.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" boundp dsssl-mode-map definition-name dsssl-mode default-boundp set-default make-sparse-keymap dsssl-mode-syntax-table make-syntax-table define-abbrev-table nil derived-mode-parent scheme-mode] 5) #@398 Major mode for editing DSSSL code. Editing commands are similar to those of `lisp-mode'. Commands: Delete converts tabs to spaces as it moves back. Blank lines separate paragraphs. Semicolons start comments. \{scheme-mode-map} Entering this mode runs the hooks `scheme-mode-hook' and then `dsssl-mode-hook' and inserts the value of `dsssl-sgml-declaration' if that variable's value is a string. (defalias 'dsssl-mode #[nil "\306\300!\210\307\310 \210\311\312\310\313N\203 \314\311\313\310\313N#\210\315!\204' \316\317 \"\210\320\f!\211\2036 \321 =\203<