;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\207" [require tex latex] 2) #@97 Information about array-newcolumntypes in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-auto-array-newcolumntype nil (#$ . 150)) #@97 Information about array-newcolumntypes in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-array-newcolumntype-list nil (#$ . 307)) (make-variable-buffer-local 'LaTeX-array-newcolumntype-list) #@97 Information about array-newcolumntypes in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-array-newcolumntype-changed nil (#$ . 525)) (make-variable-buffer-local 'LaTeX-array-newcolumntype-changed) #@134 Add information about ARRAY-NEWCOLUMNTYPES to the current buffer. Generated by `TeX-auto-add-type'. (fn &rest ARRAY-NEWCOLUMNTYPES) (defalias 'LaTeX-add-array-newcolumntypes #[128 "\300\301\"\207" [TeX-auto-add-information "array-newcolumntype"] 4 (#$ . 750)]) #@94 List of array-newcolumntypes active in the current buffer. Generated by `TeX-auto-add-type'. (defalias 'LaTeX-array-newcolumntype-list #[0 "\300\301!\207" [TeX-auto-list-information "array-newcolumntype"] 2 (#$ . 1019)]) (byte-code "\300\301\302\303#\210\304\305\306\"\207" [add-to-list TeX-auto-parser ("array-newcolumntype" LaTeX-auto-array-newcolumntype LaTeX-add-array-newcolumntypes LaTeX-array-newcolumntype-list LaTeX-array-newcolumntype-changed) t add-hook TeX-remove-style-hook #[0 "\301\211\207" [LaTeX-array-newcolumntype-list nil] 2]] 4) #@64 Matches the argument of `\newcolumntype' from `array' package. (defvar LaTeX-array-newcolumntype-regexp '("\\\\newcolumntype{\\([^}]+\\)}" 1 LaTeX-auto-array-newcolumntype) (#$ . 1576)) #@56 Clear `LaTeX-auto-array-newcolumntype' before parsing. (defalias 'LaTeX-array-auto-prepare #[0 "\301\211\207" [LaTeX-auto-array-newcolumntype nil] 2 (#$ . 1768)]) #@105 Move parsed column specification from `LaTeX-auto-array-newcolumntype' to `LaTeX-array-column-letters'. (defalias 'LaTeX-array-auto-cleanup #[0 "\300 \205\301 \207" [LaTeX-array-newcolumntype-list LaTeX-array-update-column-letters] 1 (#$ . 1939)]) #@90 Update and uniquify the value of `LaTeX-array-column-letters' and make it buffer local.  (defalias 'LaTeX-array-update-column-letters #[0 "\301\300!\210\302\303\304\305\302\306\307 \310#P\310\311#!\310#\211\207" [LaTeX-array-column-letters make-local-variable mapconcat identity TeX-delete-duplicate-strings split-string car LaTeX-array-newcolumntype-list "" t] 9 (#$ . 2195)]) (byte-code "\301\302\303\304#\210\301\305\306\304#\210\301\307\310\304#\210\311\312\313#\207" [TeX-dialect add-hook TeX-auto-prepare-hook LaTeX-array-auto-prepare t TeX-auto-cleanup-hook LaTeX-array-auto-cleanup TeX-update-style-hook TeX-auto-parse TeX-add-style-hook "array" #[0 "\303!\210\304\305\306\307\310$\210\311\312\313\"\210\314\301!\210 \315P\316\317!\205(\n\320=\205(\321\322\323\"\207" [LaTeX-array-newcolumntype-regexp LaTeX-array-column-letters TeX-install-font-lock TeX-auto-add-regexp TeX-add-symbols ("newcolumntype" (TeX-arg-eval (lambda nil (let ((col (TeX-read-string "Column type: "))) (LaTeX-add-array-newcolumntypes col) (LaTeX-array-update-column-letters) (format "%s" col)))) ["Number of arguments"] t) ("showcols" 0) ("firsthline" 0) ("lasthline" 0) LaTeX-add-lengths "extratabsurround" "extrarowheight" make-local-variable "mbwW" featurep font-latex font-latex-setup font-latex-add-keywords (("newcolumntype" "{[{")) function] 5]] 4) #@28 Package options for array. (defvar LaTeX-array-package-options nil (#$ . 3547))