ikan Uploader :
Directory : /usr/share/emacs/25.2/lisp/
Upload File : |
| Current File : //usr/share/emacs/25.2/lisp/pcmpl-gnu.elc |
;ELC
;;; Compiled
;;; in Emacs version 25.2.1
;;; with all optimizations.
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(byte-code "\300\301!\210\302\303!\210\302\304!\210\305\301\306\307\310\303%\210\311\312\313\314\315DD\316\317\320\310\301&\207" [provide pcmpl-gnu require pcomplete pcmpl-unix custom-declare-group nil "Completions for GNU project tools." :group custom-declare-variable pcmpl-gnu-makefile-regexps funcall function #[0 "\300\207" [("\\`GNUmakefile" "\\`[Mm]akefile" "\\.ma?k\\'")] 1] "A list of regexps that will match Makefile names." :type (repeat regexp)] 8)
#@24 Completion for `gzip'.
(defalias 'pcomplete/gzip #[0 "\301\302\303!\210\304\305\306\211\211$\205 \202 )\207" [pcomplete-help "(gzip)" pcomplete-opt "cdfhlLnNqrStvV123456789" pcomplete--here #[0 "\301\3022! \211\205 \303\304@\"\203 \305\302\306\"\210\211A\262\202 \2620!\207" [pcomplete-args pcmpl-gnu-zipped-files has-d-flag string-match "\\`-.*[dt]" throw t] 5] nil] 5 (#$ . 872)])
#@74 Find all zipped or unzipped files: the inverse of UNZIP-P.
(fn UNZIP-P)
(defalias 'pcmpl-gnu-zipped-files #[257 "\300\301\302\303\304\305\306!\307\"\310\311%\"\207" [pcomplete-entries nil make-byte-code 257 "\301!\205! \302!\205! \303\304\"\300\203 \211\206 \300?\205 \211?\262\207" vconcat vector [file-readable-p file-regular-p string-match "\\.\\(t?gz\\|\\(ta\\)?Z\\)\\'"] 4 "\n\n(fn ENTRY)"] 9 (#$ . 1271)])
#@25 Completion for `bzip2'.
(defalias 'pcomplete/bzip2 #[0 "\300\301!\210\302\303\304\211\211$\205 \202 \207" [pcomplete-opt "hdzkftcqvLVs123456789" pcomplete--here #[0 "\301\3022! \211\205 \303\304@\"\203 \305\302\306\"\210\211A\262\202 \2620!\207" [pcomplete-args pcmpl-gnu-bzipped-files has-d-flag string-match "\\`-.*[dt]" throw t] 5] nil] 5 (#$ . 1699)])
#@74 Find all zipped or unzipped files: the inverse of UNZIP-P.
(fn UNZIP-P)
(defalias 'pcmpl-gnu-bzipped-files #[257 "\300\301\302\303\304\305\306!\307\"\310\311%\"\207" [pcomplete-entries nil make-byte-code 257 "\301!\205! \302!\205! \303\304\"\300\203 \211\206 \300?\205 \211?\262\207" vconcat vector [file-readable-p file-regular-p string-match "\\.\\(t?z2\\|bz2\\)\\'"] 4 "\n\n(fn ENTRY)"] 9 (#$ . 2070)])
#@28 Completion for GNU `make'.
(defalias 'pcomplete/make #[0 "\301\302\303!\210\304\305\306\307\306$\205 \202 )\207" [pcomplete-help "(make)Top" pcomplete-opt "bmC/def(pcmpl-gnu-makefile-names)hiI/j?kl?no.pqrsStvwW." pcomplete--here #[0 "\300\301 \302 \"\207" [completion-table-in-turn pcmpl-gnu-make-rule-names pcomplete-entries] 3] nil identity] 5 (#$ . 2492)])
#@43 Return a list of possible makefile names.
(defalias 'pcmpl-gnu-makefile-names #[0 "\301\302\303\304#!\207" [pcmpl-gnu-makefile-regexps pcomplete-entries mapconcat identity "\\|"] 5 (#$ . 2861)])
#@56 Return a list of possible make rule names in MAKEFILE.
(defalias 'pcmpl-gnu-make-rule-names #[0 "\301\235\211A@\206 \302\303!\203 \303\202 \302\304!\203 \304\202 \305\306\307!\204/ ?\205l \301C\202l \310\311!r\211q\210\312\313\314\315\316!\317\"\320$\216\3211M \322!0\202Q \210\202R \210\323\324\306\325#\203g \326\327\330\331!!\"\262\202R *\210\332!\207" [pcomplete-args "-f" file-exists-p "GNUmakefile" "makefile" "Makefile" nil file-readable-p generate-new-buffer " *temp*" make-byte-code 0 "\301\300!\205 \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 (error) insert-file-contents re-search-forward "^\\s-*\\([^\n#%.$][^:=\n]*\\)\\s-*:[^=]" t append split-string match-string 1 pcomplete-uniqify-list] 10 (#$ . 3063)])
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313& \207" [custom-declare-variable pcmpl-gnu-tarfile-regexp funcall function #[0 "\300\207" [#1="\\.t\\(ar\\(\\.\\(gz\\|bz2\\|Z\\|xz\\)\\)?\\|gz\\|a[zZ]\\|z2\\)\\'"] 1 #1#] "A regexp which matches any tar archive." :version "24.3" :type regexp :group pcmpl-gnu] 10)
#@63 Run BODY inside a buffer visiting FILE.
(fn FILE &rest BODY)
(defalias 'pcmpl-gnu-with-file-buffer '(macro . #[385 "\300\301!\300\302!\300\303!\304D\305DD\306\307DEDE\310\311BB\312\313\314 D\315DE\316DEEE\207" [make-symbol "exist" "file" "buf" let* find-buffer-visiting or find-file-noselect unwind-protect with-current-buffer when and not buffer-live-p kill-buffer] 14 (#$ . 4143)]))
(byte-code "\300\301\302\303#\210\304\301\305\306#\207" [put pcmpl-gnu-with-file-buffer edebug-form-spec t function-put lisp-indent-function 1] 4)
#@37 Completion for the GNU tar utility.
(defalias 'pcomplete/tar #[0 "\301\211C\302\300!\205\f \303B\304\305\306\"\203\354\307\262\304\310\306\"\203/ \304\311\306\"\2033 \312\313\301\307\301$\210\2023 \314\315!\210\304\316\306\"\203D \312\317\301\307\301$\210\202
\304\320\306\"\203U \312\321\301\307\301$\210\202
\304\322\306\"\203f \312\323\301\307\301$\210\202
\304\324\306\"\203w \312\325\301\307\301$\210\202
\304\326\306\"\203\213 \312\327\330\331\306\"\307\301$\210\202
\304\332\306\"\203\237 \312\333\330\331\306\"\307\301$\210\202
\304\334\306\"\203\260 \312\335\301\307\301$\210\202
\304\336\306\"\203\276 \211\307\240\210\202
\304\337\306\"\203\322 \312\340\330\331\306\"\307\301$\210\202
\304\341\306\"\203\346 \312\342\330\331\306\"\307\301$\210\202
\304\343\306\"\203\372 \312\344\330\331\306\"\307\301$\210\202
\304\345\306\"\203\312\346\330\331\306\"\307\301$\210\202
\304\347\306\"\203 \312\350\301\307\301$\210\202
\304\351\306\"\2030\312\352\301\307\301$\210\202
\304\353\306\"\203D\312\354\330\331\306\"\307\301$\210\202
\304\355\306\"\203U\312\356\301\307\301$\210\202
\304\357\306\"\203i\312\360\330\331\306\"\307\301$\210\202
\304\361\306\"\203z\312\362\301\307\301$\210\202
\304\363\306\"\203\216\312\364\330\331\306\"\307\301$\210\202
\304\365\306\"\203\242\312\366\330\331\306\"\307\301$\210\202
\304\367\306\"\203\263\312\370\301\307\301$\210\202
\304\371\306\"\203\304\312\372\301\307\301$\210\202
\304\373\306\"\203\330\312\374\330\331\306\"\307\301$\210\202
\304\375\306\"\203
\312\376\330\331\306\"\307\301$\210\202
)\204\312\377\301\211\211$\210\304\201@ \201A \331#\203\211\307\240\210\312\201B \301\211\211$\210\312\201C \306\201D \201E \201F !\201G \"\201H $\301\201I \301$\2056\202\207" [pcomplete-suffix-list nil boundp 61 pcomplete-match "^-" 0 t "^--" "^--\\([^= \n\f]*\\)\\'" pcomplete--here #[0 "\300\207" [("--absolute-names" "--after-date=" "--append" "--atime-preserve" "--backup" "--block-number" "--blocking-factor=" "--catenate" "--checkpoint" "--compare" "--compress" "--concatenate" "--confirmation" "--create" "--delete" "--dereference" "--diff" "--directory=" "--exclude=" "--exclude-from=" "--extract" "--file=" "--files-from=" "--force-local" "--get" "--group=" "--gzip" "--help" "--ignore-failed-read" "--ignore-zeros" "--incremental" "--info-script=" "--interactive" "--keep-old-files" "--label=" "--list" "--listed-incremental" "--mode=" "--modification-time" "--multi-volume" "--new-volume-script=" "--newer=" "--newer-mtime" "--no-recursion" "--null" "--numeric-owner" "--old-archive" "--one-file-system" "--owner=" "--portability" "--posix" "--preserve" "--preserve-order" "--preserve-permissions" "--read-full-records" "--record-size=" "--recursive-unlink" "--remove-files" "--rsh-command=" "--same-order" "--same-owner" "--same-permissions" "--sparse" "--starting-file=" "--suffix=" "--tape-length=" "--to-stdout" "--totals" "--uncompress" "--ungzip" "--unlink-first" "--update" "--use-compress-program=" "--verbose" "--verify" "--version" "--volno-file=")] 1] pcomplete-opt "01234567ABCFGKLMNOPRSTUVWXZbcdfghiklmoprstuvwxz" "\\`-\\'" #[0 "\300\207" [nil] 1] "\\`--after-date=" #[0 "\300\207" [nil] 1] "\\`--backup=" #[0 "\300\207" [nil] 1] "\\`--blocking-factor=" #[0 "\300\207" [nil] 1] "\\`--directory=\\(.*\\)" #[0 "\300\301\302\"\207" [nil pcomplete-entries file-directory-p] 4] pcomplete-match-string 1 "\\`--exclude-from=\\(.*\\)" #[0 "\300 \207" [pcomplete-entries] 1] "\\`--exclude=" #[0 "\300\207" [nil] 1] "\\`--\\(extract\\|list\\)\\'" "\\`--file=\\(.*\\)" #[0 "\301\302\301\303\304\305\306\307\"\310\"\311\312%\"\207" [pcmpl-gnu-tarfile-regexp nil pcomplete-entries make-byte-code 257 "\302!\206 \300\203 \303\300\"\205 \301?\206 \301!\207" vconcat vector [file-directory-p string-match] 4 "\n\n(fn F)"] 11] "\\`--files-from=\\(.*\\)" #[0 "\300 \207" [pcomplete-entries] 1] "\\`--group=\\(.*\\)" #[0 "\205 \301!\207" [pcmpl-unix-group-file pcmpl-unix-read-passwd-file] 2] "\\`--info-script=\\(.*\\)" #[0 "\300 \207" [pcomplete-entries] 1] "\\`--label=" #[0 "\300\207" [nil] 1] "\\`--mode=" #[0 "\300\207" [nil] 1] "\\`--new-volume-script=\\(.*\\)" #[0 "\300 \207" [pcomplete-entries] 1] "\\`--newer=" #[0 "\300\207" [nil] 1] "\\`--owner=\\(.*\\)" #[0 "\205 \301!\207" [pcmpl-unix-passwd-file pcmpl-unix-read-passwd-file] 2] "\\`--record-size=" #[0 "\300\207" [nil] 1] "\\`--rsh-command=\\(.*\\)" #[0 " \207" [pcomplete-command-completion-function] 1] "\\`--starting-file=\\(.*\\)" #[0 "\300 \207" [pcomplete-entries] 1] "\\`--suffix=" #[0 "\300\207" [nil] 1] "\\`--tape-length=" #[0 "\300\207" [nil] 1] "\\`--use-compress-program=\\(.*\\)" #[0 " \207" [pcomplete-command-completion-function] 1] "\\`--volno-file=\\(.*\\)" #[0 "\300 \207" [pcomplete-entries] 1] #[0 "\300\301\302\303\304\"\262\"\207" [mapcar char-to-string "01234567ABCFGIKLMNOPRSTUVWXZbcdfghiklmoprstuvwxz" append nil] 6] "[xt]" first #[0 "\301\302\301\303\304\305\306\307\"\310\"\311\312%\"\207" [pcmpl-gnu-tarfile-regexp nil pcomplete-entries make-byte-code 257 "\302!\206 \300\203 \303\300\"\205 \301?\206 \301!\207" vconcat vector [file-directory-p string-match] 4 "\n\n(fn F)"] 11] make-byte-code "\300\242\2032 \302\303\304!!\3058\211\247\205 ?\206 \211 W\266\202\2032 \303\304!\306\307\310\311\312\313!\314\"\315\316%!\207\317 \207" vconcat vector [large-file-warning-threshold file-attributes pcomplete-arg 1 7 completion-table-dynamic make-byte-code 257 "\300\302!\211\206 \303!\304\305\306\307\310\"\311\"\312$\216r\211q\210\313\314 \"*\207" vconcat vector [tar-parse-info find-buffer-visiting find-file-noselect make-byte-code 0 "\300?\205 \302\301!\205 \303\301!\207" vconcat vector [buffer-live-p kill-buffer] 2 mapcar tar-header-name] 11 "\n\n(fn STRING)" pcomplete-entries] 8 identity] 9 (#$ . 4700)])
(defalias 'pcomplete/gdb 'pcomplete/xargs)
Kontol Shell Bypass