;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(defvar nxml-file-name-ignore-case (byte-code "\301=\205\302\207" [system-type windows-nt (windows-nt)] 2))
(defvar nxml-cached-file-name-auto-coding-regexp nil)
(defvar nxml-cached-auto-mode-alist nil)
#@71 Return regexp for filenames for which XML auto-coding should be done.
(defalias 'nxml-file-name-auto-coding-regexp #[0 "	=\203\n\207\305
\203)@A\306=\203\"@@
B\262
A\262\202\211A\2043\211@\2028\307\310\311#\211)\207" [auto-mode-alist nxml-cached-auto-mode-alist nxml-cached-file-name-auto-coding-regexp nxml-file-name-ignore-case case-fold-search nil nxml-mode mapconcat #[257 "\300
\301Q\207" ["\\(?:" "\\)"] 4 "\n\n(fn R)"] "\\|"] 7 (#$ . 290)])
#@77 The function that `set-auto-coding-function' should call for non-XML files.
(defvar nxml-non-xml-set-auto-coding-function nil (#$ . 765))
#@23 

(fn FILE-NAME SIZE)
(defalias 'nxml-set-auto-coding #[514 "\303 
\211\205
\304
\")\266\202\203\305\"\207\n\205 \n\"\207" [nxml-file-name-ignore-case case-fold-search nxml-non-xml-set-auto-coding-function nxml-file-name-auto-coding-regexp string-match nxml-set-xml-coding] 7 (#$ . 909)])
#@98 Function to use as `set-auto-coding-function' when file is known to be XML.

(fn FILE-NAME SIZE)
(defalias 'nxml-set-xml-coding #[514 "\300`\301^\\!\207" [nxml-detect-coding-system 1024] 6 (#$ . 1215)])
#@14 

(fn LIMIT)
(defalias 'nxml-detect-coding-system #[257 "\211`\300\\W\203\301f\302=\203\303\207\304\207\301f`TfD\211\305\267\202/\306\307!\205Y\307\207\306\310!\205Y\310\207\302
>\2037\303\207\311!\211:\203N\312\313@A\"!\206W\314\202W\211\203V\304\202W\301\262
\207" [2 nil 0 no-conversion utf-8 #s(hash-table size 2 test equal rehash-size 1.5 rehash-threshold 0.8125 purecopy t data ((254 255) 31 (255 254) 39)) coding-system-p utf-16-be utf-16-le xmltok-get-declared-encoding-position nxml-mime-charset-coding-system buffer-substring-no-properties raw-text] 7 (#$ . 1425)])
#@16 

(fn CHARSET)
(defalias 'nxml-mime-charset-coding-system #[257 "\300
\227!\301\302!\303\211\203+\211\204+@\262\304\305\"=\203$
\262
\202	A\262\202	\207" [intern coding-system-list t nil coding-system-get mime-charset] 8 (#$ . 2023)])
#@145 Do encoding auto-detection as specified in the XML standard.
Applied to any files that `auto-mode-alist' says should be handled by
`nxml-mode'.
(defalias 'nxml-start-auto-coding #[0 "\303=?\205\304\303\211)\207" [set-auto-coding-function inhibit-quit nxml-non-xml-set-auto-coding-function nxml-set-auto-coding t] 2 (#$ . 2277) nil])
#@70 Stop doing encoding auto-detection as specified in the XML standard.
(defalias 'nxml-stop-auto-coding #[0 "\303=\205\304\n\305\211)\207" [set-auto-coding-function inhibit-quit nxml-non-xml-set-auto-coding-function nxml-set-auto-coding t nil] 2 (#$ . 2623) nil])
(byte-code "\300\301\302\"\204
\303\301\302\301#\210\304\305!\207" [coding-system-get us-ascii mime-charset coding-system-put provide nxml-enc] 4)