| Current Path : /usr/share/emacs/24.3/lisp/textmodes/ |
Linux gator3171.hostgator.com 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64 |
| Current File : //usr/share/emacs/24.3/lisp/textmodes/reftex.elc |
;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:11:50 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/textmodes/reftex.el
;;; in Emacs version 24.3.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.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(byte-code "\300\301!\210\300\302!\207" [require custom easymenu] 2)
#@48 Flag showing if tables need to be re-computed.
(defvar reftex-tables-dirty t (#$ . 628))
(defalias 'reftex-set-dirty #[(symbol value) "\303 \nL\207" [reftex-tables-dirty symbol value t] 2])
(require 'reftex-vars)
#@21 Re-parse this file.
(autoload 'reftex-parse-one "reftex-parse" '(#$ . 848) t)
#@27 Re-parse entire document.
(autoload 'reftex-parse-all "reftex-parse" '(#$ . 932) t)
(byte-code "\300\301\302\"\210\300\303\302\"\210\300\304\302\"\210\300\305\302\"\210\300\306\302\"\210\300\307\302\"\210\300\310\302\"\210\300\311\302\"\210\300\312\302\"\210\300\313\302\"\210\300\314\302\"\210\300\315\302\"\210\300\316\302\"\210\300\317\302\"\210\300\320\302\"\210\300\321\302\"\210\300\322\302\"\210\300\323\302\"\210\300\324\325\"\210\300\326\325\"\210\300\327\325\"\207" [autoload reftex-do-parse "reftex-parse" reftex-where-am-I reftex-init-section-numbers reftex-section-info reftex-section-number reftex-what-macro reftex-what-macro-safe reftex-index-info reftex-index-info-safe reftex-short-context reftex-what-environment reftex-what-special-env reftex-move-over-touching-args reftex-notice-new reftex-nth-arg reftex-locate-bibliography-files reftex-ensure-index-support reftex-everything-regexp reftex-label-location "reftex-ref" reftex-label-info-update reftex-label-info] 3)
#@24 Insert a unique label.
(autoload 'reftex-label "reftex-ref" '(#$ . 1926) t)
#@25 Make a LaTeX reference.
(autoload 'reftex-reference "reftex-ref" '(#$ . 2008) t)
#@28 Make a varioref reference.
(autoload 'reftex-varioref-vref "reftex-ref" '(#$ . 2095) t)
#@34 Make a fancyref \fref reference.
(autoload 'reftex-fancyref-fref "reftex-ref" '(#$ . 2189) t)
#@34 Make a fancyref \Fref reference.
(autoload 'reftex-fancyref-Fref "reftex-ref" '(#$ . 2289) t)
(byte-code "\300\301\302\"\210\300\303\302\"\207" [autoload reftex-show-label-location "reftex-ref" reftex-query-label-type] 3)
#@48 Prompt for label name and go to that location.
(autoload 'reftex-goto-label "reftex-ref" '(#$ . 2517) t)
#@54 Show the table of contents for the current document.
(autoload 'reftex-toc "reftex-toc" '(#$ . 2628) t)
#@78 Display the TOC window and highlight line corresponding to current position.
(autoload 'reftex-toc-recenter "reftex-toc" '(#$ . 2738) t)
#@45 Toggle automatic recentering of TOC window.
(autoload 'reftex-toggle-auto-toc-recenter "reftex-toc" '(#$ . 2881) t)
(byte-code "\300\301\302\"\210\300\303\302\"\210\300\304\302\"\210\300\305\302\"\210\300\306\302\"\210\300\307\302\"\210\300\310\302\"\207" [autoload reftex-citep "reftex-cite" reftex-citet reftex-make-cite-echo-string reftex-get-bibfile-list reftex-pop-to-bibtex-entry reftex-end-of-bib-entry reftex-parse-bibtex-entry] 3)
#@46 Make a citation using BibTeX database files.
(autoload 'reftex-citation "reftex-cite" '(#$ . 3327) t)
(byte-code "\300\301\302\"\210\300\303\302\"\210\300\304\302\"\210\300\305\306\"\210\300\307\306\"\210\300\310\306\"\210\300\311\306\"\210\300\312\306\"\210\300\313\306\"\207" [autoload reftex-default-bibliography "reftex-cite" reftex-bib-or-thebib reftex-create-bibtex-file reftex-select-label-mode "reftex-sel" reftex-select-bib-mode reftex-find-start-point reftex-insert-docstruct reftex-get-offset reftex-select-item] 3)
#@66 Query for an index macro and insert it along with its arguments.
(autoload 'reftex-index "reftex-index" '(#$ . 3860) t)
#@68 Put selection or the word near point into the default index macro.
(autoload 'reftex-index-selection-or-word "reftex-index" '(#$ . 3986) t)
#@63 Put selection or the word near point into Index Phrases File.
(autoload 'reftex-index-phrase-selection-or-word "reftex-index" '(#$ . 4132) t)
#@68 Display a buffer with an index compiled from the current document.
(autoload 'reftex-display-index "reftex-index" '(#$ . 4280) t)
#@31 Visit the Index Phrases File.
(autoload 'reftex-index-visit-phrases-buffer "reftex-index" '(#$ . 4416) t)
#@64 Major mode for managing the Index phrases of a LaTeX document.
(autoload 'reftex-index-phrases-mode "reftex-index" '(#$ . 4528) t)
(byte-code "\300\301\302\"\210\300\303\302\"\210\300\304\302\"\210\300\305\302\"\207" [autoload reftex-index-complete-tag "reftex-index" reftex-index-complete-key reftex-index-show-entry reftex-index-select-tag] 3)
#@55 View cross reference of \ref or \cite macro at point.
(autoload 'reftex-view-crossref "reftex-dcr" '(#$ . 4880) t)
#@62 View cross reference of \ref or \cite macro where you click.
(autoload 'reftex-mouse-view-crossref "reftex-dcr" '(#$ . 5001) t)
(autoload 'reftex-toggle-auto-view-crossref "reftex-dcr")
#@74 View location in a LaTeX document which cites the BibTeX entry at point.
(autoload 'reftex-view-crossref-from-bibtex "reftex-dcr" '(#$ . 5193) t)
#@62 Create TAGS file by running `etags' on the current document.
(autoload 'reftex-create-tags-file "reftex-global" '(#$ . 5345) t)
#@60 Run grep query through all files related to this document.
(autoload 'reftex-grep-document "reftex-global" '(#$ . 5479) t)
#@62 Regexp search through all files of the current TeX document.
(autoload 'reftex-search-document "reftex-global" '(#$ . 5608) t)
#@74 Run a query-replace-regexp of FROM with TO over the entire TeX document.
(autoload 'reftex-query-replace-document "reftex-global" '(#$ . 5741) t)
#@57 Produce a list of all duplicate labels in the document.
(autoload 'reftex-find-duplicate-labels "reftex-global" '(#$ . 5893) t)
#@61 Query replace FROM with TO in all \label and \ref commands.
(autoload 'reftex-change-label "reftex-global" '(#$ . 6027) t)
#@71 Renumber all simple labels in the document to make them sequentially.
(autoload 'reftex-renumber-simple-labels "reftex-global" '(#$ . 6156) t)
#@58 Save all documents associated with the current document.
(autoload 'reftex-save-all-document-buffers "reftex-global" '(#$ . 6305) t)
(byte-code "\300\301\302\"\210\300\303\302\"\210\300\304\302\"\210\300\305\302\"\210\300\306\302\"\207" [autoload reftex-arg-label "reftex-auc" reftex-arg-cite reftex-arg-index-tag reftex-arg-index reftex-plug-into-AUCTeX] 3)
#@56 Toggle Interface between AUCTeX and RefTeX on and off.
(autoload 'reftex-toggle-plug-into-AUCTeX "reftex-auc" '(#$ . 6670) t)
(byte-code "\300\301\302\"\210\300\303\302\"\210\300\304\302\"\210\300\305\302\"\207" [autoload reftex-add-label-environments "reftex-auc" reftex-add-to-label-alist reftex-add-section-levels reftex-notice-new-section] 3)
#@28 Version string for RefTeX.
(defconst reftex-version emacs-version (#$ . 7023))
#@25 Keymap for RefTeX mode.
(defvar reftex-mode-map (make-sparse-keymap) (#$ . 7108))
(defvar reftex-mode-menu nil)
(defvar reftex-syntax-table nil)
(defvar reftex-syntax-table-for-bib nil)
(byte-code "\204 \302 \303\304\305#\210\303\306\305#\210 \2042 \302 \303\307\305 #\210\303\310\305 #\210\303\311\305 #\210\303\312\305 #\210\302\207" [reftex-syntax-table reftex-syntax-table-for-bib copy-syntax-table modify-syntax-entry 40 "." 41 39 34 91 93] 4)
#@40 The timer used for auto-view-crossref.
(defvar reftex-auto-view-crossref-timer nil (#$ . 7569))
#@49 The idle timer used to recenter the toc window.
(defvar reftex-toc-auto-recenter-timer nil (#$ . 7671))
#@22 Turn on RefTeX mode.
(defalias 'turn-on-reftex #[nil "\300\301!\207" [reftex-mode t] 2 (#$ . 7781)])
(byte-code "\300\301\302\303#\210\300\301\304\305#\207" [put reftex-mode :included (memq major-mode '(latex-mode tex-mode)) :menu-tag "RefTeX Mode"] 4)
#@91 Non-nil if Reftex mode is enabled.
Use the command `reftex-mode' to change this variable.
(defvar reftex-mode nil (#$ . 8040))
(make-variable-buffer-local 'reftex-mode)
#@1334 Minor mode with distinct support for \label, \ref and \cite in LaTeX.
\<reftex-mode-map>A Table of Contents of the entire (multifile) document with browsing
capabilities is available with `\[reftex-toc]'.
Labels can be created with `\[reftex-label]' and referenced with `\[reftex-reference]'.
When referencing, you get a menu with all labels of a given type and
context of the label definition. The selected label is inserted as a
\ref macro.
Citations can be made with `\[reftex-citation]' which will use a regular expression
to pull out a *formatted* list of articles from your BibTeX
database. The selected citation is inserted as a \cite macro.
Index entries can be made with `\[reftex-index-selection-or-word]' which indexes the word at point
or the current selection. More general index entries are created with
`\[reftex-index]'. `\[reftex-display-index]' displays the compiled index.
Most command have help available on the fly. This help is accessed by
pressing `?' to any prompt mentioning this feature.
Extensive documentation about RefTeX is available in Info format.
You can view this information with `\[reftex-info]'.
\{reftex-mode-map}
Under X, these and other functions will also be available as `Ref' menu
on the menu bar.
------------------------------------------------------------------------------
(defalias 'reftex-mode #[(&optional arg) "\306 \307=\203 \n?\202 \310 !\311V\211\203\203 \312 !\210\f\203# \304 \210\305\313N\2046
\2030 \314 \210\315\305\313\316#\210\317\313N\204L \316=\203F \320 \210\315\317\313\316#\210\321\322 !'\323\324\325'#\210\323\326\325'#\210\321 (\323\327\325(#\210\323\330\325(#\210\323\331\325(#\210\323\332\325(#\210\202\207 \333 !\210\334\335\n\203\221 \336\202\222 \337\"\210\340\341!\203\263 \306 \203\246 \306 \232\203\263 \342\343\n\203\260 \344\202\261 \345\"\210)\346 \210\n\207" [#1=#:last-message arg reftex-mode reftex-mode-menu reftex-plug-into-AUCTeX reftex-auto-view-crossref current-message toggle prefix-numeric-value 0 easy-menu-add initialized reftex-toggle-auto-view-crossref put t reftex-auto-recenter-toc reftex-toggle-auto-toc-recenter copy-syntax-table syntax-table modify-syntax-entry 40 "." 41 39 34 91 93 easy-menu-remove run-hooks reftex-mode-hook reftex-mode-on-hook reftex-mode-off-hook called-interactively-p any message "Reftex mode %sabled" "en" "dis" force-mode-line-update reftex-syntax-table reftex-syntax-table-for-bib] 5 (#$ . 8217) (list (or current-prefix-arg 'toggle))])
(byte-code "\301\302\303\304\211%\207" [reftex-mode-map add-minor-mode reftex-mode " Ref" nil] 6)
#@74 Save RefTeX's parse file for this buffer if the information has changed.
(defalias 'reftex-kill-buffer-hook #[nil "\303\300!\205- \205- \303\301!\205- \205- \303\302!\205- \n\205- \nJ\205- \n\304N\205- \305\306\307\217\207" [reftex-mode reftex-save-parse-info reftex-docstruct-symbol boundp modified nil (byte-code "\300\301!\207" [reftex-access-parse-file write] 2) ((error))] 3 (#$ . 10814)])
#@48 Call `reftex-kill-buffer-hook' on all buffers.
(defalias 'reftex-kill-emacs-hook #[nil "\212\300\301\302 \")\207" [mapcar #[(buf) "q\210\301 \207" [buf reftex-kill-buffer-hook] 1] buffer-list] 3 (#$ . 11217)])
(defconst reftex-multifile-symbols '(reftex-docstruct-symbol))
(defvar reftex-master-index-list nil)
(defvar reftex-multifile-index 0)
(defvar reftex-docstruct-symbol nil)
(make-variable-buffer-local 'reftex-docstruct-symbol)
(defalias 'reftex-next-multifile-index #[nil "T\211\207" [reftex-multifile-index] 2])
#@148 Tie the buffer-local symbols to globals connected with the master file.
If the symbols for the current master file do not exist, they are created.
(defalias 'reftex-tie-multifile-symbols #[nil "\306\307 !\310 \" \311\211 \311 \n\203 \nA\202* \312 \313\nB B\f\203h \f@\fA\314
!
\315\316\317\n!Q!L\210\320
J\321\n#\210\203*
J\311L\210\320
J\322\323#\210\320
J\324#\210\202* .?\207" [master reftex-master-index-list index reftex-multifile-symbols symlist symbol file-truename reftex-TeX-master-file assoc nil reftex-next-multifile-index t symbol-name intern "-" int-to-string put :master-index reftex-index-macros-style (default) reftex-ref-style-list symname newflag reftex-ref-style-default-list] 7 (#$ . 11749)])
#@70 Remove ties from multifile symbols, so that next use makes new ones.
(defalias 'reftex-untie-multifile-symbols #[nil "\303\n\205 \n@\nA \303L\210\202 *\207" [reftex-multifile-symbols symbol symlist nil] 2 (#$ . 12496)])
(defalias 'reftex-TeX-master-file #[nil "\303\304!\203
\305\306\307\217\202a \303\301!\203 \301 \202a \310\300!\203K \311=\203) \312 \202a \313=\203; \314\315\305\211\311\305%\211\202a \206a \314\315\305\211\311\305%\211\202a \310\301!\203_ ;\203Z \202a \312 \202a \312 \211\204m \316\317!\210\202\223 \320\n\321P!\204} \322\n\321P!\203\204 \n\321P\202\223 \320\n!\204\223 \322\n!\204\223 \312 \323\n!)\207" [TeX-master tex-main-file master fboundp TeX-master-file nil (TeX-master-file t) ((error (buffer-file-name))) boundp t buffer-file-name shared read-file-name "Master file: " error "Need a filename for this buffer, please save it first" file-exists-p ".tex" reftex-get-buffer-visiting expand-file-name] 7])
(defalias 'reftex-is-multi #[nil "\302J\236\211\203 A@\202 \303)\207" [reftex-docstruct-symbol entry is-multi t] 3])
#@263 Set the document-local value of `reftex-cite-format'.
When such a value exists, it overwrites the setting given with
`reftex-cite-format'. See the documentation of `reftex-cite-format'
for possible values. This function should be used from AUCTeX style files.
(defalias 'reftex-set-cite-format #[(value) "\204 \302 \210\205 9\205 \303\304 #\207" [reftex-docstruct-symbol value reftex-tie-multifile-symbols put reftex-cite-format] 4 (#$ . 13579)])
(defalias 'reftex-get-cite-format #[nil "\203 9\203 \301N\203 \301N\207 \207" [reftex-docstruct-symbol reftex-cite-format] 2])
#@480 Add index macro descriptions to `reftex-index-macros-style'.
The format of ENTRY-LIST is exactly like `reftex-index-macros'. See there
for details.
This function makes it possible to support RefTeX from AUCTeX style files.
The entries in ENTRY-LIST will be processed after the user settings in
`reftex-index-entries', and before the defaults. Any changes made to
`reftex-index-macros-style' will raise a flag to the effect that
the label information is recompiled on next use.
(defalias 'reftex-add-index-macros #[(entry-list) "\204 \306 \210\205L 9\205L \307N\310\211\f\203B \f\211A@\2119\2031 \n >\2041 \311 !\n \235\204 \312\211\n B\202 \205K \313\307 #+\207" [reftex-docstruct-symbol changed entry list entry-list reftex-tables-dirty reftex-tie-multifile-symbols reftex-index-macros-style nil reftex-remove-symbols-from-list t put] 5 (#$ . 14176)])
#@39 Activate the referencing style STYLE.
(defalias 'reftex-ref-style-activate #[(style) "\301\302\"\207" [style reftex-ref-style-toggle activate] 3 (#$ . 15055)])
#@202 Activate or deactivate the referencing style STYLE.
With the optional argument ACTION a certain action can be forced.
The symbol `activate' will activate the style and `deactivate'
will deactivate it.
(defalias 'reftex-ref-style-toggle #[(style &optional action) "\204 \306 \210\205i 9\205i \307N\310 \311=\203/ \f\n\235\204_ \312\211\313\302\f\312#\210\202_ \314=\203G \f\n\235\203_ \312\211\315\f\n\"\210\202_ \f\n\235\203U \315\f\n\"\210\202[ \313\302\f\312#\210\312\211 \205h \316\307\n#*\207" [reftex-docstruct-symbol changed list action style reftex-tables-dirty reftex-tie-multifile-symbols reftex-ref-style-list nil activate t add-to-list deactivate delete put] 5 (#$ . 15223)])
#@67 Return the list of referencing styles to be active at the moment.
(defalias 'reftex-ref-style-list #[nil "\204 \302 \210\203 9\203 \303N\203 \303N\207 \207" [reftex-docstruct-symbol reftex-ref-style-default-list reftex-tie-multifile-symbols reftex-ref-style-list] 2 (#$ . 15931)])
(defvar reftex-type-query-prompt nil)
(defvar reftex-type-query-help nil)
(defvar reftex-typekey-to-format-alist nil)
(defvar reftex-typekey-to-prefix-alist nil)
(defvar reftex-env-or-mac-alist nil)
(defvar reftex-special-env-parsers nil)
(defvar reftex-label-mac-list nil)
(defvar reftex-label-env-list nil)
(defvar reftex-typekey-list nil)
(defvar reftex-words-to-typekey-alist nil)
(defvar reftex-prefix-to-typekey-alist nil)
(defvar reftex-last-used-reference (byte-code "\300\211\211\211F\207" [nil] 4))
(defvar reftex-key-to-index-macro-alist nil)
(defvar reftex-query-index-macro-prompt nil)
(defvar reftex-query-index-macro-help nil)
(defvar reftex-no-follow-message "No follow-mode into unvisited file. Press SPC to visit it.")
(defvar reftex-no-info-message "%s: info not available, use `\\[reftex-view-crossref]' to get it.")
(defvar reftex-default-context-position nil)
(defvar reftex-location-start nil)
(defvar reftex-call-back-to-this-buffer nil)
(defvar reftex-select-return-marker (make-marker))
(defvar reftex-active-toc nil)
(defvar reftex-tex-path nil)
(defvar reftex-bib-path nil)
(defvar reftex-select-marked nil)
(defvar reftex-last-follow-point nil)
(defvar reftex-latex-syntax-table nil)
(defvar reftex-prefix nil)
(defvar reftex-section-levels-all nil)
(defvar reftex-buffers-with-changed-invisibility nil)
(defvar reftex-callback-fwd t)
#@68 Stores the name of the tex file that `reftex-toc' was last run on.
(defvar reftex-last-toc-master nil (#$ . 17592))
(defvar reftex-recursive-edit-marker (make-marker))
(defvar reftex-buffers-to-kill nil)
(defvar reftex-section-regexp nil)
(defvar reftex-section-or-include-regexp nil)
(defvar reftex-index-macro-regexp nil)
(defvar reftex-index-level-re nil)
(defvar reftex-index-key-end-re nil)
(defvar reftex-find-index-entry-regexp-format nil)
(defvar reftex-everything-regexp nil)
(defvar reftex-everything-regexp-no-index nil)
(defvar reftex-index-re nil)
(defvar reftex-find-citation-regexp-format "\\\\\\([a-zA-Z]*cite[*a-zA-Z]*\\*?\\|bibentry\\)\\(\\[[^]]*\\]\\|{[^}]*}\\)*{\\([^}]*,\\)?\\(%s\\)[},]")
(defvar reftex-find-reference-format "\\\\\\(ref[a-zA-Z]*\\|[a-zA-Z]*ref\\(range\\)?\\)\\*?\\(\\[[^]]*\\]\\|{[^}]*}\\)*{\\(%s\\)}")
(defvar reftex-macros-with-labels nil)
(defvar reftex-macros-with-index nil)
(defvar reftex-index-macro-alist nil)
(defvar reftex-find-label-regexp-format nil)
(defvar reftex-find-label-regexp-format2 nil)
#@71 Memorizes old variable values to indicate changes in these variables.
(defvar reftex-memory nil (#$ . 18646))
(defconst reftex-cache-variables '(reftex-memory reftex-section-levels-all reftex-env-or-mac-alist reftex-special-env-parsers reftex-macros-with-labels reftex-label-mac-list reftex-label-env-list reftex-typekey-list reftex-typekey-to-format-alist reftex-typekey-to-prefix-alist reftex-words-to-typekey-alist reftex-prefix-to-typekey-alist reftex-type-query-prompt reftex-type-query-help reftex-index-macro-alist reftex-macros-with-index reftex-query-index-macro-prompt reftex-query-index-macro-help reftex-key-to-index-macro-alist reftex-section-regexp reftex-section-or-include-regexp reftex-index-re reftex-everything-regexp reftex-everything-regexp-no-index reftex-find-label-regexp-format reftex-find-label-regexp-format2 reftex-find-index-entry-regexp-format))
(defalias 'reftex-ensure-compiled-variables #[nil "\n\306N\211@
\n\307N \n\310N \n\311N \203- \312 \202\245 @=\203b A@=\203b \313 8=\203b \314 8=\203b \315 8=\203b \316 8=\206\245 \f@=\203\243 \fA@=\203\243 \313\f8=\203\243 \313\f8=\203\243 \315\f8=\203\243 \316\f8=\203\243 \317\320!\210\321\322 \"\202\245 \312 . \207" [reftex-memory mem reftex-docstruct-symbol cache cmem reftex-label-alist reftex-cache reftex-section-levels reftex-label-alist-style reftex-index-macros-style reftex-compile-variables 2 3 4 5 message "Restoring cache" mapcar #[(sym) " \211A@L\207" [sym cache] 3] alist levels style reftex-default-label-alist-entries default reftex-index-macros index istyle reftex-tables-dirty reftex-cache-variables] 4])
#@167 Reset RefTeX Mode.
This will re-compile the configuration information and remove all
current scanning information and the parse file to enforce a rescan
on next use.
(defalias 'reftex-reset-mode #[nil "\305\306:\203 @\307\310 \306#\210\307\311 \306#\210A\211\202 *\212\312\306 \211A@\211\203< \313\n!\203% \314\n!\210\202% *\315 \210)\316 \210\317\320!\210\f\203O \304 \210\321 \207" [#1=#:--cl-var-- prop buf buffer-list reftex-plug-into-AUCTeX (status master-dir recursive-path rec-type) nil put reftex-tex-path reftex-bib-path ("*RefTeX Help*" "*RefTeX Select*" "*Duplicate Labels*" "*toc*" " *RefTeX-scratch*") get-buffer kill-buffer reftex-erase-all-selection-and-index-buffers reftex-reset-scanning-information reftex-access-parse-file kill reftex-compile-variables] 5 (#$ . 20304) nil])
#@113 Reset the symbols containing information from buffer scanning.
This enforces rescanning the buffer on next use.
(defalias 'reftex-reset-scanning-information #[nil "\304 \230\203 \305\306!\210 \307 \205, @ A\nJ9\203 \nJ\203 \nJ\307L\210\202 *\207" [reftex-last-toc-master reftex-multifile-symbols symbol symlist reftex-TeX-master-file reftex-erase-buffer "*toc*" nil] 2 (#$ . 21118)])
(defalias 'reftex-erase-all-selection-and-index-buffers #[nil "\302\303\"\210\302\304\305\306 J\"A\"\207" [reftex-typekey-list reftex-docstruct-symbol mapc #[(type) "\301\302!!\207" [type reftex-erase-buffer reftex-make-selection-buffer-name] 3] #[(tag) "\301\302!!\207" [tag reftex-kill-buffer reftex-make-index-buffer-name] 3] assoc index-tags] 5])
(defalias 'reftex-compile-variables #[nil "\306\307!\210\310\311!\203 \312\313!\203 \314\315\316\217\210\314 \n\317N\n\320N \f\n\321N\257\322\323\324 \n\320N #@\"\325\"\322\323\324\f\n\321N\326#A\"!\314\211\211\211\211\211\211\211\211\211\211\211\211\211\211\211\211\211\211\211\211\211\211\211\211\211\211 B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \\ ] ^\314_\327`\314\211ab\314\211cd\314\211ef^\203\272 \330\331\215\210\202\256 c\237c\332Q\333\"Q\334\335\336Q\337#\340Qg\341\335\342Q\343#Ph\344\345_\237\"_\314\211ij\314k]\203\252]@\211\\@I\\A@E\346\\8D\347\\8\206\337X\350\\8H\\G\351V\203%\351\\8\202>Dl@=\203=lG\346V\203=\346l8\202>\352G]A]\353I!\211 m@\206RIIm\211 nA@)OmAA@FmAAA@MIk\235\204\246IEXHOFMG\257iBi\354Dj\"\204\237DIDjBjIkBk)\202\354 \332j\355\"j\356\335\357j\337#\340Qo\360J\361\335\362j\337#Pp\324B\n\317N#q\363 r\364 sr\365\335\366t\367#\370R ur\365\335\371q\367#\372R vr\373P wP\203 \374\335\375P\367#\376Q\202\f\337 x\374\335\375k\367#\376Q y\374\335\375k\367#\377Q z\374\201\213 \367\335\375\324\201\214 P\"\367#\377\260 {\375|@! }\201\215 \347|8\340\201\216 |A@\346|8\340\260 ~vv\367uQ\200s\367v\367u\367w\367yP\203{\367\202|\337x\260 \201s\367v\367u\367w\367\201\217 P\203\232\367\202\233\337x\260 \202y\203}\204~\205P\206z\207{\210\201\220 \211\306\201\221 !\210.(\201\222 \n\201\223 \344\201\224 \212\"#\207" [reftex-tables-dirty reftex-label-alist reftex-docstruct-symbol reftex-default-label-alist-entries reftex-index-macros reftex-memory message "Compiling label environment definitions..." featurep tex-site fboundp TeX-update-style nil (TeX-update-style) ((error)) reftex-section-levels reftex-label-alist-style reftex-index-macros-style reftex-uniquify-by-car reftex-splice-symbols-into-list append (nil) (default) (("sec:" . "s") ("cha:" . "s") ("chap:" . "s")) next-entry (byte-code "@\211@ AA\n\204 \306 @;\203% \307 @! @\310P ABB @\211\205/ \311 ! A@\312 8*\313 8+\314 8,\315 8-,;\203S \314 \233,*;\203k \316\317*\"\203k \320*\321\"*\202q \322*D**@.*A@/\f\203\205 \323\324\f\"\210\f\203\234
\203\234 \325
\"\204\234 \323\326
\fB\"\210\f\203\263
\203\263 \325\f\"\204\263 \323\327\f
B\"\210\n9\203\330 \330\n!\204\303 \331\332\n\"\210\333\21101\3332\323\334\n\"\210\335\n!\202Z\316\336\n\"\203\337\n!\211 3@\206\352 \n3\211 4A@)03AA@13AAA@21\203\323\340\n\"\210)\f\203Z\323\341\n\"\210\202Z\333\21101\3332\n\342\230\204Z\n\306\230\204Z\n\343\230\204Z\323\344\n\"\210-\203Z\345\346\n\" 5\32556\"\204Y5-B6B6)+7\236\203o\345+7\236A\347\n!\"+/\203\205\325\f8\"\204\205\f/B8B8\n\342\230\204\254\n\306\230\204\254\325\n9\"\204\254\n\f+.012\2579B9,@\350=\203\274,A,\202\303\351\347,\",,\211A,@\211:;\203\346\325:;\"\204\303:\fB;B;\202\303\n\306\230\204\325\f<\"\211=\203=\211 >\n>AB\241\210)\202\f\203\f\nD<B<\333\207" [all entry env-or-mac typekeychar typekey prefix #2="" string-to-char ":" char-to-string 2 3 4 5 string-match "@" split-string "@+" "\\label{%s}" add-to-list reftex-typekey-list assoc reftex-prefix-to-typekey-alist reftex-typekey-to-prefix-alist fboundp message "Warning: %s does not seem to be a valid function" nil reftex-special-env-parsers symbol-name "\\`\\\\" reftex-parse-args macros-with-labels reftex-label-mac-list "any" "section" reftex-label-env-list format "begin{%s}" regexp-quote regexp mapcar fmt context wordlist toc-level labelfmt reffmt nargs nlabel opt-args result x string toc-levels reftex-default-context-regexps reftex-typekey-to-format-alist reftex-env-or-mac-alist word reftex-words-to-typekey-alist qh-list cell #1=#:v] 8) sort #[(x1 x2) "@\227 @\227\231\207" [x1 x2] 2] "Label type: [" mapconcat #[(x) "\301\302@\"\207" [x format "%s"] 3] #2# "]" "SELECT A LABEL TYPE:\n--------------------\n" #[(x) "\302\303\304 @\305\306 A\307##\207" [sum x 0 format " [%s] %s" mapconcat #[(env) " G\\\211\302W\203
\207\303\304 P\207" [sum env 60 0 "\n "] 3] " "] 7] "\n" mapcar #[(x) "@A\306\n \"A\307 \310Q\311\211\312W\203:
\fGW\203: \f
H\313\235\204: \314\315\f\311
TO!Q
T\211\202 \316P\nB\207" [x word typekey reftex-typekey-to-format-alist fmt i assoc "\\W\\(" "[ \n
]*\\)\\(" 0 10 (37) "\\|" regexp-quote "\\)\\="] 7] 2 3 4 5 t reftex-parse-args assoc #[(a b) "@\227 @\227W\207" [a b] 2] "Index macro: [" #[(x) "\301@!\207" [x char-to-string] 2] 0 "SELECT A MACRO:\n---------------\n" #[(x) "\302\303@A@\304 T\211\305\"\306U\203 \307\202 \310$\207" [x i format "[%c] %-20.20s%s" mod 3 0 "\n" #2#] 7] "\\(^\\)[ ]*" "\\(?:\\\\label{\\([^}]*\\)}\\|\\[[^]]*label[[:space:]]*=[[:space:]]*{?\\(?1:[^],}]+\\)}?\\)" "\\\\\\(" identity "\\|" "\\)[{ ]+\\([^} \n
]+\\)" #[(x) "\301@!\207" [x regexp-quote] 2] "\\)\\*?\\(\\[[^]]*\\]\\)?[[{
\n\\]" "\\(\\\\appendix\\)" "\\(" regexp-quote "\\)[[{]" "\\)\\([[{][^]}]*[]}]\\)*[[{]\\(%s\\)[]}]" reftex-label-alist-builtin reftex-index-macros-builtin toc-levels toc-level key tag nindex repeat verify macro i sum cell opt-args nlabel nargs macros-with-labels qh-list wordlist labelfmt reffmt fmt word context prefix typekey typekeychar env-or-mac entry all-index all reftex-words-to-typekey-alist reftex-prefix-to-typekey-alist reftex-typekey-list reftex-typekey-to-format-alist reftex-typekey-to-prefix-alist reftex-env-or-mac-alist reftex-label-env-list reftex-label-mac-list reftex-type-query-prompt reftex-type-query-help reftex-index-macro-alist reftex-key-to-index-macro-alist reftex-macros-with-index reftex-index-default-macro result x reftex-query-index-macro-prompt reftex-query-index-macro-help reftex-section-levels-all wbol label-re reftex-include-file-commands include-re section-re appendix-re macro-re index-re find-index-re-format find-label-re-format reftex-index-special-chars index-level-re index-key-end-re reftex-section-regexp reftex-section-or-include-regexp reftex-everything-regexp reftex-everything-regexp-no-index reftex-index-re reftex-index-level-re reftex-index-key-end-re reftex-macros-with-labels reftex-find-index-entry-regexp-format reftex-find-label-regexp-format reftex-find-label-regexp-format2 reftex-cache-variables "label[[:space:]]*=[[:space:]]*" ("\\label") "[^" "[" "\\(\\\\6\\\\3\\\\1\\)" "\\([]} \n
]\\)\\([[{]\\)\\(%s\\)[]}]" "Compiling label environment definitions...done" put reftex-cache symbol-value] 30])
(defalias 'reftex-parse-args #[(macro) "\306\307\"\205I \310\211\224O\310\224\311O\311\211\310 \306\312\f\"\203C T\313\f!\314=\203/ B\315\225\203: \n\204: \f\310\225\311O\202
\n F-\207" [macro cnt nlabel opt-list args must-match string-match "[[{]\\*?[]}]" 0 nil "\\`[[{]\\(\\*\\)?[]}]" string-to-char 91 1] 5])
#@58 Ensure access to the scanning info for the current file.
(defalias 'reftex-access-scan-info #[(&optional rescan file) "\203
\305 \204
\306\307!\210 \310=\203 \311 \210\312 \210 J\203$ \n\313\235\203- \212\314\315!\210\316 \210) J\204@ \n\317\235\204@ \203@ \320\321!\210\n\322\232\206Z J\204P \323\324\f\"\207\n\325\235\205Z \323\n\f\"\207" [reftex-mode reftex-docstruct-symbol rescan reftex-save-parse-info file buffer-file-name error "RefTeX works only in buffers visiting a file" nil reftex-tie-multifile-symbols reftex-ensure-compiled-variables (t 1 (4) (16)) reftex-erase-buffer "*toc*" reftex-erase-all-selection-and-index-buffers (t 1 (4) (16)) reftex-access-parse-file read -1 reftex-do-parse 1 (t 1 (4) (16))] 3 (#$ . 28701)])
#@60 Is the scanning info about the current document available?
(defalias 'reftex-scanning-info-available-p #[nil "\204 \301 \2109\205 J\205 \302\207" [reftex-docstruct-symbol reftex-tie-multifile-symbols t] 1 (#$ . 29449)])
(defalias 'reftex-silence-toc-markers #[(list n) "\205/ S\211\302V\205/ @@\303=\203& \304\305@8!\203& \305@8\306\211\223\210\211A@\210\202 \207" [list n -1 toc markerp 4 nil] 3])
#@108 Perform ACTION on the parse file (the .rel file).
Valid actions are: readable, restore, read, kill, write.
(defalias 'reftex-access-parse-file #[(action) "J\306 \307 \310\311 \"\203 \312\211\224O
P\202
P 12\313=\203. \3141!\202\375 2\315=\203Z \316\317\307#\210\307=\203D \320 \210\3211!\203R \307\322\323\217\202\375 \324\3251\"\202\375 2\326=\203u \316\317\307#\210\3211!\205\375 \307\327\330\217\202\375 2\331=\203\227 \3211!\205\375 \3321!\205\375 \333\3341\"\210\3351!\202\375 \316\n\317\307#\210\212\3321!\203\365 1\336\337\340!! 3 4\341\216r3q\210\333\342\3431!\"\210\344\345!c\210\344\346 \"c\210\344\347\350 \351 #c\210\352c\210p 5\353\354 \"\210)\355c\210)r3q\210\356\307\2114\307\312%\210,\202\373 \324\3571\"\210)\360-\207" [reftex-docstruct-symbol list docstruct-symbol master enable-local-variables reftex-parse-file-extension reftex-TeX-master-file nil string-match "\\.[a-zA-Z]+\\'" 0 readable file-readable-p restore put modified reftex-tie-multifile-symbols file-exists-p (byte-code "\301!\210\302\207" [file load-file t] 2) ((error (byte-code "\302L\210\303\304 \"\207" [reftex-docstruct-symbol file nil error "Error while loading file %s"] 3))) error "No restore file %s" read (byte-code "\301!\210\302 \210\303\207" [file load-file reftex-check-parse-consistency t] 2) ((error (byte-code "\302\303\"\210 \304L\210\304\207" [file reftex-docstruct-symbol message "Error while restoring file %s" nil] 3))) kill file-writable-p message "Unlinking file %s" delete-file get-buffer-create generate-new-buffer-name " *temp file*" ((byte-code "\301!\203\n \302!\210\301\207" [#1=#:temp-buffer buffer-name kill-buffer] 2)) "Writing parse file %s" abbreviate-file-name format ";; RefTeX parse info file\n" ";; File: %s\n" ";; User: %s (%s)\n\n" user-login-name user-full-name "(set reftex-docstruct-symbol '(\n\n" mapc #[(x) "@\302=\2031 \303\302\304\3058\3068\307\3108\3118\3128\313\3148!\203* \315\3148!\206- \3168\257 !\207 \317=\204> @\320=\206A \303!\207" [x reftex-support-index toc print "toc" 2 3 nil 5 6 7 markerp 4 marker-position 8 t index] 12] "))\n\n" write-region "Cannot write to file %s" t file action #1# #2=#:temp-file standard-output] 6 (#$ . 29870)])
(defalias 'reftex-check-parse-consistency #[nil "\303 \304 J\236A@\305!\305\n!\230?\205 \306\307\n#\210\310\311!*\207" [real-master reftex-docstruct-symbol parsed-master reftex-TeX-master-file bof file-truename message "Master file name in load file is different: %s versus %s" error "Master file name error"] 4])
(defalias 'reftex-select-external-document #[(xr-alist xr-index) "G\306 \\S\307\310\306\n#\311\211 \312U\203' \313\314!\210\315 \210\316\312!\210\317\202\205 \320U\2034 \312#Z\202\205 \212\321\322\323\324\"\" $\307\325$\" %\326 &\327 \330\331\332\333#P\311\334$\211\306Y\203g \f\nX\203g \f\306Z\202\204 \f\335U\203\200 \336\337\311\334$ \340
\">GZ\202\204 \341\342\f\",-\207" [xr-alist len highest prompt key prefix 48 format "[%c-%c] Select TAB: Read prefix with completion" nil 1 message "No external documents available" ding sit-for 0 2 apply max mapcar #[(x) "@G\207" [x] 1] " [%%c] %%-%ds %%s\n" 47 reftex-select-with-char "SELECT EXTERNAL DOCUMENT\n------------------------\n" mapconcat #[(x) "\303 T\211\n@\206\f \304\305\nA!$\207" [fmt n x format #1="" abbreviate-file-name] 6] #1# t 9 completing-read "Prefix: " assoc error "Invalid document selection [%c]" xr-index length fmt n] 8])
#@261 Find FILE of type TYPE in MASTER-DIR or on the path associated with TYPE.
If the file does not have any of the valid extensions for TYPE,
try first the default extension and only then the naked file name.
When DIE is non-nil, throw an error if file not found.
(defalias 'reftex-locate-file #[(file type master-dir &optional die) "\203 \306\202 \307\310\n \"A\211 @ \311\312\313\f\314#\315Q \316 \"\203- \317B\202E \203> \320\321\322\f\" C\"\202E
P D \317\211 !\317\211 \" #\317 $\323 !\203| \211A @\211#\203\350 \324#!\203] #\"\317\211 \202_ %\203\225 \310\n&\"\203\225 \325 \n'#\"\202\350 \"\204\350 \203\350 \326\n \211A@' $ $\"\204\225 $\211A$@\211#\203\225 !\203\317 ! =\204\260 !' B \327# '#\211\"\202\262 \"\203\362 \"\202(\203\330\331 \"\210\317\202\332\333 \"\210\317.\n\207" [reftex-search-unrecursed-path-first rec-values type reftex-file-extensions extensions def-ext (nil t) (t) assoc "\\(" mapconcat regexp-quote "\\|" "\\)\\'" string-match nil append mapcar #[(x) " P\207" [file x] 2] file-name-absolute-p file-regular-p reftex-find-file-externally reftex-access-search-path reftex-find-file-on-path error "No such file: %s" message "No such file: %s (ignored)" ext-re file reftex-try-all-extensions files path old-path file1 f fs reftex-use-external-file-finders reftex-external-file-finders master-dir die] 6 (#$ . 33345)])
(defalias 'reftex-find-file-externally #[(file type &optional master-dir) "\206 \306\n \"A\307 \310\311
\"\203 \312\313\211
$\314\315\316
!\"\310\317\f\"\2032 \312\320\307\211\f$\f\320\232\203< \307\202J \321\f!\203I \322\f\"\202J \307+\207" [master-dir default-directory type reftex-external-file-finders out prg assoc nil string-match "%f" replace-match t apply reftex-process-string split-string "[ \n]+\\'" "" file-regular-p expand-file-name file] 5])
#@72 Execute PROGRAM with arguments ARGS and return its STDOUT as a string.
(defalias 'reftex-process-string #[(program &rest args) "\305\306\307!!\310\216\nr\nq\210 \311\312 \313\314\313\f&\210+r\nq\210\315 ,\207" [default-directory calling-dir standard-output program args get-buffer-create generate-new-buffer-name " *string-output*" ((kill-buffer standard-output)) apply call-process nil (t nil) buffer-string] 7 (#$ . 35232)])
(defalias 'reftex-access-search-path #[(type &optional recurse master-dir file) "\306\307\310Q!\211\311N\204Z \312\313\314\315\306\307\316Q!J\n#!!L\210\317 \311\320#\210 J\321\211
\211A@\211\203S \f\322\321O\323\230\203, \324\f!\203N \206J \325\202, \326\202, \317 \327 #\210+ \203\246 \327N\204j J\202\250 \330N\203\201 \327N\326=\203\240 \331N\232\204\240 \332\333 #\210\317 \330\334 J\"#\210\317 \331#\210 \330N\202\250 \330N\202\250 J)\207" [type pathvar path-separator rec dir path intern "reftex-" "-path" status reftex-uniquify reftex-parse-colon-path mapconcat #[(x) "\301\302\"\203 \303\304\305\306\307O!\"\207\310!\206 \207" [x string-match "^!" apply reftex-process-string split-string 1 nil getenv] 6] "path-environment-variables" put split nil -2 "//" file-name-absolute-p absolute relative rec-type recursive-path master-dir message "Expanding search path to find %s file: %s ..." reftex-expand-path recurse file] 10])
(defalias 'reftex-find-file-on-path #[(file path &optional def-dir) "\300\301\215\207" [exit (byte-code "\306!\203 \307!\203 \310\311\"\210\202 \310\311\312\"\210 \312\211 \n\211A@\211\203M \f\313\312O\314\230\2037 \f\315\316O\317\317\f
\"\"\307 !\203 \310\311 \"\210\202 +\312\207" [file path thepath file1 dir def-dir file-name-absolute-p file-regular-p throw exit nil -2 "//" 0 -1 expand-file-name] 6)] 2])
(defalias 'reftex-parse-colon-path #[(path) "\302\303\304\305\306 \307P\"\"\"\207" [path path-separator mapcar #[(dir) "\301\302\"\203 \303\304\305\211$\306!\207" [dir string-match "\\(//+\\|/*!+\\)\\'" replace-match "//" t file-name-as-directory] 5] delete "" split-string "+"] 8])
(defalias 'reftex-expand-path #[(path &optional default-dir) "\305\211\211 \211A@\211\203D \306\305O\307\230\211\203 \310\311O\203/ \312 !\204/ \313 \f\"\203= \314\315 !\n\"\202 \nB\202 \n\237+\207" [recursive dir path1 path default-dir nil -2 "//" 0 -1 file-name-absolute-p expand-file-name append reftex-recursive-directory-list] 3])
(defalias 'reftex-recursive-directory-list #[(dir) "C\305\211\211 \f\211A@\211\203@ \306!\203 \307\310\311#\237 \211A@\211\2039 \306\n!\203 \312\n!\fB\202 B\202 ,\207" [dir files file path1 path nil file-directory-p directory-files t "[^.]" file-name-as-directory] 4])
(defalias 'reftex-typekey-check #[(typekey conf-variable &optional n) "\203 8 \303=\206 ;\205 \304\305 \306Q\n\"\207" [n conf-variable typekey t string-match "[" "]"] 4])
(defalias 'reftex-check-recursive-edit #[nil "\301!\205 \302\303\304!!\207" [reftex-recursive-edit-marker marker-position error substitute-command-keys "In unfinished selection process. Finish, or abort with \\[abort-recursive-edit]"] 3])
#@42 Return non-nil if point is in a comment.
(defalias 'reftex-in-comment #[nil "\212\303 \304\216`\305 \210\306\n\206 \307 \310#,\207" [save-match-data-internal pos comment-start-skip match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) beginning-of-line re-search-forward "\\(\\(^\\|[^\\\n]\\)\\(\\\\\\\\\\)*\\)\\(%+[ ]*\\)" t] 4 (#$ . 38415)])
(defalias 'reftex-no-props #[(string) ";\203
\301\302G\303$\210\207" [string set-text-properties 0 nil] 5])
(defalias 'reftex-match-string #[(n) "\224\205 \301\224\225\"\207" [n buffer-substring-no-properties] 3])
#@40 Should we operate on an active region?
(defalias 'reftex-region-active-p #[nil "\300\301!\203 \301 \207\302 \207" [fboundp use-region-p region-active-p] 2 (#$ . 39035)])
(defalias 'reftex-kill-buffer #[(buffer) "\301!\211\205 \302!\207" [buffer get-buffer kill-buffer] 2])
(defalias 'reftex-erase-buffer #[(&optional buffer) "\204\n \303\304 )\207\305!\211\205 rq\210\306\304 *\207" [buffer buffer-read-only inhibit-read-only nil erase-buffer get-buffer t] 2])
(defalias 'reftex-this-word #[(&optional class) "\206 \301\212\302\303x\210`\303w\210`\")\207" [class "-a-zA-Z0-9:_/.*;|" buffer-substring-no-properties nil] 4])
(defalias 'reftex-number #[(n unit &optional ending) "\250\203 ;\203 \303\304 \305U\203 \306\202 \n\206 \307$\207\306\207" [n unit ending format "%d %s%s" 1 "" "s"] 6])
(defalias 'reftex-all-assq #[(key list) "\303 \n\236\n>\211\203 \n@B\n\211A@\210\202 \237)\207" [rtn key list nil] 2])
(defalias 'reftex-all-assoc-string #[(key list) "\303 \203 @@\n\230\203 @B \211A@\210\202 \237)\207" [rtn list key nil] 2])
(defalias 'reftex-last-assoc-before-elt #[(key elt list &optional exclusive) " \235@\n?\306\211 \307 \"\211\2037 \f >\211\2037 \204) @=\2047 >\2037 \f A\202\f
,\207" [elt list exclusive ex ass last-ass nil assoc key] 4])
(defalias 'reftex-sublist-nth #[(list nth predicate &optional completion) "\305 \203' \n @!\203 \203 \f @8C\202 \f @8B A\211\204 \237)\207" [rtn list predicate completion nth nil] 3])
(defalias 'reftex-make-selection-buffer-name #[(type &optional index) "\303\304 \206 \n\305N\206 \306#\207" [type index reftex-docstruct-symbol format " *RefTeX[%s][%d]*" :master-index 0] 5])
(defalias 'reftex-make-index-buffer-name #[(tag &optional cnt) "\303\304 \206 \n\305N\206 \306#\207" [tag cnt reftex-docstruct-symbol format "*Index[%s][%d]*" :master-index 0] 5])
(defalias 'reftex-truncate #[(string ncols &optional ellipses padding) "G X\203 \202 \n\203 \304 \305ZO\306P\202 \304 O \203+ \307\211\310 \"\"\207\207" [string ncols ellipses padding 0 3 "..." format "%%-%ds"] 4])
(defalias 'reftex-nearest-match #[(regexp &optional max-length) "`\206 G\306\211\211 \211
\\d^b\210\307 \306\310#\203\" \311
Ze]b\210\312 \306\310#\2035 \311
b\210\f\204A \202` \204I \f\202` \313
\f@Z!\313
@Z!W\203_ \f\202` \211\205j \314\n!\210\310-\207" [max-length regexp match match2 match1 dist nil re-search-backward t match-data re-search-forward abs set-match-data pos] 6])
(defalias 'reftex-auto-mode-alist #[nil "\303\n\203 \n@A<\203 \n@ B\n\211A@\210\202 \237*\207" [auto-mode-alist out alist nil] 2])
(defalias 'reftex-window-height #[nil "\300\301!\203 \301 \207\302 \207" [fboundp window-displayed-height window-height] 2])
(defalias 'reftex-enlarge-to-fit #[(buf2 &optional keep-current) "\306 p\307\n!\211\203( \310 !\210\311e!\203 \311d!\204( \312\313ed\"\314 ZT!\210\315!\2034 \310!\202B \f\205B \316 !\210\317\320
Z!+\207" [win1 buf1 buf2 win2 keep-current window-min-height selected-window get-buffer-window select-window pos-visible-in-window-p enlarge-window count-lines reftex-window-height window-live-p switch-to-buffer-other-window shrink-window window-height] 5])
(defalias 'reftex-select-with-char #[(prompt help-string &optional delay-time scroll) "\302\303 \304\216\305\306\215+\207" [char #1=#:wconfig 63 current-window-configuration ((set-window-configuration #1#)) exit (byte-code "\306\307\"\210\310 \206 \311!\204 \312 \211\313U\203? \314\315!\210\316\315!\210 c\210\317b\210\320e!\2032 \320d!\204= \321\322ed\"\323 ZT!\210\324\320e!\203K \320d!\204W
\203T \325\202U \326P\306\327\"\210\n\313\232\203e \312 \n\330\232\203q \331 \210\202\262 \n\313\232\204\262
\203\216 \n\332\232\203\216 \333\334\335\217\210\306\327\"\210\202\262
\203\245 \n\336\232\203\245 \333\337\340\217\210\306\327\"\210\202\262 \306\326!\210\314\315!\210\341\342\n\"\210\312 \211\202f " [prompt delay-time char help-string truncate-lines scroll message "%s (?=Help)" sit-for 0 read-char-exclusive 63 reftex-kill-buffer "*RefTeX Select*" switch-to-buffer-other-window 1 pos-visible-in-window-p enlarge-window count-lines reftex-window-height t " (SPC/DEL=Scroll)" "" "%s" 7 keyboard-quit 32 nil (scroll-up) ((error)) 127 (scroll-down) ((error)) throw exit] 5)] 2])
(defalias 'reftex-make-regexp-allow-for-ctrl-m #[(string) "\302\303 !\304\305 \306\\#\211\203 \307\305\310\311 $\202 )\207" [start string -2 regexp-quote string-match "[\n
]" 3 replace-match nil t] 5])
(defalias 'reftex-get-buffer-visiting #[(file) "\302\300!\203
\303\304 !)\207\305\306!\203 \306 !\207\307\310!\207" [find-file-compare-truenames file boundp t get-file-buffer fboundp find-buffer-visiting error "This should not happen (reftex-get-buffer-visiting)"] 2])
(defalias 'reftex-visited-files #[(list) "\301\302\303\304\"\"\207" [list delq nil mapcar #[(x) "\301!\205 \207" [x reftex-get-buffer-visiting] 2]] 5])
(defalias 'reftex-get-file-buffer-force #[(file &optional mark-to-kill) "\306!\211\203\f \202_ \307!\203^ \n\203 \310=\203# \311!\202Q \312 \313\314! \315\211 \f \315 \316\216\317\314\320\"\210\311!. <\203Q r q\210\321\303!\210)\n\203Z \322\323 \"\210 \202_ \315)\207" [file buf mark-to-kill reftex-initialize-temporary-buffers #1=#:vnew #2=#:old reftex-get-buffer-visiting file-readable-p t find-file-noselect reftex-auto-mode-alist default-value major-mode nil ((byte-code "\301\302\"\207" [#2# set-default major-mode] 3)) set-default fundamental-mode run-hooks add-to-list reftex-buffers-to-kill after-insert-file-functions enable-local-variables auto-mode-alist format-alist] 4])
(defalias 'reftex-kill-temporary-buffers #[(&optional buffer) "\203 \235\205K \302!\210\303 \"\211\207 \211A@\211\205K \304!\203B \305!\203> \306\307\310\311!\"!\203> rq\210\312 \210)\302!\210 \211A@\210\202 \207" [buffer reftex-buffers-to-kill kill-buffer delete bufferp buffer-modified-p y-or-n-p format "Save file %s? " buffer-file-name save-buffer] 5])
(defalias 'reftex-splice-symbols-into-list #[(list alist) "\304\211\n\203A \n@\2036 \n@9\2036 \n@\305 \"\203, \306\307\305 \"8\nA\"\211\202 \310\311\312!\"\210\202 \n\211A@ B\202 \237*\207" [tmp rtn list alist nil assoc append 2 error "Cannot treat symbol %s in reftex-label-alist" symbol-name] 6])
(defalias 'reftex-remove-symbols-from-list #[(list) "\302 \203 @9\204 @B A\211\204 \237)\207" [rtn list nil] 3])
(defalias 'reftex-uniquify #[(list &optional sort) "\306! \2030 \301\307\"\211\nA\203- \n@\nA@\230\203& \n\211AA\241\210\202 \nA\211\202 )\207\310\211 \211\203E \n\fB\nA\211\204: \301\f\311\"\fA\203\214 \f@@\211\f\211 A@)@\230\203\203 \f\211A@\310\240\210\fA\203\203 \f\211 A@)@\230\203\203 \f\211A@\310\240\210\202g \f\211A@\210\202J +\312\310\"\207" [list sort p elt lst x copy-sequence string< nil #[(x1 x2) "@ @\231\207" [x1 x2] 2] delq] 4])
(defalias 'reftex-uniquify-by-car #[(alist &optional keep-list sort) "\302\306!\307\"\306 !\n\203\231 \310\211 \302 \311\"\211\fA\203\226 \f@@\211\f\211 A@)@\230\203\215 \203C @ \231\203C \211A@\210\202/ \203m @\230\203m \f\210\fA\fA\203\215 \f\211 A@)@\230\203\215 \f\211A@\210\202S \f\211AA\241\210\fA\203\215 \f\211 A@)@\230\203\215 \f\211AA\241\210\202s \f\211A@\210\202 *\207 \310\211 \211 \f\203\262 \f\fB\fA\211\f\204\244 \302\f\312\"\fA\203;\f@@@\211\f\211 A@)@@\230\2032\203\342 @ \231\203\342 \211A@\210\202\316 \203
@\230\203
\f\210\fA\fA\2032 \f\211 A@)@@\230\2032\f\211A@\210\202\362 \f\211A@\310\240\210\fA\2032 \f\211 A@)@@\230\2032\f\211A@\310\240\210\202\f\211A@\210\202\267 +\313\310 \"\207" [keep-list alist sort elt lst x copy-sequence string< nil #[(a b) "@ @\231\207" [a b] 2] #[(a b) "@@ @@\231\207" [a b] 2] delq p] 4])
#@70 Nondestructively remove all items from LIST which satisfy PREDICATE.
(defalias 'reftex-remove-if #[(predicate list) "\305 \305\211\203 @\f\n!\204 \nB A\211\204\n \305\237+\207" [result list elt --dolist-tail-- predicate nil] 3 (#$ . 46900)])
(defalias 'reftex-abbreviate-title #[(string) "\302\303\304\305\211\306\307\304\310\311\306 8& \207" [string reftex-derive-label-parameters reftex-convert-string "[-~ \n
,;]" nil t 5 40 1 " "] 13])
#@953 Convert a string (a sentence) to something shorter.
SPLIT-RE is the regular expression used to split the string into words.
INVALID-RE matches characters which are invalid in the final string.
DOT t means add dots to abbreviated words.
KEEP-FP t means to keep a final punctuation when applicable.
NWORDS Number of words to use.
MAXCHAR Maximum number of characters in the final string.
INVALID nil: Throw away any words containing stuff matched with INVALID-RE.
t: Throw away only the matched part, not the whole word.
ABBREV nil: Never abbreviate words.
t: Always abbreviate words (see `reftex-abbrev-parameters').
not t and not nil: Abbreviate words if necessary to shorten
string below MAXCHAR.
SEP String separating different words in the output string.
IGNORE-WORDS List of words which should be removed from the string.
(defalias 'reftex-convert-string #[(string split-re invalid-re dot keep-fp nwords maxchar invalid abbrev sep ignore-words &optional downcase) "\306 \206 \307\" \206 \310 \311\312
@\313\"\314\315
8\316\317\314\320
8\321\312
A@S\313\"\260\n \322\211 \n\211A@\211 \203\204 \203F \227 \227!\235\2041 \323\f \"\203z \"\2031 \323\f \"\203p \324\325\322\211 $ \202\\ B \2021 B \2021 \237\211 G#V\203\232 #S \233\322\241\210\326\327 $#%\330=\204\266 %\203\305 G&V\203\305 \331\332 \" \326\327 $#G&V\203\325 \333&O\202\326 '\204\352 \323\334\"\203\352 \324\325\322\211$-\207" [string split-re words0 invalid-re reftex-label-illegal-re reftex-abbrev-parameters split-string "[ \n
]" " " "\\`\\(" make-string 46 "[" 2 "]*" "\\)" 3 "]" nil string-match replace-match "" mapconcat identity t mapcar #[(w) "\303 \"\203 \n\203 \304\305 \"\306P\207\304\305 \"\207 \207" [abbrev-re w dot string-match match-string 1 "."] 3] 0 "\\s.+\\'" abbrev-re words word downcase ignore-words invalid nwords sep abbrev maxchar keep-fp] 13 (#$ . 47361)])
(defalias 'reftex-nicify-text #[(text) "\301\302\"\203 \303\304\305\306$\202 \301\307\"\203 \303\310\305\306$\301\311\"\203- \303\310\305\306$\301\312\"\203; \303\310\305\306$G\313V\203G \314\313O\207G\314U\203S \315\316\317\"\207\207" [text string-match "[\n
]\\|[ ][ ]+" replace-match " " nil t "\\(\\\\end{\\|\\\\item\\|\\\\\\\\\\).*" "" "\\\\label{[^}]*}" "\\`[ }]+" 100 0 make-string 1 32] 5])
(defalias 'reftex-use-fonts #[nil "\205 \301\302!\207" [reftex-use-fonts featurep font-lock] 2])
(defalias 'reftex-refontify #[nil "\301 \205 \302=\206 \303=\205 \304\305!\205 \306\307!?\207" [reftex-refontify-context reftex-use-fonts t 1 featurep x-symbol-tex boundp x-symbol-mode] 2])
(defalias 'reftex-fontify-select-label-buffer #[(parent-buffer) "\306\307\310#\210\311 \312 P\313\216\314\n\315\"\210\316\317!\203) \320\303!\210\321\322 \323\324!)\202H \316\325!\203E \320\305!\210\326\322\326 \325 \210\321ed\"*\202H \327\330!+\207" [parent-buffer oldname newname font-lock-fontify-region-function major-mode font-lock-keywords run-hook-with-args reftex-pre-refontification-functions reftex-ref buffer-name "Fontify-me-" ((rename-buffer oldname)) rename-buffer t fboundp font-lock-default-fontify-region make-local-variable reftex-select-font-lock-fontify-region latex-mode font-lock-mode 1 font-lock-set-defaults-1 nil message "Sorry: cannot refontify RefTeX Select buffer." font-lock-defaults-computed] 4])
(defalias 'reftex-select-font-lock-fontify-region #[(beg end &optional loudly) "\305\306!\203\n \306\202 \307\310\211 b\210\311\312\f\313#\205/ `\314\310w\210`\n \310#\210b\210\202 +\207" [end1 beg1 func beg end fboundp font-lock-default-fontify-region font-lock-fontify-region nil re-search-forward "^\\." t "^\n"] 4])
(defalias 'reftex-select-font-lock-unfontify #[(&rest ignore) "\300\207" [t] 1])
(defalias 'reftex-verified-face #[(&rest faces) "\301\302\303\215)\207" [face nil exit (byte-code "\211A@\211\205 \302 !\203 \303\304 \"\210\202 \207" [faces face facep throw exit] 3)] 2])
(byte-code "\300\301\302\"\210\300\303\304\"\210\300\305\306\"\210\300\307\310\"\207" [defalias reftex-make-overlay make-overlay reftex-overlay-put overlay-put reftex-move-overlay move-overlay reftex-delete-overlay delete-overlay] 3)
(defvar reftex-highlight-overlays [nil nil nil])
(byte-code "\302\303\304\211\"I\210\305\302H\306\307#\210\304\303\304\211\"I\210\305\304H\306 #\210\310\303\304\211\"I\210\305\310H\306 #\207" [reftex-highlight-overlays reftex-cursor-selected-face 0 reftex-make-overlay 1 reftex-overlay-put face highlight 2] 5)
#@40 Highlight a region with overlay INDEX.
(defalias 'reftex-highlight #[(index begin end &optional buffer) "\305 H\n \f\206 p$\207" [reftex-highlight-overlays index begin end buffer reftex-move-overlay] 5 (#$ . 52016)])
#@23 Detach overlay INDEX.
(defalias 'reftex-unhighlight #[(index) "\302 H!\207" [reftex-highlight-overlays index reftex-delete-overlay] 3 (#$ . 52241)])
(defalias 'reftex-highlight-shall-die #[nil "\300\301\302\"\210\303\304!\207" [remove-hook pre-command-hook reftex-highlight-shall-die reftex-unhighlight 0] 3])
(byte-code "\305\306:\203 @\307\n @ A#\210A\211\202 *\310\311!\204( \307\n\312\313#\210\314\315\316\"\210 \203M \317 \306\f:\203L \f@\307\n @ A#\210\fA\211\2026 *\306\207" [#:--cl-var-- x reftex-mode-map reftex-extra-bindings #:--cl-var-- (("=" . reftex-toc) ("-" . reftex-toc-recenter) ("(" . reftex-label) (")" . reftex-reference) ("[" . reftex-citation) ("<" . reftex-index) (">" . reftex-display-index) ("/" . reftex-index-selection-or-word) ("\\" . reftex-index-phrase-selection-or-word) ("|" . reftex-index-visit-phrases-buffer) ("&" . reftex-view-crossref)) nil define-key key-binding [(shift mouse-2)] [(shift mouse-2)] reftex-mouse-view-crossref eval-after-load "bibtex" (define-key bibtex-mode-map "&" 'reftex-view-crossref-from-bibtex) (("t" . reftex-toc) ("l" . reftex-label) ("r" . reftex-reference) ("c" . reftex-citation) ("v" . reftex-view-crossref) ("g" . reftex-grep-document) ("s" . reftex-search-document))] 5)
(defvar reftex-isearch-minor-mode nil)
(make-variable-buffer-local 'reftex-isearch-minor-mode)
#@26 Menu used in RefTeX mode
(defvar reftex-mode-menu nil (#$ . 53615))
(byte-code "\306\307\310\311\312\313\314\315\316\317\320\314\321\314\322\323\314\324\325\326\211 \326 \211 \203I
@\211@\327\f\330\fD\331\332\333\334\f\335BB&\211\n\235\204B \336\302 \337#\210
A\211\204 *\n*B\340\341\342\343(\"\344\"B\345\342\346)\"B\347BBBBBBBBBBBBBBBBBB$\207" [reftex-mode-map item list reftex-ref-style-alist elt --dolist-tail-- easy-menu-do-define reftex-mode-menu "Menu used in RefTeX mode" "Ref" ["Table of Contents" reftex-toc t] ["Recenter TOC" reftex-toc-recenter t] "--" ["\\label" reftex-label t] ["\\ref" reftex-reference t] ["\\cite" reftex-citation t] ("\\index" ["\\index" reftex-index t] ["\\index{THIS}" reftex-index-selection-or-word t] "--" ["Add THIS to Index Phrases" reftex-index-phrase-selection-or-word t] ["Visit Phrase Buffer" reftex-index-visit-phrases-buffer t] ["Apply Phrases to Region" reftex-index-phrases-apply-to-region t] "--" ["Display the Index" reftex-display-index t]) ["View Crossref" reftex-view-crossref t] ("Parse Document" ["One File" reftex-parse-one reftex-enable-partial-scans] ["Entire Document" reftex-parse-all t] ["Save to File" (reftex-access-parse-file 'write) (> (length (symbol-value reftex-docstruct-symbol)) 0)] ["Restore from File" (reftex-access-parse-file 'restore) t]) ("Global Actions" ["Search Whole Document" reftex-search-document t] ["Search Again" tags-loop-continue t] ["Replace in Document" reftex-query-replace-document t] ["Grep on Document" reftex-grep-document t] "--" ["Goto Label" reftex-goto-label t] ["Find Duplicate Labels" reftex-find-duplicate-labels t] ["Change Label and Refs" reftex-change-label t] ["Renumber Simple Labels" reftex-renumber-simple-labels t] "--" ["Create BibTeX File" reftex-create-bibtex-file t] "--" ["Create TAGS File" reftex-create-tags-file t] "--" ["Save Document" reftex-save-all-document-buffers t]) ("Options" "PARSER" ["Partial Scans" (setq reftex-enable-partial-scans (not reftex-enable-partial-scans)) :style toggle :selected reftex-enable-partial-scans] ["Auto-Save Parse Info" (setq reftex-save-parse-info (not reftex-save-parse-info)) :style toggle :selected reftex-save-parse-info] "--" "TOC RECENTER" ["Automatic Recenter" reftex-toggle-auto-toc-recenter :style toggle :selected reftex-toc-auto-recenter-timer] "--" "CROSSREF INFO" ["Automatic Info" reftex-toggle-auto-view-crossref :style toggle :selected reftex-auto-view-crossref-timer] ["...in Echo Area" (setq reftex-auto-view-crossref t) :style radio :selected (eq reftex-auto-view-crossref t)] ["...in Other Window" (setq reftex-auto-view-crossref 'window) :style radio :selected (eq reftex-auto-view-crossref 'window)] "--" "MISC" ["AUCTeX Interface" reftex-toggle-plug-into-AUCTeX :style toggle :selected reftex-plug-into-AUCTeX] ["isearch whole document" reftex-isearch-minor-mode :style toggle :selected reftex-isearch-minor-mode]) "Reference Style" nil vector reftex-ref-style-toggle :style toggle :selected member ((reftex-ref-style-list)) add-to-list t "Citation Style" append mapcar #[(x) "\301\302\303@!!\304\305@DD\306\307\310\311\312C\305@DE&\207" [x vector capitalize symbol-name reftex-set-cite-format quote :style radio :selected eq reftex-get-cite-format] 10] ("--" "Sort Database Matches" ["Not" (setq reftex-sort-bibtex-matches nil) :style radio :selected (eq reftex-sort-bibtex-matches nil)] ["by Author" (setq reftex-sort-bibtex-matches 'author) :style radio :selected (eq reftex-sort-bibtex-matches 'author)] ["by Year" (setq reftex-sort-bibtex-matches 'year) :style radio :selected (eq reftex-sort-bibtex-matches 'year)] ["by Year, reversed" (setq reftex-sort-bibtex-matches 'reverse-year) :style radio :selected (eq reftex-sort-bibtex-matches 'reverse-year)]) "Index Style" #[(x) "\301\302\303@!!\304\305\306@DDD\307\310\311\312\306@D\313\314\306\315DEE&\207" [x vector capitalize symbol-name reftex-add-index-macros list quote :style radio :selected memq get reftex-docstruct-symbol reftex-index-macros-style] 12] ("--" ["Reset RefTeX Mode" reftex-reset-mode t] "--" ("Customize" ["Browse RefTeX Group" reftex-customize t] "--" ["Build Full Customize Menu" reftex-create-customize-menu (fboundp 'customize-menu-create)]) ("Documentation" ["Info" reftex-info t] ["Commentary" reftex-show-commentary t])) reftex-cite-format-builtin reftex-index-macros-builtin] 30)
#@54 Call the customize function with reftex as argument.
(defalias 'reftex-customize #[nil "\300\301!\207" [customize-browse reftex] 2 (#$ . 57985) nil])
#@71 Create a full customization menu for RefTeX, insert it into the menu.
(defalias 'reftex-create-customize-menu #[nil "\300\301!\203 \302\303\304\305\306\301\307!\310BBB#\210\311\312!\207\313\314!\207" [fboundp customize-menu-create easy-menu-change ("Ref") "Customize" ["Browse RefTeX group" reftex-customize t] "--" reftex (["Set" Custom-set t] ["Save" Custom-save t] ["Reset to Current" Custom-reset-current t] ["Reset to Saved" Custom-reset-saved t] ["Reset to Standard Settings" Custom-reset-standard t]) message "\"Ref\"-menu now contains full customization menu" error "Cannot expand menu (outdated version of cus-edit.el)"] 7 (#$ . 58141) nil])
#@65 Use the finder to view the file documentation from `reftex.el'.
(defalias 'reftex-show-commentary #[nil "\300\301!\207" [finder-commentary "reftex.el"] 2 (#$ . 58799) nil])
#@97 Read documentation for RefTeX in the info system.
With optional NODE, go directly to that node.
(defalias 'reftex-info #[(&optional node) "\301\302\303\206 \304\"!\207" [node info format "(reftex)%s" ""] 4 (#$ . 58978) nil])
#@282 Report a bug in RefTeX.
Don't hesitate to report any problems or inaccurate documentation.
If you don't have setup sending mail from (X)Emacs, please copy the
output buffer into your mail program, as it gives us important
information about your RefTeX version and configuration.
(defalias 'reftex-report-bug #[nil "\302\303!\210\304\305\306 \307\310D\311\211\312&)\207" [reporter-prompt-for-summary-p reftex-version require reporter "Bug report subject: " reporter-submit-bug-report "bug-auctex@gnu.org" window-system reftex-plug-into-AUCTeX nil "Remember to cover the basics, that is, what you expected to happen and\nwhat in fact did happen.\n\nCheck if the bug is reproducible with an up-to-date version of\nRefTeX available from http://www.gnu.org/software/auctex/.\n\nIf the bug is triggered by a specific (La)TeX file, you should try\nto produce a minimal sample file showing the problem and include it\nin your report.\n\nYour bug report will be posted to the AUCTeX bug reporting list.\n------------------------------------------------------------------------"] 7 (#$ . 59212) nil])
(byte-code "\302\303\304\"\210\204 \302\305\306\"\210\307\310!\210\311\312\313!\207" [noninteractive reftex-tables-dirty add-hook kill-buffer-hook reftex-kill-buffer-hook kill-emacs-hook reftex-kill-emacs-hook run-hooks reftex-load-hook t provide reftex] 3)