| Server IP : 217.160.0.212 / Your IP : 216.73.216.141 Web Server : Apache System : Linux www 6.18.51-i1-ampere #1196 SMP Fri Sep 11 20:43:55 CEST 2026 aarch64 User : sws1073854427 ( 1073854427) PHP Version : 8.4.23 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /usr/share/emacs/28.2/lisp/textmodes/ |
Upload File : |
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.
(require 'reftex)
#@19
(fn &rest BODY)
(defalias 'reftex-with-special-syntax '(macro . #[128 "\300\301\302\303\304\300\305BBE\306BBE\207" [let ((saved-syntax (syntax-table))) unwind-protect progn (set-syntax-table reftex-syntax-table) ((case-fold-search nil)) ((set-syntax-table saved-syntax))] 9 (#$ . 102)]))
#@21 Re-parse this file.
(defalias 'reftex-parse-one #[0 "\301\302\303!)\207" [reftex-enable-partial-scans t reftex-access-scan-info (4)] 2 (#$ . 400) nil])
#@27 Re-parse entire document.
(defalias 'reftex-parse-all #[0 "\300\301!\207" [reftex-access-scan-info (16)] 2 (#$ . 559) nil])
#@99 Do a document rescan.
When allowed, do only a partial scan from FILE.
(fn RESCAN &optional FILE)
(defalias 'reftex-do-parse #[513 "\306\267\202 \307\202 \310\202 \307\202 \310\202 \310\262\204 \310\262 J\311 \312!\313\314!!\2062 \315 \312!\316\236\317\236A\320\211\211\211C\f\307=\203b \321D\235\203_ \322D\235\204b \310\262
\230\203l \310\262
\f\323\267\202\202 \206\205 \202\205 \202\205 \324\325!\262\f\310=\203\220 \320\326\327\321D
#\326\330\321D
#\262\331\"\210\f\310=\203\270 \332\333!\210\202\275 \332\334\"\210\335 \336\337\"\216\340\f!\210\320\341 \336\342\"\216\212\343\216\344\320\f#\262+\210*\210\332\345!\210\237\262\346\310=#\262\347\236\204 \347CB\262\350\236\204\350BB\262\316\236\204\316ABB\262\321\236>\321A\236\205*\211??\351\236\206;\351DB\211\262@\211C\241\266\n\203J\352\n\353\"\317\236\211\203Y\211\n\241\266\202a\317\nBB\262\210\354\236\204\232\355\356\"\357\336\360#\"\361\320\"\361\320\357\362\"\"\211\203\216\363\364\365\366#\367Q\202\217\370\354EB\262\266 L\210\371 \372\307#)\207" [reftex-enable-partial-scans reftex-docstruct-symbol reftex--index-tags reftex-active-toc reftex-syntax-table case-fold-search #s(hash-table size 4 test equal rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (t 6 1 10 (4) 14 (16) 18)) t 1 reftex-TeX-master-file file-truename file-name-as-directory file-name-directory buffer-file-name bibview-cache index-tags nil bof eof #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (t 115 1 125)) error "This should not happen (reftex-do-parse)" reftex-last-assoc-before-elt toc appendix reftex-init-section-numbers message "Scanning entire document..." "Scanning document from %s..." syntax-table make-closure #[0 "\301\300!\207" [V0 set-syntax-table] 2] set-syntax-table current-window-configuration #[0 "\301\300!\207" [V0 set-window-configuration] 2] #[0 "\300 \207" [reftex-kill-temporary-buffers] 1] reftex-parse-from-file "Scanning document... done" reftex-replace-label-list-segment label-numbers master-dir is-multi sort string< xr reftex-all-assq xr-doc mapcar #[257 "\301\302\3038\304\300#\240\203 \211A@\301\242B\207\305\306\3038\"\210\307\207" [V0 V1 reftex-locate-file 2 "tex" message "Can't find external document %s" nil] 6 "\n\n(fn X)"] delq car "\\`\\(" mapconcat identity "\\|" "\\)" "\\\\\\\\\\\\" put modified] 22 (#$ . 689)])
(defalias 'reftex-everything-regexp #[0 "\203 \207\n\207" [reftex-support-index reftex-everything-regexp reftex-everything-regexp-no-index] 1])
#@168 Return a list of all files belonging to the current document.
When RELATIVE is non-nil, give file names relative to directory
of master file.
(fn &optional RELATIVE)
(defalias 'reftex-all-document-files #[256 "J\301\302 !\303\304!P\305\211\211\306\236\211\262\203? A@\262>A\262\2037 \307\"\2037 \211\310\225\305O\262\211B\262\202 \237\207" [reftex-docstruct-symbol file-name-directory reftex-TeX-master-file "\\`" regexp-quote nil bof string-match 0] 10 (#$ . 3313)])
#@85 Scan the buffer for labels and save them in a list.
(fn FILE DOCSTRUCT MASTER-DIR)
(defalias 'reftex-parse-from-file #[771 "\306 \307\310\211\211C\311\312\310\211\211\211\3132Y\314\315#\262 \204. \316!\211\262\203. \317!\262 \204A \320D
B\262
\321\313\310\"\210\212\322\323\"\210\324 \325=?\"\211\262q\210\317 \262\326D
B\262
\327 \330\331\"\216\332 !\210\310\212\214~\210\311b\210\333\f\310\325#\203\365\311\225\203\327 \203\306 \334\307!\307\335O\336\230\204\306 \337\340!\203\302 \337\341!\203\302 \342 \330\343\"\216\340 )\262\235\206\276 \342 \330\344\"\216\341 )\262\235?\202\303 \325\203v \345\334\311!
#B\262\202v \346\225\2030\307\224\262`Sf\347=\203\353 \350u\210\f!\262\203v \nf\351U\352\353\"=\203v \3548\262^\262U\203$\322\355\356
\"@\3578#\210B\262@\202v \335\225\203Y\334\335!\240\210\360\310\361\330\362\f\"A\"\"\204v \363\242#\262\202v \364\225\203n\365\310\325\"\210\366\325BB\262\202v \367\225\203\242B\203v \370!\262\203v A@\211C\235\203\221C\202\225\211CB\262CB\262\202v \371\225\203\354\212\334\371!\371\225b\210\342 \330\372\"\216\373\374!!)\262\375D\"A@\211\203\320\307\225b\210\202\327\371\225b\210\376 \210\345\310\211%\211B\262\266)\202v \377\201E !\210\202v \201F
!\211\262\n\203\f\201G BB\262\311b\210\333\201H \310\325#\203$\201I BB\262\311b\210\333\201J \310\325#\203E\201K \334\201L !\334\346!EB\262\202'\201M DB\262,\210)\201N !0\210\f\207" [reftex-keep-temporary-buffers reftex-syntax-table case-fold-search reftex-label-ignored-macros-and-environments reftex-section-info-function reftex-section-levels-all reftex-everything-regexp 0 nil 1 100 exit reftex-locate-file "tex" find-buffer-visiting buffer-file-name file-error throw message "Scanning file %s" reftex-get-file-buffer-force t bof syntax-table make-closure #[0 "\301\300!\207" [V0 set-syntax-table] 2] set-syntax-table re-search-forward reftex-match-string 7 "\\label{" fboundp TeX-current-macro LaTeX-current-environment match-data #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] reftex-label-info 3 92 -1 37 string-suffix-p ".dtx" 5 "Scanning %s %s ..." rassoc 6 delq mapcar #[257 "\301\300\242\"\207" [V0 string-match] 4 "\n\n(fn X)"] reftex-parse-from-file 9 reftex-init-section-numbers appendix 10 reftex-index-info 11 #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] reftex-no-props reftex-nth-arg-wrapper assoc reftex-move-over-touching-args error reftex-active-toc reftex-no-include-regexps reftex-support-index reftex--index-tags reftex-env-or-mac-alist "This should not happen (reftex-parse-from-file)" reftex-locate-bibliography-files bib "\\(\\`\\|[\n
]\\)[ ]*\\\\begin{thebibliography}" thebib "[\n
][ ]*\\\\externaldocument\\(\\[\\([^]]*\\)\\]\\)?{\\([^}]+\\)}" xr-doc 2 eof reftex-kill-temporary-buffers] 24 (#$ . 3808)])
#@61 Return non-nil if we are using biblatex rather than bibtex.
(defalias 'reftex-using-biblatex-p #[0 "\301\300!\203\n \302\235\207\212\303\304\305\306#)\207" [TeX-active-styles boundp "biblatex" re-search-forward "^[^%\n]*?\\\\usepackage.*{biblatex}" nil t] 4 (#$ . 6776)])
#@92 Scan buffer for bibliography macros and return file list.
(fn MASTER-DIR &optional FILES)
(defalias 'reftex-locate-bibliography-files #[513 "\211\2046 \212eb\210\301 \302\211\2033 \303\304\305\306\307#\310Q\311\302#\2033 \312\313\314\315!\316\"\"\262\204 \311\262\202 \266)\211\205G \317\320\321\"\"\262\322\311\"\207" [reftex-bibliography-commands reftex-using-biblatex-p t re-search-forward "\\(^\\)[^%\n
]*\\\\\\(" mapconcat identity "\\|" "\\)\\(\\[.+?\\]\\)?{[ ]*\\([^}]+\\)" nil append split-string reftex-match-string 4 "[ \n
]*,[ \n
]*" mapcar make-closure #[257 "\211 \235\206 \303\304\305\306\307\"\n\"\"?\205 \310\311\300#\207" [V0 reftex-bibfile-ignore-list reftex-bibfile-ignore-regexps delq nil mapcar make-closure #[257 "\301\300\"\207" [V0 string-match] 4 "\n\n(fn RE)"] reftex-locate-file "bib"] 7 "\n\n(fn X)"] delq] 10 (#$ . 7055)])
#@251 Replace the segment in OLD which corresponds to INSERT.
Works with side effects, directly changes old.
If ENTIRELY is t, just return INSERT.
This function also makes sure the old toc markers do not point anywhere.
(fn OLD INSERT &optional ENTIRELY)
(defalias 'reftex-replace-label-list-segment #[770 "\211\203\f \300\211G\"\210\207@A@\301D\235\302D\235\303\203# \204* \304\305!\210\202O \300\211GGZ\"\210GGZ\262\211\233A\241\210GS\233A\241\210\207" [reftex-silence-toc-markers eof bof nil error "Cannot splice"] 11 (#$ . 7935)])
#@128 Return a section entry for the current match.
Careful: This function expects the `match-data' to still be in
place!
(fn FILE)
(defalias 'reftex-section-info #[257 "\303 \304\224S\305\223\306\304!\307 \310\311\"\216\312\313\"\205 \314\315\")\262\316\"A\2119\2038 \307 \310\317\"\216 )\262\2029 \211\304\225f\320U\211\206E \321W\322!\323\"\307 \310\324\"\216\212\325!*\262\326\304\224Sd\321\225G\\T^\"\327!\330 _\331\"\nA@\205{ \332P\203\211 \333\f!\334P\202\212 \335R\262\336\337 \340!\257 \207" [reftex-section-levels-all reftex-level-indent reftex-label-menu-flags make-marker 3 nil reftex-match-string match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] string-match "begin{\\([^}]+\\)}" match-string 1 assoc #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] 42 0 abs reftex-section-number #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] reftex-context-substring buffer-substring-no-properties reftex-nicify-text make-string 32 " " capitalize ": " "" toc "toc" marker-position] 23 (#$ . 8498)])
#@178 When index support is turned off, ask to turn it on and
set the current prefix argument so that `reftex-access-scan-info'
will rescan the entire document.
(fn &optional ABORT)
(defalias 'reftex-ensure-index-support #[256 "\203 \302\207\303\304!\203 \305\306\211\207\211\203 \307\310!\207\311\310!\210\312 \210\313\314!\207" [reftex-support-index current-prefix-arg t y-or-n-p "Turn on index support and rescan entire document? " demanded (16) error "No index support" message ding sit-for 1] 3 (#$ . 9591)])
#@13
(fn FILE)
(defalias 'reftex-index-info-safe #[257 "\302 \303\304\"\216\305!\210\306\307!*\207" [reftex-syntax-table case-fold-search syntax-table make-closure #[0 "\301\300!\207" [V0 set-syntax-table] 2] set-syntax-table nil reftex-index-info] 5 (#$ . 10112)])
#@127 Return an index entry for the current match.
Careful: This function expects the `match-data' to still be in
place!
(fn FILE)
(defalias 'reftex-index-info #[257 "\3042\275 \305\306!\306\224\306\225\307\"\206 \310\304\311\"\3128\313!\205( \211 \205( \310\304\311\"A@\3148;\2038 \202O \250\203N b\210\315\3168\"\206O \317\202O \317b\210\315\3208\3168\"\206` \321b\210\322 \210`\323\311w\210` b\210\324\311x\210`\325\"\326\n\"\205\205 \327\224T\327O\203\225 P\202\226 \211\211\227\330\331\332\"\333#b\210\334
\257\n)\266\2220\207" [reftex-index-macro-alist test-dummy reftex-index-key-end-re reftex-index-level-re exit reftex-match-string 10 assoc throw nil 3 fboundp 2 reftex-nth-arg 6 "idx" 5 "" reftex-move-over-touching-args "^ \n
" "^
\n" buffer-substring-no-properties string-match 0 mapconcat identity split-string " ! " index] 29 (#$ . 10386)])
#@112 Get about one line of useful context for the label definition at point.
(fn ENV PARSE &optional BOUND DERIVE)
(defalias 'reftex-short-context #[1026 ":\203 \211\203 A\202 @\262\304\305\267\202k \212\306 )\202\300 \307\230\203V \212\310e\311#\203= \312\225\203= \313\225b\210\306 \202R \203Q \314\315\316 8\"\210\317\320\316 8\"\202R \321)\202\300 \212\nb\210\322!\323=\204e \324 \210\306 )\202\300 ;\203\207 \212\310\311#\203\202 \313\225b\210\306 \202\203 \325)\202\300 \250\203\242 \212\nb\210\326\327\330\"8\")\206\300 \331\202\300 \332!\203\277 \212\3331\264 !0\202\273 \334\335A\"\262)\202\300 \336!\207" [reftex-section-or-include-regexp reftex-active-toc reftex-default-context-position reftex-env-or-mac-alist reftex-nicify-text #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (nil 25 t 32)) reftex-context-substring "section" re-search-backward t 2 0 string-match "{\\([^}]*\\)" 7 match-string 1 "SECTION HEADING NOT FOUND" string-to-char 92 reftex-move-over-touching-args "NO MATCH FOR CONTEXT REGEXP" reftex-nth-arg 6 assoc "" fboundp (error) format "HOOK ERROR: %s" "INVALID VALUE OF PARSE"] 11 (#$ . 11301)])
#@162 Return the docstruct entry above point.
Actually returns a cons cell in which the cdr is a flag indicating
if the information is exact (t) or approximate (nil).
(defalias 'reftex-where-am-I #[0 "J\302\303\211\211\212\204\217T\262\304\305 \303\306#\262\211\2047 \307\310 D\235@\206\212\311\211\262?\206\212\307\236\206\212\312\202\212\313\225\203F \314\315\313!J\"\202\212\316\225\203\273 \316\224Sb\210\307\310 D\235\317\310 D\235@\303\203\266 @=\204\266 @@\320=\203\257 \310 \316@8\230\203\257 `\321\322@8!\203\216 \323\322@8!\206\222 \324@8\232\203\240 @\262\303\262\202\257 \325\326\327@8!!\203\257 @\262A\262\202^ \266\202\202\212\327\225\203\323 \317\330\315\327!\331\332 \236A#D\235@\202\212\333\225\203\337 \334J\236\202\212\335\225\203n \205\212\212\336\303!)\307\310 D\235\317\310 D\235@\303\211\211\302\203G@=\204G@@\337=\203@\3118\311@8\230\203@\211T\262\340`\322@8Z!\262\2039W\203@\262@\262A\262\202\377 \211\313U\204S\302=\203Y\266\207\202\212\211\313V\203h\311\262\266\207\202\212\266\303\202\212\341\225\203\207\212\341\225b\210\314\342\343\315\341!!!J\")\202\212\344\345!\262\202 )\204\236\203\236\262\311\262\313=B\207" [reftex-docstruct-symbol reftex-support-index 0 nil re-search-backward reftex-everything-regexp t bof buffer-file-name 2 corrupted 1 assoc reftex-match-string 3 eof toc markerp 4 marker-position 8 looking-at reftex-make-regexp-allow-for-ctrl-m 7 reftex-locate-file "tex" master-dir 9 appendix 10 reftex-index-info-safe index abs 11 reftex-no-props reftex-nth-arg-wrapper error "This should not happen (reftex-where-am-I)"] 16 (#$ . 12493)])
#@94 Hook to handshake with RefTeX after something new has been inserted.
(fn &optional N FORCE)
(defalias 'reftex-notice-new #[512 "\3061Z\3072X\204 \310\307\311\"\210\312 \210 J\311\211\211\211\211\211\211\211\212\313\314 \311\315\206* \316$\205T\317 \262\204<