;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\207" [require tex latex] 2) #@57 Key=value options for fancyvrb macros and environments. (defvar LaTeX-fancyvrb-key-val-options (byte-code "\300\301\302\303\304\305\306\307\310\311\312\313\314\315\316\317\320\321\322\323\324\325\326\327\330\331\332\333\334\335\336\337\340\341\342\343\344\345\346\347\350\351 \"D\352BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB\207" [("commentchar" ("none")) ("gobble") ("formatcom") ("formatcom*") ("fontfamily" ("tt" "courier" "helvetica")) ("fontsize" ("auto" "\\tiny" "\\scriptsize" "\\footnotesize" "\\small" "\\normalsize" "\\large" "\\Large" "\\LARGE" "\\huge" "\\Huge")) ("fontshape" ("auto" "n" "it" "sl" "sc" "scit")) ("fontseries" ("auto" "m" "b" "bx" "sb" "c" "l" "lc")) ("frame" ("none" "leftline" "topline" "bottomline" "lines" "single")) ("framerule") ("framesep") ("rulecolor" ("none")) ("fillcolor" ("none")) ("label" ("none")) ("labelposition" ("none" "topline" "bottomline" "all")) ("numbers" ("none" "left" "right")) ("numbersep") ("firstnumber" ("auto" "last" "integer")) ("stepnumber") ("numberblanklines" ("true" "false")) ("firstline") ("lastline") ("showspaces" ("true" "false")) ("showtabs" ("true" "false")) ("obeytabs" ("true" "false")) ("tabsize") ("baselinestretch" ("auto" "dimension")) ("commandchars" ("none")) ("xleftmargin") ("xrightmargin") ("resetmargins" ("true" "false")) ("hfuzz") ("samepage" ("true" "false")) ("codes") ("codes*") ("defineactive") ("defineactive*") ("reflabel") "vspace" mapcar #[257 "@P\207" [TeX-esc] 3 "\n\n(fn X)"] LaTeX-length-list (("boxwidth" ("auto" "dimension")) ("baseline" ("b" "c" "t")) ("aftersave"))] 42) (#$ . 150)) #@233 Buffer-local key=value options for fancyvrb macros and environments. This variable is intended for packages like "fvextra" which provide new key=values for fancyvrb environments. New key=values should be appended to this variable. (defvar LaTeX-fancyvrb-key-val-options-local nil (#$ . 1743)) (make-variable-buffer-local 'LaTeX-fancyvrb-key-val-options-local) #@102 List of base macros available with fancyvrb package. Starred versions are not included in this list. (defvar LaTeX-fancyvrb-base-macros '("VerbatimInput" "BVerbatimInput" "LVerbatimInput" "SaveVerb" "UseVerb" "Verb") (#$ . 2111)) #@108 List of base environments available with fancyvrb package. Starred versions are not included in this list. (defvar LaTeX-fancyvrb-base-environments '("Verbatim" "BVerbatim" "LVerbatim" "SaveVerbatim" "VerbatimOut") (#$ . 2348)) #@50 Helper regexp to skip over an optional argument. (defvar LaTeX-fancyvrb-key-val-skip-regexp (byte-code "\300\301\302!\303Q\207" ["\\(?:" LaTeX-extract-key-value-label none "\\)?"] 3) (#$ . 2582)) #@92 Information about fancyvrb-macros in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-auto-fancyvrb-macro nil (#$ . 2784)) #@92 Information about fancyvrb-macros in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-fancyvrb-macro-list nil (#$ . 2932)) (make-variable-buffer-local 'LaTeX-fancyvrb-macro-list) #@92 Information about fancyvrb-macros in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-fancyvrb-macro-changed nil (#$ . 3136)) (make-variable-buffer-local 'LaTeX-fancyvrb-macro-changed) #@124 Add information about FANCYVRB-MACROS to the current buffer. Generated by `TeX-auto-add-type'. (fn &rest FANCYVRB-MACROS) (defalias 'LaTeX-add-fancyvrb-macros #[128 "\300\301\"\207" [TeX-auto-add-information "fancyvrb-macro"] 4 (#$ . 3347)]) #@89 List of fancyvrb-macros active in the current buffer. Generated by `TeX-auto-add-type'. (defalias 'LaTeX-fancyvrb-macro-list #[0 "\300\301!\207" [TeX-auto-list-information "fancyvrb-macro"] 2 (#$ . 3597)]) (byte-code "\300\301\302\303#\210\304\305\306\"\207" [add-to-list TeX-auto-parser ("fancyvrb-macro" LaTeX-auto-fancyvrb-macro LaTeX-add-fancyvrb-macros LaTeX-fancyvrb-macro-list LaTeX-fancyvrb-macro-changed) t add-hook TeX-remove-style-hook #[0 "\301\211\207" [LaTeX-fancyvrb-macro-list nil] 2]] 4) #@37 Matches macros by fancyvrb package. (defvar LaTeX-fancyvrb-macro-regexp (cons "\\\\\\(Rec\\|C\\)ustomVerbatimCommand[ \n ]*{?[ \n ]*\\\\\\([A-Za-z]+\\)[ \n ]*}?[ \n ]*{[ \n ]*\\([A-Za-z]+\\)[ \n ]*}" '((2 3 1) LaTeX-auto-fancyvrb-macro)) (#$ . 4109)) #@98 Information about fancyvrb-environments in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-auto-fancyvrb-environment nil (#$ . 4372)) #@98 Information about fancyvrb-environments in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-fancyvrb-environment-list nil (#$ . 4532)) (make-variable-buffer-local 'LaTeX-fancyvrb-environment-list) #@98 Information about fancyvrb-environments in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-fancyvrb-environment-changed nil (#$ . 4754)) (make-variable-buffer-local 'LaTeX-fancyvrb-environment-changed) #@136 Add information about FANCYVRB-ENVIRONMENTS to the current buffer. Generated by `TeX-auto-add-type'. (fn &rest FANCYVRB-ENVIRONMENTS) (defalias 'LaTeX-add-fancyvrb-environments #[128 "\300\301\"\207" [TeX-auto-add-information "fancyvrb-environment"] 4 (#$ . 4983)]) #@95 List of fancyvrb-environments active in the current buffer. Generated by `TeX-auto-add-type'. (defalias 'LaTeX-fancyvrb-environment-list #[0 "\300\301!\207" [TeX-auto-list-information "fancyvrb-environment"] 2 (#$ . 5257)]) (byte-code "\300\301\302\303#\210\304\305\306\"\207" [add-to-list TeX-auto-parser ("fancyvrb-environment" LaTeX-auto-fancyvrb-environment LaTeX-add-fancyvrb-environments LaTeX-fancyvrb-environment-list LaTeX-fancyvrb-environment-changed) t add-hook TeX-remove-style-hook #[0 "\301\211\207" [LaTeX-fancyvrb-environment-list nil] 2]] 4) #@55 Matches new environments defined by fancyvrb package. (defvar LaTeX-fancyvrb-environment-regexp (cons "\\\\DefineVerbatimEnvironment[ \n ]*{[ \n ]*\\([A-Za-z0-9]+\\)[ \n ]*}[ \n ]*{[ \n ]*\\([A-Za-z]+\\)[ \n ]*}" '((1 2) LaTeX-auto-fancyvrb-environment)) (#$ . 5823)) #@95 Information about fancyvrb-saveverbs in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-auto-fancyvrb-saveverb nil (#$ . 6103)) #@95 Information about fancyvrb-saveverbs in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-fancyvrb-saveverb-list nil (#$ . 6257)) (make-variable-buffer-local 'LaTeX-fancyvrb-saveverb-list) #@95 Information about fancyvrb-saveverbs in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-fancyvrb-saveverb-changed nil (#$ . 6470)) (make-variable-buffer-local 'LaTeX-fancyvrb-saveverb-changed) #@130 Add information about FANCYVRB-SAVEVERBS to the current buffer. Generated by `TeX-auto-add-type'. (fn &rest FANCYVRB-SAVEVERBS) (defalias 'LaTeX-add-fancyvrb-saveverbs #[128 "\300\301\"\207" [TeX-auto-add-information "fancyvrb-saveverb"] 4 (#$ . 6690)]) #@92 List of fancyvrb-saveverbs active in the current buffer. Generated by `TeX-auto-add-type'. (defalias 'LaTeX-fancyvrb-saveverb-list #[0 "\300\301!\207" [TeX-auto-list-information "fancyvrb-saveverb"] 2 (#$ . 6952)]) (byte-code "\300\301\302\303#\210\304\305\306\"\207" [add-to-list TeX-auto-parser ("fancyvrb-saveverb" LaTeX-auto-fancyvrb-saveverb LaTeX-add-fancyvrb-saveverbs LaTeX-fancyvrb-saveverb-list LaTeX-fancyvrb-saveverb-changed) t add-hook TeX-remove-style-hook #[0 "\301\211\207" [LaTeX-fancyvrb-saveverb-list nil] 2]] 4) #@70 Match the name under which verbatim text is saved by SaveVerb macro. (defvar LaTeX-fancyvrb-saveverb-regexp (byte-code "\301\302Q\303B\207" [LaTeX-fancyvrb-key-val-skip-regexp "\\\\SaveVerb" "{\\([^}]+\\)}" (1 LaTeX-auto-fancyvrb-saveverb)] 3) (#$ . 7491)) #@99 Information about fancyvrb-saveverbatims in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-auto-fancyvrb-saveverbatim nil (#$ . 7755)) #@99 Information about fancyvrb-saveverbatims in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-fancyvrb-saveverbatim-list nil (#$ . 7917)) (make-variable-buffer-local 'LaTeX-fancyvrb-saveverbatim-list) #@99 Information about fancyvrb-saveverbatims in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-fancyvrb-saveverbatim-changed nil (#$ . 8142)) (make-variable-buffer-local 'LaTeX-fancyvrb-saveverbatim-changed) #@138 Add information about FANCYVRB-SAVEVERBATIMS to the current buffer. Generated by `TeX-auto-add-type'. (fn &rest FANCYVRB-SAVEVERBATIMS) (defalias 'LaTeX-add-fancyvrb-saveverbatims #[128 "\300\301\"\207" [TeX-auto-add-information "fancyvrb-saveverbatim"] 4 (#$ . 8374)]) #@96 List of fancyvrb-saveverbatims active in the current buffer. Generated by `TeX-auto-add-type'. (defalias 'LaTeX-fancyvrb-saveverbatim-list #[0 "\300\301!\207" [TeX-auto-list-information "fancyvrb-saveverbatim"] 2 (#$ . 8652)]) (byte-code "\300\301\302\303#\210\304\305\306\"\207" [add-to-list TeX-auto-parser ("fancyvrb-saveverbatim" LaTeX-auto-fancyvrb-saveverbatim LaTeX-add-fancyvrb-saveverbatims LaTeX-fancyvrb-saveverbatim-list LaTeX-fancyvrb-saveverbatim-changed) t add-hook TeX-remove-style-hook #[0 "\301\211\207" [LaTeX-fancyvrb-saveverbatim-list nil] 2]] 4) #@80 Match the name under which verbatim text is saved by SaveVerbatim environment. (defvar LaTeX-fancyvrb-saveverbatim-regexp (byte-code "\301\302Q\303B\207" [LaTeX-fancyvrb-key-val-skip-regexp "\\\\begin{SaveVerbatim}" "{\\([^}]+\\)}" (1 LaTeX-auto-fancyvrb-saveverbatim)] 3) (#$ . 9227)) #@63 Clear various LaTeX-auto-fancyvrb-* variables before parsing. (defalias 'LaTeX-fancyvrb-auto-prepare #[0 "\304\211\304\211\211\207" [LaTeX-auto-fancyvrb-macro LaTeX-auto-fancyvrb-environment LaTeX-auto-fancyvrb-saveverb LaTeX-auto-fancyvrb-saveverbatim nil] 3 (#$ . 9520)]) #@47 Process parsed elements for fancyvrb package. (defalias 'LaTeX-fancyvrb-auto-cleanup #[0 "\300\301\302\"\210\303\301\302\"\207" [LaTeX-fancyvrb-arg-define-macro nil t LaTeX-fancyvrb-arg-define-environment] 3 (#$ . 9804)]) (byte-code "\300\301\302\303#\210\300\304\305\303#\210\300\306\307\303#\207" [add-hook TeX-auto-prepare-hook LaTeX-fancyvrb-auto-prepare t TeX-auto-cleanup-hook LaTeX-fancyvrb-auto-cleanup TeX-update-style-hook TeX-auto-parse] 4) #@393 Query and insert a new verbatim macro with fancyvrb package. If OPTIONAL is non-nil, insert the arguments in brackets. If CLEANUP is non-nil, do not insert any arguments in the buffer and update only various AUCTeX variables for verbatim macros. If RECUSTOM is non-nil, delete macros from the variable `TeX-symbol-list' before adding the new ones. (fn OPTIONAL &optional CLEANUP RECUSTOM) (defalias 'LaTeX-fancyvrb-arg-define-macro #[769 "\204W\211\203\306\307\310\311\312$\313\314\315\316\"\"\"\202\"\317\307\310\320\312$!\306\307\310\321# \"\2032\322\2023\323\324\211\325\f#\210*\325\"\210\325\326 \"\"\210\327E!\266\315\316\"\211\203$\211@\211@A@\3308\211\322\230\203{\331\332\333 \"@\"\334\235\203\241\335\336B!\210\337\340!\203\2342\341=\203\340\342BC\343\"\210\266\202\344\230\203\307\335\345B!\210\337\340!\203\3022\341=\203\340\346BC\347\"\210\266\202\350\230\203\355\335\351B!\210\337\340!\203\3502\341=\203\340\352BC\347\"\210\266\202\335\353B\354P\355B\"\210\356\357\312#\210\356\357\354P\312#\210\337\340!\2032\341=\203\340\360BC\347\"\210\266A\266\202\202[\210\337\361!\20542\341=\2054\361 \207" [LaTeX-fancyvrb-macro-list LaTeX-fancyvrb-base-macros TeX-arg-closing-brace TeX-arg-opening-brace TeX-esc LaTeX-fancyvrb-key-val-options-local completing-read TeX-argument-prompt nil "Verbatim macro: \\" t mapcar car apply append TeX-read-string "New verbatim macro: \\" "Based on macro" "Rec" "C" "" TeX-argument-insert TeX-read-key-val LaTeX-add-fancyvrb-macros 2 assq-delete-all assoc TeX-symbol-list ("VerbatimInput" "BVerbatimInput" "LVerbatimInput") TeX-add-symbols ([TeX-arg-key-val LaTeX-fancyvrb-key-val-options-local] LaTeX-fancyvrb-arg-file-relative) fboundp font-latex-add-keywords font-latex-setup ("[{") reference "SaveVerb" ([TeX-arg-key-val LaTeX-fancyvrb-key-val-options-local] (TeX-arg-eval (lambda nil (let ((name (TeX-read-string (TeX-argument-prompt nil nil "Save name")))) (LaTeX-add-fancyvrb-saveverbs name) (format "%s" name)))) TeX-arg-verb) ("[{") textual "UseVerb" ((TeX-arg-eval completing-read (TeX-argument-prompt nil nil "Saved name") (LaTeX-fancyvrb-saveverb-list))) ("{") ([TeX-arg-key-val LaTeX-fancyvrb-key-val-options-local] TeX-arg-verb) "*" ([TeX-arg-key-val LaTeX-fancyvrb-key-val-options-local] TeX-arg-verb) add-to-list LaTeX-verbatim-macros-with-delims-local ("*[") font-latex-set-syntactic-keywords TeX-install-font-lock] 12 (#$ . 10263)]) #@293 Query and insert a new verbatim environment with fancyvrb package. If OPTIONAL is non-nil, insert the arguments in brackets. If CLEANUP is non-nil, do not insert any arguments in the buffer and update only various AUCTeX variables for verbatim environments. (fn OPTIONAL &optional CLEANUP) (defalias 'LaTeX-fancyvrb-arg-define-environment #[513 "\211\2047\306\307\310\311#!\312\307\310\313#\"\314\"\210\314\"\210\314\315 \"\"\210\316D!\210\211\317\230\2035\320!\210\266\321 \211\203 \211@\211@A@\211\322\230\203S\323\324B!\210\202\366\211\317\230\203h\325\326\327\n\330\260\331B!\210\202\366\323\332B!\210\323\333P\334B!\210\335\336\333P\"\210\335\337\333P\340B\341#\210\335\342\343B\341#\210\335\342\333P\343B\341#\210\325\344 !\345\344\f!\346\344 !\347\350\351!\260\352B!\210\353\354!\203\366\355\356!\203\366\354\357#\360BBB\333P\357#\361BBBD!\210\344 !\345\344\f!\346P\344 !\347\350\351\362\"\260\211.\235\204\365\363.C\".\210\335\336\"\210\335\337\364B\341#\266A\266\202\2029\210\353\365!\203\365 \210\353\366!\205$8\367=\205$\366 \207" [LaTeX-fancyvrb-base-environments LaTeX-fancyvrb-key-val-options-local LaTeX-fancyvrb-key-val-skip-regexp TeX-esc TeX-grop TeX-grcl TeX-read-string TeX-argument-prompt nil "New verbatim environment" completing-read "Based on environment" TeX-argument-insert TeX-read-key-val LaTeX-add-fancyvrb-environments "SaveVerbatim" LaTeX-add-fancyvrb-saveverbatims LaTeX-fancyvrb-environment-list "VerbatimOut" LaTeX-add-environments ((lambda (env) (let ((options (TeX-read-key-val t LaTeX-fancyvrb-key-val-options-local)) (file (TeX-read-string "Output file: "))) (LaTeX-insert-environment env (concat (unless (zerop (length options)) (concat LaTeX-optop options LaTeX-optcl)) (concat TeX-grop file TeX-grcl)))))) TeX-auto-add-regexp "\\\\begin{" "}" "{\\([^}]+\\)}" (1 LaTeX-auto-fancyvrb-saveverbatim) (LaTeX-env-args [TeX-arg-key-val LaTeX-fancyvrb-key-val-options-local] LaTeX-fancyvrb-env-reflabel-key-val) "*" (LaTeX-env-args [TeX-arg-key-val LaTeX-fancyvrb-key-val-options-local] LaTeX-fancyvrb-env-reflabel-key-val) add-to-list LaTeX-verbatim-environments-local LaTeX-indent-environment-list (current-indentation) t LaTeX-label-alist LaTeX-listing-label regexp-quote "begin[[:space:]]*" "\\*?" "[[:space:]]*" LaTeX-extract-key-value-label "reflabel" (1 LaTeX-auto-label) fboundp reftex-add-label-environments boundp reftex-label-regexps 108 ("~\\pageref{%s}" LaTeX-fancyvrb-reftex-label-context-function (regexp "[Ll]isting" "[Vv]erbatim" "[Cc]ode" "Quell\\(code\\|text\\)")) ("~\\pageref{%s}" LaTeX-fancyvrb-reftex-label-context-function (regexp "[Ll]isting" "[Vv]erbatim" "[Cc]ode" "Quell\\(code\\|text\\)")) 1 append (current-indentation) reftex-compile-variables font-latex-set-syntactic-keywords font-latex-setup TeX-install-font-lock] 16 (#$ . 12752)]) #@136 Query and insert a file name relative to current master file. If OPTIONAL is non-nil, insert the file name in brackets. (fn OPTIONAL) (defalias 'LaTeX-fancyvrb-arg-file-relative #[257 "\300\301\302\303\304\305#!\306 \"\"\207" [TeX-argument-insert file-relative-name read-file-name TeX-argument-prompt nil "File" TeX-master-directory] 8 (#$ . 15616)]) #@334 Add a label value to reflabel key. This function checks if the reflabel key is given in the optional argument of a fancyvrb environment and then adds a label as value to that key. The label value is inserted only if the key is value-less; user entered label values are recognized and respected. OPTIONAL is ignored. (fn OPTIONAL) (defalias 'LaTeX-fancyvrb-env-reflabel-key-val #[257 "\303 \304 \211\212\305 \210\306\307!\310 \311#)\312\223\210\313!\203E\314\315\307 !\316Q\311#\210\317\320!\204E\317\321!\203E\321\225b\210\322 \323\324\325\326 \327\311#\"\n\261\210b\210\312\211\223\210\211\312\211\223\207" [LaTeX-optop TeX-grop TeX-grcl point-marker make-marker LaTeX-find-matching-begin re-search-forward regexp-quote line-end-position t nil marker-position re-search-backward "\\(\\\\)\\([[:space:]]*=[[:space:]]*" "?[[:alnum:]:._-]\\)?" match-string 2 1 "=" format "%s" LaTeX-label LaTeX-current-environment environment] 11 (#$ . 15977)]) #@226 Extract and return a context string for RefTeX. The context string is the first line of the verbatim environment. If no reflabel key is found, an error is issued. ENV is the name of current environment as a string. (fn ENV) (defalias 'LaTeX-fancyvrb-reftex-label-context-function #[257 "\212\301\302\303Q\304\305#)\212\301\306\305#)\211\203.\212b\210\307\310!\305#\210\311 \210\304y\210\312`\313 \")\207\314\315!\207" [LaTeX-optop re-search-backward "\\\\begin[[:space:]]*{" "}" nil t "\\