;ELC ;;; Compiled by jjc@pineapple.bkk.thaiopensource.com on Mon Oct 4 11:58:42 2004 ;;; from file /home/jjc/elisp/rng-maint.el ;;; in Emacs version 21.3.1 ;;; with bytecomp version 2.85.4.1 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. (if (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19.29"))) (error "`rng-maint.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\304\305!\210\304\306!\210\304\307!\210\302B\310\302!\204\311 !\303B\312\304\207" [current-load-list load-file-name rng-dir rng-autoload-modules require xmltok nxml-mode texnfo-upd boundp file-name-directory (xmltok nxml-mode nxml-uchnm nxml-glyph rng-cmpct rng-maint rng-valid rng-xsd rng-nxml)] 2) #@38 Update the autoloads in rng-auto.el. (defalias 'rng-update-autoloads #[nil "\303\304\"\305\306\n\")\207" [rng-dir generated-autoload-file rng-autoload-modules expand-file-name "rng-auto.el" mapcar #[(x) "\302\303\304!\305P \"!\207" [x rng-dir update-file-autoloads expand-file-name symbol-name ".el"] 4]] 3 (#$ . 937) nil]) (byte-code "\301B\302\301\207" [current-load-list rng-compile-modules (xmltok nxml-util nxml-enc nxml-glyph nxml-rap nxml-outln nxml-mode nxml-uchnm nxml-ns nxml-parse nxml-maint xsd-regexp rng-util rng-dt rng-xsd rng-uri rng-pttrn rng-cmpct rng-match rng-parse rng-loc rng-valid rng-nxml rng-maint)] 2) #@76 Byte-compile and load all of the RELAX NG library in an appropriate order. (defalias 'rng-byte-compile-load #[nil "\301\302\"\207" [rng-compile-modules mapcar #[(x) "\302\303\304!\305P \"\306\"\207" [x rng-dir byte-compile-file expand-file-name symbol-name ".el" t] 4]] 3 (#$ . 1577) nil]) (byte-code "\301B\305\301!\204\f\306\302B\305\302!\204 \307P\303B\305\303!\204( \310P\304B\305\304!\2046 \311P\301\207" [current-load-list rng-manual-base rng-manual-xml rng-manual-texi rng-manual-info boundp "nxml-mode" ".xml" ".texi" ".info"] 2) #@37 Create manual.texi from manual.xml. (defalias 'rng-format-manual #[nil "\306\307 \"!\306\307\n \"!\212 q\210\310 \210 \311\312\313\"!\210\fq\210eb\210\314\211\211\211\211\211\211\211\211\315 \210\316 \210. \311\317!\210) q\210\320 \210\321ed\322#\210\323 \210\324 +\207" [rng-manual-xml rng-dir rng-manual-texi texi-buf xml-buf standard-output find-file-noselect expand-file-name erase-buffer princ format "\\input texinfo @c -*- texinfo -*-\n@c %%**start of header\n@setfilename %s\n@settitle \n@c %%**end of header\n" nil xmltok-forward-prolog rng-process-tokens "\n@bye\n" rng-manual-fixup texinfo-insert-node-lines t texinfo-all-menus-update save-buffer rng-manual-info xmltok-errors xmltok-dependent-regions xmltok-namespace-attributes xmltok-attributes xmltok-replacement xmltok-name-end xmltok-name-colon xmltok-start xmltok-type] 9 (#$ . 2140) nil]) (defalias 'rng-manual-fixup #[nil "eb\210\303\304!\210`\303\305!\210\306`S\"eb\210\303\307!\210 c\210\303\310!\210\311\224b\210\312\313 \314\n\315\261*\207" [pos title rng-manual-info search-forward "@top " "\n" buffer-substring-no-properties "@settitle " "@node" 0 "@dircategory Emacs\n" "@direntry\n* " ": (" ").\n@end direntry\n\n"] 6]) (byte-code "\301B\302\301!\204\f\303\301\207" [current-load-list rng-manual-inline-elements boundp (kbd key samp code var emph uref point)] 2) (defalias 'rng-process-tokens #[nil "\306\307C\307\211\211\211\211\211\211678\310 \205\3539\311>\203a9\312>9\313>\314 \2036\315 \2028\316 !\307\3076\f:>\203q \203f \203]\317 \210 \320=\203[\321\322!\210\307\323\321\324\325\f\"!\210\n\203K\321\326!\210\202K\f\327=\203\224 \203\204\317 \210\307\321\330!\210\n\203K\331 \210\320\321\332!\210\202K\f\333=\203\252\331 \210\n \203K\321\334!\210\202K\f\335>\203\330 \203\305\3236\317 \210\307\323\321\324\336\f\"!\210\n\203K\331 \210\320\321\324\337\f\"!\210\202K\f\340=\203\366\331 \210 \203\355 \203\353\323\341\n\203K\323\202K\f\342=\2035 \203$\317 \2108\306=\203\321\343!\210\321\344!\210\3218\3458!\210\321\346!\210\3078T8\n\203K\331 \210\3078S8\202K\f\347=\203K \203A\341\n\203K\323\321\350!\210 \203U7B7\n\2037A7\2029\351>\203\3079\352>\203z\353;`\"\202\2359\354>\203\214<\203\214<\202\2359\355=\203\235\353;\356\\`\357Z\" \2037@\203\360\361\362 \323$6\203\272\360\363\364 \323$\3076 \320=\203\312\360\365\364 \323$ G\306V\203 \203\344\317 \210 \320=\203\342\321\322!\210\307\321 !\210\202. \207" [keep-space-for-children data endp startp name want-blank-line 0 nil xmltok-forward (start-tag empty-element end-tag) (start-tag empty-element) (end-tag empty-element) intern xmltok-start-tag-qname xmltok-end-tag-qname rng-manual-output-force-blank-line noindent princ "@noindent\n" t format "@%s{" "}" ulist "@itemize @bullet\n" rng-manual-output-force-new-line "@end itemize\n" item "@item\n" (example display) "@%s\n" "@end %s\n" para fill section "@node Top\n" "@" (top chapter section subsection subsubsection) " " title "\n" (data space char-ref entity-ref cdata-section) (data space) buffer-substring-no-properties (char-ref entity-ref) cdata-section 9 3 replace-regexp-in-string "[@{}]" "@\\&" "\\`\n" "" "\\`\n*" ignore-following-newline keep-space-stack section-depth xmltok-type rng-manual-inline-elements xmltok-start xmltok-replacement] 9]) (defalias 'rng-manual-output-force-new-line #[nil "\212q\210`Sf\301=?\205\301c)\207" [standard-output 10] 2]) (defalias 'rng-manual-output-force-blank-line #[nil "\212q\210`Sf\301=\203`SSf\301=?\205\301c\202\302c)\207" [standard-output 10 "\n\n"] 2]) (defalias 'rng-write-version #[nil "\301\302!\210\303 \210\304\261\210\305 \207" [nxml-version find-file "VERSION" erase-buffer "\n" save-buffer] 2]) (defalias 'rng-time-to-float #[(time) "@\301_A@\\\3028\303\245\\\207" [time 65536.0 2 1000000.0] 3]) (defalias 'rng-time-function #[(function &rest args) "\305 \306 \n\"\305 \307\310 \311\f!\311!Z#\210 +\207" [start function args val end current-time apply message "%s ran in %g seconds" rng-time-to-float] 6]) (defalias 'rng-time-tokenize-buffer #[nil "\300\301!\207" [rng-time-function rng-tokenize-buffer] 2 nil nil]) (defalias 'rng-tokenize-buffer #[nil "\212eb\210\306\211\211\211\211\211\211\211\211 \n \307 \210\310 \205$\202.\n\207" [xmltok-errors xmltok-dependent-regions xmltok-namespace-attributes xmltok-attributes xmltok-replacement xmltok-name-end nil xmltok-forward-prolog xmltok-forward xmltok-name-colon xmltok-start xmltok-type] 9]) (defalias 'rng-time-validate-buffer #[nil "\300\301!\207" [rng-time-function rng-validate-buffer] 2 nil nil]) (defalias 'rng-validate-buffer #[nil "\214~\210\306 \307\211\211\310\211\211\311\216\312ed\"\210.\313edT\"\210)\314\315 \210\316\317\320!\2055\202,\207" [buffer-file-truename buffer-file-name deactivate-mark buffer-undo-list inhibit-modification-hooks inhibit-read-only buffer-modified-p t nil ((byte-code "\204\301\302!\210\302\207" [#1=#:modified restore-buffer-modified-p nil] 2)) rng-clear-cached-state rng-clear-overlays 1 rng-clear-conditional-region 0 rng-do-some-validation #[nil "\300\207" [t] 1] #1# rng-validate-up-to-date-end rng-error-count] 7])