%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : /usr/local/share/emacs/27.2/lisp/
Upload File :
Create Path :
Current File : //usr/local/share/emacs/27.2/lisp/pcmpl-gnu.elc

;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; 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%\210\311\321\313\314\322DD\323\317\324\325\326\327\330&	\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) pcmpl-gnu-makefile-includes #[0 "\300\207" [t] 1] "If non-nil, `pcomplete/make' completes on targets in included files." boolean :version "27.1" :safe booleanp] 10)
#@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 (#$ . 1078)])
#@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 (#$ . 1478)])
#@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 (#$ . 1906)])
#@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 (#$ . 2277)])
#@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 (#$ . 2699)])
#@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 (#$ . 3068)])
#@103 Add to TARGETS the list of makefile targets in the current buffer.
Return the new list.

(fn TARGETS)
(defalias 'pcmpl-gnu-make-targets #[257 "eb\210\300\301\302\303#\203\304\305\306!!\244\262\202\207" [re-search-forward "^\\s-*\\([^\n#%.$][^:=\n]*\\)\\s-*:[^=]" nil t split-string match-string-no-properties 1] 5 (#$ . 3271)])
#@65 Return a list of all included file names in the current buffer.
(defalias 'pcmpl-gnu-make-includes #[0 "\300eb\210\301\302\300\303#\203\304\305!B\262\202\211\207" [nil search-forward-regexp "^include +\\(.*\\)$" t match-string-no-properties 1] 5 (#$ . 3611)])
#@120 Add to TARGETS the list of target names in MAKEFILE and files it includes.
Return the new list.

(fn MAKEFILE TARGETS)
(defalias 'pcmpl-gnu-make-all-targets #[514 "\301\302!r\211q\210\303\304\305\306\307!\310\"\311$\216\3121\313!0\202$\314\315\"\262\210\205+\316 \317!\262\211\211\203K\211@\320!\203D\321\"\262A\266\202\2021\266*\210\207" [pcmpl-gnu-makefile-includes generate-new-buffer " *temp*" make-byte-code 0 "\301\300!\205	\302\300!\207" vconcat vector [buffer-name kill-buffer] 2 (debug error) insert-file-contents message "Error: %S" pcmpl-gnu-make-includes pcmpl-gnu-make-targets file-readable-p pcmpl-gnu-make-all-targets] 9 (#$ . 3884)])
#@80 Return a list of possible make targets in a makefile in the current directory.
(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/?\2058\301C\2028\310\"\262\311!\207" [pcomplete-args "-f" file-exists-p "GNUmakefile" "makefile" "Makefile" nil file-readable-p pcmpl-gnu-make-all-targets pcomplete-uniquify-list] 6 (#$ . 4562)])
(byte-code "\300\301\302\303\304DD\305\306\307\310\311&\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] 8)
#@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 (#$ . 5283)]))
(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 "\300\211C\301\302\303\"\203\342\304\262\301\305\303\"\203%\301\306\303\"\203)\307\310\300\304\300$\210\202)\311\312!\210\301\313\303\"\203:\307\314\300\304\300$\210\202\301\315\303\"\203K\307\316\300\304\300$\210\202\301\317\303\"\203\\\307\320\300\304\300$\210\202\301\321\303\"\203m\307\322\300\304\300$\210\202\301\323\303\"\203\201\307\324\325\326\303\"\304\300$\210\202\301\327\303\"\203\225\307\330\325\326\303\"\304\300$\210\202\301\331\303\"\203\246\307\332\300\304\300$\210\202\301\333\303\"\203\264\211\304\240\210\202\301\334\303\"\203\310\307\335\325\326\303\"\304\300$\210\202\301\336\303\"\203\334\307\337\325\326\303\"\304\300$\210\202\301\340\303\"\203\360\307\341\325\326\303\"\304\300$\210\202\301\342\303\"\203\307\343\325\326\303\"\304\300$\210\202\301\344\303\"\203\307\345\300\304\300$\210\202\301\346\303\"\203&\307\347\300\304\300$\210\202\301\350\303\"\203:\307\351\325\326\303\"\304\300$\210\202\301\352\303\"\203K\307\353\300\304\300$\210\202\301\354\303\"\203_\307\355\325\326\303\"\304\300$\210\202\301\356\303\"\203p\307\357\300\304\300$\210\202\301\360\303\"\203\204\307\361\325\326\303\"\304\300$\210\202\301\362\303\"\203\230\307\363\325\326\303\"\304\300$\210\202\301\364\303\"\203\251\307\365\300\304\300$\210\202\301\366\303\"\203\272\307\367\300\304\300$\210\202\301\370\303\"\203\316\307\371\325\326\303\"\304\300$\210\202\301\372\303\"\203\307\373\325\326\303\"\304\300$\210\202\204\371\307\374\300\211\211$\210\301\375\376\326#\203\371\211\304\240\210\307\377\300\211\211$\210\307\201@\303\201A\201B\201C!\201D\"\201E$\300\201F\300$\205%\202\207" [nil 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\2035\302\303\304!!\211\3058\262\211\247\205	?\206\211	W\266\202\2035\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 (#$ . 5844)])
#@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 (#$ . 11661)])
(defalias 'pcomplete/gdb 'pcomplete/xargs)

Zerion Mini Shell 1.0