HOME

Mini Shell 1.0
DIR:/proc/self/root/usr/share/emacs/26.1/lisp/
Current File : //proc/self/root/usr/share/emacs/26.1/lisp/pcmpl-gnu.elc
;ELC
;;; Compiled
;;; in Emacs version 26.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 (#$ . 870)])
#@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 (#$ . 1269)])
#@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 (#$ . 1697)])
#@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 (#$ . 2068)])
#@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 (#$ . 2490)])
#@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 (#$ . 2859)])
#@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 (#$ . 3061)])
(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 (#$ . 4141)]))
(byte-code "\300\301\302\303#\210\304\301\305\306#\300\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 (#$ . 4702)])
#@38 Completion for the GNU find utility.
(defalias 'pcomplete/find #[0 "\300\301\302\"\303\304\301\"\203\211\305\230\203\306\307!\210\202f\303\304\301\"\203+\310\311\312\211\211$\204\202f\211\313\230\203=\310\314\312\211\211$\2041\202f\211\315\230\203O\310\316\312\211\211$\204C\202f\211\317\230\204[\211\320\230\203f\310\321\300\301!\322\211$\204[\310\323\312\324\312$\205r\202f\207" [pcomplete-arg last -1 pcomplete-match "^-" "find" pcomplete-opt "HLPDO" pcomplete--here #[0 "\300\207" [("-amin" "-anewer" "-atime" "-cmin" "-cnewer" "-context" "-ctime" "-daystart" "-delete" "-depth" "-empty" "-exec" "-execdir" "-executable" "-false" "-fls" "-follow" "-fprint" "-fprint0" "-fprintf" "-fstype" "-gid" "-group" "-help" "-ignore_readdir_race" "-ilname" "-iname" "-inum" "-ipath" "-iregex" "-iwholename" "-links" "-lname" "-ls" "-maxdepth" "-mindepth" "-mmin" "-mount" "-mtime" "-name" "-newer" "-nogroup" "-noignore_readdir_race" "-noleaf" "-nouser" "-nowarn" "-ok" "-okdir" "-path" "-perm" "-print" "-print0" "-printf" "-prune" "-quit" "-readable" "-regex" "-regextype" "-samefile" "-size" "-true" "-type" "-uid" "-used" "-user" "-version" "-warn" "-wholename" "-writable" "-xdev" "-xtype")] 1] nil "-type" #[0 "\300\301\302\303\304\305\306\307\257\207" ["b" "c" "d" "p" "f" "l" "s" "D"] 8] "-xtype" #[0 "\300\301\302\303\304\305\306\257\207" ["b" "c" "d" "p" "f" "l" "s"] 7] "-exec" "-execdir" #[0 " \207" [pcomplete-command-completion-function] 1] t #[0 "\300\301\302\"\207" [nil pcomplete-entries file-directory-p] 4] identity] 6 (#$ . 10565)])
(defalias 'pcomplete/gdb 'pcomplete/xargs)