WWWWWW

Current Directory: /usr/share/emacs/24.3/lisp/textmodes
Viewing File: /usr/share/emacs/24.3/lisp/textmodes/reftex-ref.elc
;ELC
;;; Compiled by mockbuild@buildfarm01-new.corp.cloudlinux.com on Tue Nov 11 12:58:50 2025
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/textmodes/reftex-ref.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 reftex reftex-parse] 2)
#@147 Return the environment or macro which determines the label type at point.
If optional BOUND is an integer, limit backward searches to that point.
(defalias 'reftex-label-location #[(&optional bound) "\306	\"\307	\"\310\311	\"\nA\206\312\fA\206\312
A\206%\312]]\211U\203M\n@G\\\n@\206\230\313\202\230U\203h\314\315\f@G#\f@\206\230\313\202\230U\203\227
@\211\204\313\202\230
9\203\212\316
!\202\230
;\203\223
\202\230\313\202\230\313.\207" [reftex-label-mac-list bound loc1 reftex-label-env-list loc2 loc3 reftex-what-macro reftex-what-environment reftex-what-special-env 1 0 "section" + 8 symbol-name p1 p2 p3 pmax reftex-location-start reftex-default-context-position] 5 (#$ . 637)])
(defalias 'reftex-label-info-update #[(cell) "@A@\3068\3078\3108\311\312=?\"\211\204,	\n\313\f\314\257\202irq\210\214~\210\315b\210\316\317\320	!\"\321\312#\204S\316\317\320	!\"\321\312#\203a\322u\210\323\324	\"
C\"\202h	\n\313\314\257*.\207" [cell label typekey file comment note 3 4 5 reftex-get-file-buffer-force t "" "LOST LABEL.  RESCAN TO FIX." 1 re-search-forward format regexp-quote nil -1 append reftex-label-info reftex-keep-temporary-buffers buf reftex-find-label-regexp-format reftex-find-label-regexp-format2] 7])
(defalias 'reftex-label-info #[(label &optional file bound derive env-or-mac) "\306\307\"\205\310\311\"\312	\n\"A\f\206\313 
\314 \203]\315=\204O\203];\203>\306\"\202L<\203K\235\202L\316\203]\317\320 !\f\257\202\221\206f\321!\312\"A@\322\312\"8\323$\f\257,-\207" [label prefix reftex-prefix-to-typekey-alist typekey file reftex-trust-label-prefix string-match "^[a-zA-Z0-9]+:" match-string 0 assoc buffer-file-name reftex-in-comment t nil reftex-nicify-text reftex-context-substring reftex-label-location 2 reftex-short-context trust in-comment env-or-mac bound reftex-env-or-mac-alist parse reftex-location-start derive text] 5])
#@474 Insert a unique label.  Return the label.
If ENVIRONMENT is given, don't bother to find out yourself.
If NO-INSERT is non-nil, do not insert label into buffer.
With prefix arg, force to rescan document first.
When you are prompted to enter or confirm a label, and you reply with
just the prefix or an empty string, no label at all will be inserted.
A new label is also recorded into the label list.
This function is controlled by the settings of reftex-insert-label-flags.
(defalias 'reftex-label #[(&optional environment no-insert) "\303!\210	\203\304	\n\"\204\305 	\204\306\307!\210\310\311\215\207" [current-prefix-arg environment reftex-env-or-mac-alist reftex-access-scan-info assoc reftex-label-location error "Can't figure out what kind of label should be inserted" exit (byte-code "\306	\"\211A@\307\n8\310\311!\306
@	\"9\312\211:;\312\211<=\312\211>?\312@\313\n8\204:\31398\203Eh\314>\203E\315;\316\306A\"A\206Q\317P<\320<!<\321B@\"\203\300\322\323\324 @CJ#D\325\326\327\330\312\211\315$8!>\331\332>\"\204\241\331\333>\"\204\241\331\334>\"\204\241\331\335>\"\204\241\331\336>\"\203\253<>\315?\202\330<E>!P>\337>\312\317#>\202\330\321BA@\"\203\321<>\202\330\337<\315\">\321BA@\"\204\347?\203V=\204Z\340;\203\366\341\202\367\342>\":\331\343\344<!\345Q:\"\203\346\347!\210\350\351\312\"\210\202\347\331F:\"\203/\346\352:\"\210\353 \210\354\326!\210\202\347\306:CJ\"\211\203O\353 \210\355\304\356:\"!\203\347\315\211=\202\351\315\211=\202\351>:\212;\204eG\203o
A\250\203o
Ab\210\324 )\211H@IHA\203\202\357\202\203\360J\361 K\312LICJ>MHA\204\235\315@M\203\305:LK\312J\257NM\211ONOAB\241\210*\362C\363\315#\210.G\204\361P\203\332P:\f\"\202\337\304\f:\"c\210Q\203\361\364\365!\203\361\365:!\210R\203\366\367!!\210\366\367\330!!\210@\203S\203\370 \210:.\f\207" [environment reftex-env-or-mac-alist entry typekey format macro-cell assoc 3 reftex-what-macro 1 nil 5 (91 123) t "%s" "-" reftex-replace-prefix-escapes reftex-typekey-check reftex-last-assoc-before-elt toc reftex-where-am-I reftex-no-props 2 reftex-label-info " " string-match "NO MATCH FOR CONTEXT REGEXP" "INVALID VALUE OF PARSE" "SECTION HEADING NOT FOUND" "HOOK ERROR" "^[ 	]*$" reftex-uniquify-label read-string "Naked Label: " "Label: " "\\`\\(" regexp-quote "\\)?[ 	]*\\'" message "No label inserted." throw exit "Label \"%s\" contains invalid characters" ding sit-for y-or-n-p "Label '%s' exists. Use anyway? " "" "POSITION UNCERTAIN.  RESCAN TO FIX." buffer-file-name put modified fboundp LaTeX-add-labels reftex-erase-buffer reftex-make-selection-buffer-name reftex-parse-one entry1 label naked prefix valid default force-prompt rescan-is-useful reftex-typekey-to-prefix-alist reftex-insert-label-flags reftex-docstruct-symbol reftex-active-toc reftex-string-to-label-function reftex-label-illegal-re no-insert here-I-am-info here-I-am note file text tail #1=#:v #2=#:v reftex-format-label-function reftex-plug-into-AUCTeX reftex-auto-update-selection-buffers reftex-allow-automatic-rescan] 8)] 3 (#$ . 2662) nil])
#@181 Convert a string (a sentence) to a label.
Uses `reftex-derive-label-parameters' and `reftex-label-illegal-re'.  It
also applies `reftex-translate-to-ascii-function' to the string.
(defalias 'reftex-string-to-label #[(string) "\203\304!\203	!\305\306	\307\n\310\211&\207" [reftex-translate-to-ascii-function string reftex-label-illegal-re reftex-derive-label-parameters fboundp apply reftex-convert-string "[-~ 	\n
,;]+" nil] 8 (#$ . 5817)])
(defalias 'reftex-latin1-to-ascii #[(string) "\303\304\305\306\n\307#*\207" [emacsp tab string "@@@@@@@@@@@@@@@@@@'@@@@@@@@@@@@@ icLxY|S\"ca<--R-o|23'uq..1o>423?AAAAAAACEEEEIIIIDNOOOOOXOUUUUYP3aaaaaaaceeeeiiiidnooooo:ouuuuypy" t mapconcat #[(c) "\303V\203\304W\203\305	\306ZH!\207\n\203,\307V\203,\310W\203,\305	\311ZH!\207\305!\207" [c tab emacsp 127 256 char-to-string 128 2175 2304 2176] 4] ""] 4])
(defalias 'reftex-replace-prefix-escapes #[(prefix) "\306 \307\216\310\311\310\312\313\f\n#\203\374\314\315\f\"\306 \316\216\317\232\203(\320 \202\351\321\232\203S\322\323 !\324\325 !*\312\326\327*!P
\"\203N
*G\310O\202O
*\202\351\330\232\203`\320\323 !\202\351\331\232\203r\332\322\323 !\311\333O!\202\351\334\232\203\201\335 \206\351\336\202\351\337\232\203\350\310\211+,\310-\212\306 \340\216\341.\310\342#\203\306\343\344!+\345+/\"A\211,9\203\300\346\306 \347\216, *!\202\304\346,!-\345+0\"\206\342\345-0\"\206\342\3420\236\206\342\342\350DA.\202\351\336*\315\224	G\\S\351	\310\211\f$\202\f-\207" [save-match-data-internal replace num letter prefix file match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) nil 0 string-match "\\%\\([a-zA-Z]\\)" match-string 1 ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) "f" file-name-base "F" file-name-directory reftex-TeX-master-file file-name-sans-extension buffer-file-name "\\`" regexp-quote "m" "M" file-name-nondirectory -1 "u" user-login-name "" "S" ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) re-search-backward t reftex-match-string 2 assoc abs ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) "sec:" replace-match masterdir macro level-exp level reftex-section-regexp reftex-section-levels-all reftex-section-prefixes] 6])
(defalias 'reftex-uniquify-label #[(label &optional force separator) "\306 \210\204\307	\nJ\"\204	\207\303\nJ\236\211A\307	\f\"\206(	\310B\fB\241@\211AT\f\2064\311
\307	
\312!Q\nJ\"\203MT\2026
\241\210	
\312!Q-\207" [force label reftex-docstruct-symbol label-numbers label-numbers-alist cell reftex-access-scan-info assoc 0 "" int-to-string num separator sep] 6])
(defconst reftex-select-label-prompt "Select: [n]ext [p]revious [r]escan [ ]context e[x]tern [q]uit RET [?]HELP+more")
(defconst reftex-select-label-help " n / p      Go to next/previous label (Cursor motion works as well)\n C-c C-n/p  Go to next/previous section heading.\n b / l      Jump back to previous selection / Reuse last referenced label.\n z          Jump to a specific section, e.g. '3 z' jumps to section 3.\n g / s      Update menu      / Switch label type.\n r / C-u r  Reparse document / Reparse entire document.\n x          Switch to label menu of external document (with LaTeX package `xr').\n F t c      Toggle:  [F]ile borders, [t]able of contents,  [c]ontext\n # %        Toggle:  [#] label counters,   [%] labels in comments\n SPC / f    Show full context in other window / Toggle follow mode.\n .          Show insertion point in other window.\n v   / V    Toggle \\ref <-> \\vref / Rotate \\ref <=> \\fref <=> \\Fref\n TAB        Enter a label with completion.\n m , - +    Mark entry. `,-+' also assign a separator.\n a / A      Put all marked entries into one/many \\ref commands.\n q / RET    Quit without referencing / Accept current label (also on mouse-2).")
#@489 Make a LaTeX reference.  Look only for labels of a certain TYPE.
With prefix arg, force to rescan buffer for labels.  This should only be
necessary if you have recently entered labels yourself without using
reftex-label.  Rescanning of the buffer can also be requested from the
label selection menu.
The function returns the selected label or nil.
If NO-INSERT is non-nil, do not insert \ref command, just return label.
When called with 2 C-u prefix args, disable magic word recognition.
(defalias 'reftex-reference #[(&optional type no-insert cut) "\306 \210\307!\210\310\301!\205	\205	\n\311\312\211\211\211\211)*+\211\204\226,\203x-\312.\211/\203V/@\211.@\313 \235\203M\314\315\316.8\"\210/A\211/\2048*\317\320\321\322\323\324#P\"0\3250\"A\211\204t\326\3270\"\210)\202\226\316\325\313 @-\"8\2111@@)\206\225\316-@8\2111@@)2\204\271\203\265\330 \2112\203\2652A32@2\202\271\331 24`\312\223\210\212\3322!))\333 \2104\312\211\223\210)@\334=\203\350\322\335)A\336#)A@ADC))@A@2\32525\"A\206\373++6\203	)@@\202\225)\204\337\340!\210\312\202\225)\203\217)@@*\316)@8\325
7\"A)A)3\203@\3413!\210\3123\342+!\343U\203Vh\344\235\203V+\345\312O+	\346\230\204^\347\f\203e\fc\210\n\203s\n*+	#\202z\350+*\211#c\210\342+!\343U\203+\345\312O+\202\337\320!\210*.\207" [current-prefix-arg reftex-refstyle reftex-format-ref-function style-alist sep1 sep reftex-check-recursive-edit reftex-access-scan-info boundp "\\ref{%s}" nil reftex-ref-style-list mapc #[(x) "\301\302\211A@)@B\303#\207" [x add-to-list style-alist t] 5] 2 reftex-select-with-char #1="" "SELECT A REFERENCE FORMAT\n\n" mapconcat #[(x) "\301\302@@\303V\203\304\202\305A$\207" [x format "[%c] %s  %s" 31 " " #1#] 5] "\n" assoc error "No reference macro associated with key `%c'" reftex-guess-label-type reftex-query-label-type reftex-offer-label-menu reftex-ensure-compiled-variables concat car "," message "Quit" backward-delete-char string-to-char 126 (32 9 10 126) 1 "\\ref" reftex-format-special format labels label form reftex-ref-macro-prompt reftex-ref-style-alist elt --dolist-tail-- key x type cut reftex-select-return-marker reftex-typekey-to-format-alist no-insert reftex-multiref-punctuation] 9 (#$ . 9776) nil])
(defalias 'reftex-guess-label-type #[nil "\306e`\307Z]\310\211\212
\211A@\211\203$\311	@\306#\211\203)\n\2051	A\312\225\313\225ZB-\207" [reftex-words-to-typekey-alist cell matched bound case-fold-search words t 35 nil re-search-backward 0 1] 5])
(defalias 'reftex-offer-label-menu #[(typekey) "p\306	J\236\307\310 B\nA@B\311\312 @\211\313\311#\313\314#\313\315#?\313\316#\313\317#\3208\307 \321\211!\"\321\211#$\321\211%&\321'\322\216\323\324\215\210)\325\326'\".\207" [buf reftex-docstruct-symbol xr-data xr-alist xr-index here-I-am xr #2="" buffer-file-name 0 reftex-where-am-I reftex-typekey-check 7 3 2 4 5 nil ((byte-code "\212\203@@q\210\211A@A\202)\303\304\n\"\210\305 \207" [reftex-buffers-with-changed-invisibility buffer-invisibility-spec selection-buffers mapc #[(buf) "\301!\205	\302!\207" [buf buffer-live-p bury-buffer] 2] reftex-kill-temporary-buffers] 3)) exit (byte-code "\306 \307\216\310 \210	\311 \f\203\312r	q\210\313
!)!\210\202&\312\314!\210\315 \210@\316=\2040\316 \210\317\320p\"\210\321A\322\323\324\325\326B\327\330\331\332\333\257C\334 \335U\203v\336D\337\340!\210\341	E
\336FGHIJ\206kKL\336&K)\202\211J\203\206\342	J
#K\202\211\321K\321DK\206\222\321K\336J\343MNOK\344P&\211Q@RQA@S\345Q8T\321KR\204\304\346\347\336\"\210R\350=\203\321\315 \210\202 R\351=\204\337R\352=\203\365U\203\347\352R\315 \210\353	TR#\210\202 R\354=\203\315 \210G?G\202 R\355=\203VJ\356 \202 R\357=\2038\315 \210U\2030\360U!W\202 E?E\202 R\361=\203J\315 \210F?F\202 R\362=\203\\\315 \210H?H\202 R\363=\203n\315 \210I?I\202 R\364=\203\201XY\346\347\321\"\210\202 R\365=\203\264\366Z[\"[\367[Z8A!\206\236\370\371![Z8@\206\251\372L	q\210\373 \210\202 R;\203\324\374R\\J\"\206\310R
DCCY\346\347\321\"\210\202 R\375>\203]\203\350]\237Y\202\371S\203\366SCCY\202\371\336YY\203R\376\232\203\377YBYYX	q\210\346\347\321\"\210\202 \370\201^!\210*\202" [#1=#:wconfig buf reftex-call-back-to-this-buffer reftex-latex-syntax-table reftex-use-multiple-selection-buffers typekey current-window-configuration ((set-window-configuration #1#)) delete-other-windows syntax-table switch-to-buffer-other-window reftex-make-selection-buffer-name "*RefTeX Select*" reftex-erase-buffer reftex-select-label-mode add-to-list selection-buffers t "----  " mode-line-buffer-identification "  " global-mode-string "   (" ")" "  S<" reftex-refstyle ">" " -%-" buffer-size 0 nil message "Creating Selection Buffer..." reftex-insert-docstruct reftex-get-offset reftex-select-item reftex-show-label-location 2 throw exit 103 114 82 reftex-reparse-document 99 115 reftex-query-label-type 116 prefix-numeric-value 70 35 37 108 120 reftex-select-external-document reftex-get-file-buffer-force error "Cannot switch document" #2# reftex-access-scan-info assoc (97 65 return) 97 concat major-mode truncate-lines mode-name mode-line-format buffer-read-only toc files context counter commented here-I-am offset prefix reftex-select-label-prompt reftex-select-label-help reftex-select-label-map follow rtn key data last-data current-prefix-arg here-I-am1 reftex-toc-max-level reftex-last-used-reference entries xr-alist xr-index reftex-docstruct-symbol reftex-select-marked "This should not happen (reftex-offer-label-menu)"] 13) mapcar #[(x) "<\203	@@P@A@\3028E\207\207" [x prefix 2] 4] here-I-am1 typekey reftex-label-menu-flags toc files context counter follow commented prefix selection-buffers offset rtn key data last-data entries] 5])
(defalias 'reftex-reparse-document #[(&optional buffer data key) "\306 \307\216\212	\203\310	!\204\311\312\313	!\"\210\202	q\210\n\314=\203'\315\202(\316\3178\320
\f\"-\207" [#1=#:wconfig buffer key data file arg current-window-configuration ((set-window-configuration #1#)) bufferp error "No such buffer %s" buffer-name 82 (16) (4) 3 reftex-access-scan-info] 4])
(defalias 'reftex-query-label-type #[nil "\304	\305#\306\n!\235\204\307\310\306\n!\"\210\306\n!)\207" [reftex-type-query-prompt reftex-type-query-help key reftex-typekey-list reftex-select-with-char 3 char-to-string error "No such label type: %s"] 4])
(defalias 'reftex-show-label-location #[(data forward no-revisit &optional stay error) "\306 	\203\301\202\f\307\310\211\310\211\310\f\311\312\215.\207" [this-window error errorf label file buffer selected-window message nil exit (byte-code "@\3068\211\204\307!\210\310\311\312\"\210\f\203\313\n!\202#\314\n
?\"\211\2031\315!\210\202;\316	\"\210\310\311\312\"\210\317\320	!\"\203R\321\312\322#\202X\323\312\322#\211\204zeb\210\321\312\322#\211\204z\321\317\320	!\"\312\322#\306\225\203\237\324\325\306\224\306\225#\210\326\306\224\306\225\"\210\327\330!\210 \204\251\331!!\210\202\251\331!!\210\316	\"\210\207" [data label file errorf no-revisit reftex-keep-temporary-buffers 3 "Unknown label - reparse might help" throw exit nil reftex-get-buffer-visiting reftex-get-file-buffer-force switch-to-buffer-other-window "Label %s not found" format regexp-quote re-search-forward t re-search-backward reftex-highlight 0 reftex-show-entry recenter (4) select-window buffer reftex-find-label-regexp-format re forward found reftex-find-label-regexp-format2 stay this-window] 6) re found] 3])
(defalias 'reftex-show-entry #[(beg-hlt end-hlt) "\306 \307\245\212\310\311\312\313$\210`)\212\314\311\312\313$\210`)\315\303!\2039\2039\316\fT\317\"\2039pB
B\312\211\202\251\320\321	\n{\"\205\251\322	\n\"%\323\324!\210\312&\325 \210%c\210\326ed\327\330\331%\210\f	Zb\210\332\333\f	ZT'	ZT#\210\334 \203\221(\335=\203\201)\204\240\335 \210\336\337*\340#\210\341 \210\202\240(\342=\203\235)\203\240\342 \210\343\344!\210\331\211&)+\207" [n beg end buffer-invisibility-spec beg-hlt reftex-buffers-with-changed-invisibility reftex-window-height 2 re-search-backward "[\n
]" nil 1 re-search-forward boundp get-char-property invisible string-match "
" buffer-substring-no-properties switch-to-buffer "*RefTeX Context Copy*" erase-buffer subst-char-in-region 13 10 t reftex-highlight 0 reftex-refontify latex-mode run-hook-with-args reftex-pre-refontification-functions reftex-hidden turn-on-font-lock fundamental-mode run-hooks reftex-display-copied-context-hook string buffer-read-only end-hlt major-mode font-lock-mode reftex-call-back-to-this-buffer] 6])
(byte-code "\306\211\203V\n@\211A@;\203O\307	8\306\211\203N\n@\211@	A@\310\311\312\313\314\f
\315
GO#!\306\313\316
\f#\317\320\321
DC\322BB\257!\210*\nA\211\204*\nA\211\204*\306\207" [reftex-ref-style-alist elt --dolist-tail-- item package macro nil 2 eval defun intern format "reftex-%s-%s" 1 "Insert a reference using the `%s' macro from the %s package.\n\nThis is a generated function." (interactive) let reftex-refstyle ((reftex-reference))] 10)
#@110 Apply selected reference style to format FMT and add LABEL.
Replace any occurrences of "\ref" with REFSTYLE.
(defalias 'reftex-format-special #[(label fmt refstyle) "\303\304\"\203\305	\306\211\307%\202\310\n\"\207" [fmt refstyle label string-match "\\(\\\\ref\\)[ 	]*{" replace-match t 1 format] 6 (#$ . 19052)])
#@153 Prompt for a label (with completion) and jump to the location of this label.
Optional prefix argument OTHER-WINDOW goes to the label in another window.
(defalias 'reftex-goto-label #[(&optional other-window) "\306 \210\307 	J\310\311!\205\312\313!\314\203\315\316\"\202 \317\n\320\321\322\211&\323\f\n\"\324
\321\322\325$\210\326 \204M\327!\210\330\331!!\210b\210\332\333!.\207" [wcfg reftex-docstruct-symbol docstruct default label selection reftex-access-scan-info current-window-configuration looking-back "\\\\\\(?:page\\)?ref{[-a-zA-Z0-9_*.:]*" reftex-this-word "-a-zA-Z0-9_*.:" completing-read format "Label (default %s): " "Label: " #[(x) "@;\207" [x] 1] t nil assoc reftex-show-label-location stay point-marker set-window-configuration switch-to-buffer marker-buffer reftex-unhighlight 0 where other-window] 8 (#$ . 19381) "P"])
(provide 'reftex-ref)
F1l3 Manager
