ikan Uploader :
Directory : /proc/thread-self/root/usr/share/emacs/25.2/lisp/textmodes/
Upload File : |
| Current File : //proc/thread-self/root/usr/share/emacs/25.2/lisp/textmodes/reftex-ref.elc |
;ELC
;;; Compiled
;;; in Emacs version 25.2.1
;;; with all optimizations.
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(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 (#$ . 484)])
(defalias 'reftex-label-info-update #[(cell) "@A@\3068\3078 \3108 \311 \312=?\"\211 \204, \n\313 \f\314\257\202i rq\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) "\306!\210 \203 \307 \n\"\204 \310 \204 \311\312!\210\31326\307 \n\"\211A@ \314 8 \315\316! >\307>@\n\" ?\317\211 @ A\317\211 B C\317\211 D E\317 F\320 8\204Z \320?8\203e h\321>\203e \322A\323\307\fG\"A\206q \f\324PB\325B!B\326\fH@\"\203\340 \327\330\331 @IJ#J\332\333\334\335\317\211\322$8!D\336\337D\"\204\301 \336\340D\"\204\301 \336\341D\"\204\301 \336\342D\"\204\301 \336\343D\"\203\313 BD\322E\202\370 BKD!PD\344D\317\324#D\202\370 \326\fHA@\"\203\361 BD\202\370 \344B\322\"D\326\fHA@\"\204E\203vC\204z\345A\203\346\202\347D\"@\336\350\351B!\352Q@\"\2036\353\354!\210\355\313\317\"\210\202\336L@\"\203O\353\356@\"\210\357 \210\360\333!\210\202\307@IJ\"\211\203o\357 \210\361\362\363@\"!\203\322\211C\202 \322\211C\202 D@\212A\204\205M\203\221>A\250\203\221>Ab\210\331 )\211 N@ ONA\203\244\364\202\245\365 P\366 Q\317 ROIJ> SNA\204\277\322FS\203\347@\fRQ\317P\257 TS\211 UTUAB\241\210*\367I\370\322#\210.M\204V\203\374V@
\"\202\305
@\"c\210W\203\371\372!\203\372@!\210X\203$\373\374\f!!\210\373\374\335!!\210F\2031Y\2031\375 \210@.\f0\207" [current-prefix-arg environment reftex-env-or-mac-alist entry typekey format reftex-access-scan-info assoc reftex-label-location error "Can't figure out what kind of label should be inserted" exit 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 "Label \"%s\" contains invalid characters" ding sit-for y-or-n-p format-message "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 macro-cell 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 (#$ . 2509) 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 (#$ . 5587)])
(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 \3420\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 #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] nil 0 string-match "\\%\\([a-zA-Z]\\)" match-string 1 #[nil "\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" #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] re-search-backward t reftex-match-string 2 assoc abs #[nil "\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\211A \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\216 ,\203x -\312 .\211 /\203V /@\211.@\313 \235\203M \314\315\316.8\"\210/A\211/\2048 *\317\320\321\322\323 \324#P\" 0\3250 \"A\211\204t \326\3270\"\210)\202\216 \316\325\313 @-\"8@@\206\215 \316-@8@@1\204\261 \203\255 \330 \2111\203\255 1A21@1\202\261 \331 13`\312\223\210\212\3321!))\333 \2103\312\211\223\210)@\334=\203\340 \322\335)A\336#)A@ADC))@A@1\32514\"A\206\363 ++5\203)@@\202\215)\204\337\340!\210\312\202\215)\203\207)@@*\316)@8\325
6\"A)A)2\2038\3412!\210\3122\342+!\343U\203Nh\344\235\203N+\345\312O+ \346\230\204V\347\f\203]\fc\210\n\203k\n*+ #\202r\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) "A@@B\211\n\235\203 \n\202 \303\n C\"\211)\207" [x #1=#:x style-alist append] 4] 2 reftex-select-with-char #2="" "SELECT A REFERENCE FORMAT\n\n" mapconcat #[(x) "\301\302@@\303V\203 \304\202 \305A$\207" [x format "[%c] %s %s" 31 " " #2#] 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 type cut reftex-select-return-marker reftex-typekey-to-format-alist no-insert reftex-multiref-punctuation] 9 (#$ . 9518) nil])
(defalias 'reftex-guess-label-type #[nil "\306e`\307Z]\310\211 \212
\211A\242\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 @\313AB\311# C\313AB\314# D\313AB\315#? E\313AB\316# F\313AB\317# G\320B8 H\307 I\321\211 J K\321\211 L M\321\211 N O\321 P\322\216\3232\256\324 Q\325\216\326 \210R\327 ST\203\217 \330rq\210\331A!)!\210\202\226 \330\332!\210\333 \210U\334=\204\240 \334 \210p\211 VJ\235\203\260 J\210\202\267 VJBJ)\335W\336\337\340\341\342X\343\344\345\346\347\257 Y\350 \311U\203\371 \321 Z\351\352!\210\353CA\321DEFH
\206\356 KI\321& K)\202
\203\354
A#K\202 \335K\335ZK\206\335K\321\355[\\]K\356G&\211L@MLA@N\316L8O\335KM\204E\357\323\321\"\210M\360=\203R\333 \210\202\252M\361=\204`M\362=\203v^\203h\362M\333 \210\363OM#\210\202\252M\364=\203\210\333 \210E?E\202\252M\365=\203\231@\366 A\202\252M\367=\203\271\333 \210^\203\261\370^!_\202\252C?C\202\252M\371=\203\313\333 \210D?D\202\252M\372=\203\335\333 \210F?F\202\252M\373=\203\357\333 \210H?H\202\252M\374=\203`P\357\323\335\"\210\202\252M\375=\2034\376 \f\"\377\f 8A!\206 \201b \201c !\f 8@\206'\307Iq\210\201d \210\202\252M;\203V\201e M J\"\206JMADCCP\357\323\335\"\210\202\252M\201f >\203\242a\203la\237P\202}N\203zNCCP\202}\321PP\203\227M\201g \232\203\223\201h PBPP`q\210\357\323\335\"\210\202\252\201b \201i !\210*\202k \210)\201j \201k P\".\207" [buf reftex-docstruct-symbol xr-data xr-alist xr-index here-I-am xr "" buffer-file-name 0 reftex-where-am-I reftex-typekey-check 7 3 2 4 5 nil #[nil "\212\203 @@q\210\211A\242A\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 current-window-configuration #[nil "\301!\207" [#1=#:wconfig set-window-configuration] 2] delete-other-windows syntax-table switch-to-buffer-other-window reftex-make-selection-buffer-name "*RefTeX Select*" reftex-erase-buffer reftex-select-label-mode t "---- " mode-line-buffer-identification " " global-mode-string " (" ")" " S<" reftex-refstyle ">" " -%-" buffer-size message "Creating Selection Buffer..." reftex-insert-docstruct reftex-get-offset reftex-select-item reftex-show-label-location throw 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 here-I-am1 typekey reftex-label-menu-flags toc files context counter follow commented prefix selection-buffers offset rtn key data last-data entries #1# reftex-call-back-to-this-buffer reftex-latex-syntax-table reftex-use-multiple-selection-buffers major-mode #2=#:x truncate-lines mode-name mode-line-format buffer-read-only reftex-select-label-prompt reftex-select-label-help reftex-select-label-map current-prefix-arg reftex-toc-max-level reftex-last-used-reference reftex-select-marked error "Cannot switch document" reftex-access-scan-info assoc (97 65 return) 97 concat "This should not happen (reftex-offer-label-menu)" mapcar #[(x) "<\203 @@P@A@\3028E\207\207" [x prefix 2] 4]] 13])
(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 #[nil "\301!\207" [#1# set-window-configuration] 2] 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 \3112\311 @\312 8\211\2043 \n\313!\210\314\311\310\"\210 \203> \315\f!\202D \316\f ?\"\211\203P \317
!\210\202Z \n\320 \"\210\314\311\310\"\210\321!\322 !\" \"\203q \323 \310\324#\202w \325 \310\324#\211 \204\231 eb\210\323 \310\324#\211 \204\231 \323\321#\322 !\"\310\324# \312\225\203\275 \326\327\312\224\312\225#\210\330\312\224\312\225\"\210\331\332!\210$\204\306 \333!\210\202\306 \333!\210\n\320 \"\210 0.\207" [this-window error errorf label file buffer selected-window message nil exit 3 "Unknown label - reparse might help" throw 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 re found data no-revisit reftex-keep-temporary-buffers reftex-find-label-regexp-format forward reftex-find-label-regexp-format2 stay] 6])
(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\"\2039 p 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@\211A@;\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 \303\310\"\203! \305 \306\211\307%\311\n\"\207" [fmt refstyle label string-match "\\(\\\\ref\\)[ ]*{" replace-match t 1 "\\(\\\\[[:alpha:]]+\\)[ ]*{" format] 6 (#$ . 18614)])
#@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\312 \"\205 \313\314!\315 \203! \316\317 \"\202\" \320\n\321\322\323\211 & \324\f\n\" \325
\322\323\326$\210\327 \204O \330!\210\331\332 !!\210 b\210\333\334!.\207" [wcfg reftex-docstruct-symbol docstruct default label selection reftex-access-scan-info current-window-configuration looking-back "\\\\\\(?:page\\)?ref{[-a-zA-Z0-9_*.:]*" line-beginning-position 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 (#$ . 19011) "P"])
(provide 'reftex-ref)
Kontol Shell Bypass