[config.git] / djavu-asus / elpa / company-20230926.32 / company-nxml.elc

;ELC\1c\0\0\0
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.


(byte-code "\300\301!\210\300\302!\207" [require company cl-lib] 2)
(defconst company-nxml-token-regexp "\\(?:[_[:alpha:]][-._[:alnum:]]*\\_>\\)")
(defvar company-nxml-in-attribute-value-regexp (byte-code "\301\302\b\303\304\211%\207" [company-nxml-token-regexp replace-regexp-in-string "w" "<w\\(?::w\\)?\\(?:[ 	\r\n]+w\\(?::w\\)?[ 	\r\n]*=[ 	\r\n]*\\(?:\"[^\"]*\"\\|'[^']*'\\)\\)*[ 	\r\n]+\\(w\\(:w\\)?\\)[ 	\r\n]*=[ 	\r\n]*\\(\"\\([^\"]*\\>\\)\\|'\\([^']*\\>\\)\\)\\=" t] 6))
(defvar company-nxml-in-tag-name-regexp (byte-code "\301\302\b\303\304\211%\207" [company-nxml-token-regexp replace-regexp-in-string "w" "<\\(/?w\\(?::w?\\)?\\)?\\=" t] 6))
(defalias 'company-nxml-all-completions #[(prefix alist) "\306\307\b\"\310\211\19\1a\e\f@A\203\17\0\311\f@AP\vB\13\312\313\r\v\"\314\"\211\13\2039\0\v@	@\232\2040\0\v@	B\11\v\210\vA\211\13\204#\0	\237+\207" [alist filtered case-fold-search candidates rng-open-elements prefix mapcar cdr nil "/" sort all-completions string<] 5])
(defalias 'company-nxml-prepared '(macro . #[(&rest body) "\301\302\303\304\bBBE\207" [body let ((lt-pos (save-excursion (search-backward "<" nil t))) xmltok-dtd) when (and lt-pos (= (rng-set-state-after lt-pos) lt-pos))] 5]))
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put company-nxml-prepared lisp-indent-function 0 put edebug-form-spec t] 5)
(defalias 'company-nxml-tag #[(command &optional arg &rest ignored) "\b\306\267\2024\0\307\310!\2055\0	\2055\0\311\n\312\"\207\212\313\314\315\316#)\315\e\211\1c\2050\0\317\f!\fU\2050\0\320\r\321 \"*\207\316\207\315\207" [command rng-validate-mode company-nxml-in-tag-name-regexp xmltok-dtd lt-pos arg #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (prefix 6 candidates 21 sorted 50)) derived-mode-p nxml-mode company-grab 1 search-backward "<" nil t rng-set-state-after company-nxml-all-completions rng-match-possible-start-tag-names] 5])
(defalias 'company-nxml-attribute #[(command &optional arg &rest ignored) "\b\306\267\202E\0\307\310!\205F\0	\205F\0\311f\312>\205F\0\313\n\314\"\207\212\315\316\311\317#)\311\e\211\1c\205A\0\320\f!\fU\205A\0\321\f`\rGZ\"\205A\0\322\r\323 \"*\207\317\207\311\207" [command rng-validate-mode rng-in-attribute-regex xmltok-dtd lt-pos arg #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (prefix 6 candidates 28 sorted 67)) derived-mode-p nxml-mode nil (32 9 10) company-grab 1 search-backward "<" t rng-set-state-after rng-adjust-state-for-attribute company-nxml-all-completions rng-match-possible-attribute-names] 5])
(defalias 'company-nxml-attribute-value #[(command &optional arg &rest ignored) "\b\306\267\202|\0\307\310!\205}\0	\205}\0\311f\312>\205+\0\313\n\311\"\205+\0\314\315!\206+\0\314\316!\206+\0\317\207\212\320\321\311\322#)\311\e\211\1c\205z\0\323\f!\fU\205z\0\311\211\211\1d\1e\1a\1e\e\313\ e\1c\f\"\205y\0\324\224\15\325\224\16\e\325\225\211\16\1a\205y\0\326\f\ e\e\"\205y\0\327\ e\e\r\ e\1a#\205y\0\330\ e\1d\331 \"+*\207\311\207" [command rng-validate-mode company-nxml-in-attribute-value-regexp xmltok-dtd lt-pos colon #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (prefix 6 candidates 44)) derived-mode-p nxml-mode nil (39 34 32 9 10) looking-back match-string-no-properties 4 5 "" search-backward "<" t rng-set-state-after 2 1 rng-adjust-state-for-attribute rng-adjust-state-for-attribute-value all-completions rng-match-possible-value-strings attr-end attr-start rng-in-attribute-value-regex arg] 5])
#@52 `company-mode' completion backend for `nxml-mode'.\1f
(defalias 'company-nxml #[(command &optional arg &rest ignored) "\b\302\267\202@\0\303\304!\207\305\306!\206A\0\307\306!\206A\0\310\306!\207\305\306!\203%\0\305\311	\"\207\307\306!\2030\0\307\311	\"\207\310\306!\205A\0\312\310\311	\"\313\"\207\314\207\315\207" [command arg #s(hash-table size 4 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (interactive 6 prefix 10 candidates 26 sorted 62)) company-begin-backend company-nxml company-nxml-tag prefix company-nxml-attribute company-nxml-attribute-value candidates sort string< t nil] 4 (#$ . 3493) (list 'interactive)])
(provide 'company-nxml)
Commit	Line	Data
53e6db90 DC	1	;ELC\1c\0\0\0
	2	;;; Compiled
	3	;;; in Emacs version 28.2
	4	;;; with all optimizations.
	5
	6
	7
	8	(byte-code "\300\301!\210\300\302!\207" [require company cl-lib] 2)
	9	(defconst company-nxml-token-regexp "\\(?:[_[:alpha:]][-._[:alnum:]]*\\_>\\)")
	10	(defvar company-nxml-in-attribute-value-regexp (byte-code "\301\302\b\303\304\211%\207" [company-nxml-token-regexp replace-regexp-in-string "w" "<w\\(?::w\\)?\\(?:[ \r\n]+w\\(?::w\\)?[ \r\n]=[ \r\n]\\(?:\"[^\"]\"\\\|'[^']'\\)\\)[ \r\n]+\\(w\\(:w\\)?\\)[ \r\n]=[ \r\n]\\(\"\\([^\"]\\>\\)\\\|'\\([^']*\\>\\)\\)\\=" t] 6))
	11	(defvar company-nxml-in-tag-name-regexp (byte-code "\301\302\b\303\304\211%\207" [company-nxml-token-regexp replace-regexp-in-string "w" "<\\(/?w\\(?::w?\\)?\\)?\\=" t] 6))
	12	(defalias 'company-nxml-all-completions #[(prefix alist) "\306\307\b\"\310\211\19\1a\e\f@A\203\17\0\311\f@AP\vB\13\312\313\r\v\"\314\"\211\13\2039\0\v@ @\232\2040\0\v@ B\11\v\210\vA\211\13\204#\0 \237+\207" [alist filtered case-fold-search candidates rng-open-elements prefix mapcar cdr nil "/" sort all-completions string<] 5])
	13	(defalias 'company-nxml-prepared '(macro . #[(&rest body) "\301\302\303\304\bBBE\207" [body let ((lt-pos (save-excursion (search-backward "<" nil t))) xmltok-dtd) when (and lt-pos (= (rng-set-state-after lt-pos) lt-pos))] 5]))
	14	(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put company-nxml-prepared lisp-indent-function 0 put edebug-form-spec t] 5)
	15	(defalias 'company-nxml-tag #[(command &optional arg &rest ignored) "\b\306\267\2024\0\307\310!\2055\0 \2055\0\311\n\312\"\207\212\313\314\315\316#)\315\e\211\1c\2050\0\317\f!\fU\2050\0\320\r\321 \"*\207\316\207\315\207" [command rng-validate-mode company-nxml-in-tag-name-regexp xmltok-dtd lt-pos arg #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (prefix 6 candidates 21 sorted 50)) derived-mode-p nxml-mode company-grab 1 search-backward "<" nil t rng-set-state-after company-nxml-all-completions rng-match-possible-start-tag-names] 5])
	16	(defalias 'company-nxml-attribute #[(command &optional arg &rest ignored) "\b\306\267\202E\0\307\310!\205F\0 \205F\0\311f\312>\205F\0\313\n\314\"\207\212\315\316\311\317#)\311\e\211\1c\205A\0\320\f!\fU\205A\0\321\f`\rGZ\"\205A\0\322\r\323 \"*\207\317\207\311\207" [command rng-validate-mode rng-in-attribute-regex xmltok-dtd lt-pos arg #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (prefix 6 candidates 28 sorted 67)) derived-mode-p nxml-mode nil (32 9 10) company-grab 1 search-backward "<" t rng-set-state-after rng-adjust-state-for-attribute company-nxml-all-completions rng-match-possible-attribute-names] 5])
	17	(defalias 'company-nxml-attribute-value #[(command &optional arg &rest ignored) "\b\306\267\202\|\0\307\310!\205}\0 \205}\0\311f\312>\205+\0\313\n\311\"\205+\0\314\315!\206+\0\314\316!\206+\0\317\207\212\320\321\311\322#)\311\e\211\1c\205z\0\323\f!\fU\205z\0\311\211\211\1d\1e\1a\1e\e\313\ e\1c\f\"\205y\0\324\224\15\325\224\16\e\325\225\211\16\1a\205y\0\326\f\ e\e\"\205y\0\327\ e\e\r\ e\1a#\205y\0\330\ e\1d\331 \"+*\207\311\207" [command rng-validate-mode company-nxml-in-attribute-value-regexp xmltok-dtd lt-pos colon #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (prefix 6 candidates 44)) derived-mode-p nxml-mode nil (39 34 32 9 10) looking-back match-string-no-properties 4 5 "" search-backward "<" t rng-set-state-after 2 1 rng-adjust-state-for-attribute rng-adjust-state-for-attribute-value all-completions rng-match-possible-value-strings attr-end attr-start rng-in-attribute-value-regex arg] 5])
	18	#@52 `company-mode' completion backend for `nxml-mode'.\1f
	19	(defalias 'company-nxml #[(command &optional arg &rest ignored) "\b\302\267\202@\0\303\304!\207\305\306!\206A\0\307\306!\206A\0\310\306!\207\305\306!\203%\0\305\311 \"\207\307\306!\2030\0\307\311 \"\207\310\306!\205A\0\312\310\311 \"\313\"\207\314\207\315\207" [command arg #s(hash-table size 4 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (interactive 6 prefix 10 candidates 26 sorted 62)) company-begin-backend company-nxml company-nxml-tag prefix company-nxml-attribute company-nxml-attribute-value candidates sort string< t nil] 4 (#$ . 3493) (list 'interactive)])
	20	(provide 'company-nxml)