;ELC��� ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. #@32 SystemTap Mode version number. (defconst systemtap-mode-version "0.02" (#$ . 87)) (byte-code "\302\303\304\305\306\307\310\311\310\312& \210\313\314!\210\313\315!\210\316U\203%� \317Y\203%�\313\320!\210\321\303\322\"\210\323\324\325\326BC\327#\210\323\330\331\332BC\333#\210\323\334\335\336BC\337#\210\323\340\341\342BC\343#\210\323\344\345\346BC\347#\210\350\351\304\352\310\303%\207" [emacs-major-version emacs-minor-version custom-declare-group systemtap-mode nil "A mode for SystemTap." :prefix "systemtap-" :group tools languages require cc-mode cc-awk 24 4 cl c-add-language awk-mode c-define-lang-constant c-primitive-type-kwds (systemtap-mode) #[nil "\300\207" [("string" "long" "global")] 1] (cc-langs) c-modifier-kwds (systemtap-mode) #[nil "\300\301\302\303\304\"\"\207" [append ("probe" "function") c-get-lang-constant c-modifier-kwds (cc-langs)] 5] (cc-langs) c-block-stmt-2-kwds (systemtap-mode) #[nil "\300\207" [("else" "for" "foreach" "if" "while")] 1] (cc-langs) c-simple-stmt-kwds (systemtap-mode) #[nil "\300\207" [("break" "continue" "delete" "next" "return")] 1] (cc-langs) c-identifier-syntax-modifications (systemtap-mode) #[nil "\300\207" [((46 . "_") (39 . "."))] 1] (cc-langs) custom-declare-variable systemtap-font-lock-extra-types "Font-lock extra types for SystemTap mode."] 10) #@42 Minimal highlighting for SystemTap mode. (defconst systemtap-font-lock-keywords-1 (byte-code "\301=\203�\302\207\303\304\305\306#\207" [c-version-sym 5\.35\.1 ((eval list "\240" 0 (progn (unless (c-face-name-p 'c-nonbreakable-space-face) (c-make-inverse-face 'font-lock-warning-face 'c-nonbreakable-space-face)) ''c-nonbreakable-space-face))) c-get-lang-constant c-matchers-1 (cc-fonts) systemtap-mode] 4) (#$ . 1403)) #@46 Fast normal highlighting for SystemTap mode. (defconst systemtap-font-lock-keywords-2 (byte-code "\301=\203�\302\207\303\304\305\306#\207" [c-version-sym 5\.35\.1 ((eval list "\240" 0 (progn (unless (c-face-name-p 'c-nonbreakable-space-face) (c-make-inverse-face 'font-lock-warning-face 'c-nonbreakable-space-face)) ''c-nonbreakable-space-face)) ("\\s|" 0 font-lock-warning-face t nil) c-font-lock-invalid-single-quotes ("\\<\\(\\(?:break\\|c\\(?:\\(?:as\\|ontinu\\)e\\)\\|d\\(?:e\\(?:fault\\|lete\\)\\|o\\)\\|else\\|f\\(?:or\\(?:each\\)?\\|unction\\)\\|if\\|next\\|probe\\|return\\|while\\)\\)\\([^[:alnum:]_$]\\|$\\)" 1 font-lock-keyword-face) (eval list "\\(!\\)[^=]" 1 c-negation-char-face-name) (eval list #[(limit) "\304\300!\305 \n\306#\203J�\307\224b\210\310\n!\204�\307\225b\210\311 \312\216\313\314\224\314\225\315\316$\210*\311 \317\216\314\225b\210\320 \210*\311 \321\216\322\n\306\323\211$\210*\314\225b\210\202�)\323\207" [parse-sexp-lookup-properties c-known-type-key limit save-match-data-internal boundp re-search-forward t 0 c-skip-comments-and-strings match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] put-text-property 1 face font-lock-type-face #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] c-forward-sws #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] c-font-lock-declarators nil] 5])) c-get-lang-constant c-matchers-2 (cc-fonts) systemtap-mode] 4) (#$ . 1830)) #@50 Accurate normal highlighting for SystemTap mode. (defconst systemtap-font-lock-keywords-3 (byte-code "\301=\203�\302\207\303\304\305\306#\207" [c-version-sym 5\.35\.1 ((eval list "\240" 0 (progn (unless (c-face-name-p 'c-nonbreakable-space-face) (c-make-inverse-face 'font-lock-warning-face 'c-nonbreakable-space-face)) ''c-nonbreakable-space-face)) ("\\s|" 0 font-lock-warning-face t nil) c-font-lock-invalid-single-quotes ("\\<\\(\\(?:break\\|c\\(?:\\(?:as\\|ontinu\\)e\\)\\|d\\(?:e\\(?:fault\\|lete\\)\\|o\\)\\|else\\|f\\(?:or\\(?:each\\)?\\|unction\\)\\|if\\|next\\|probe\\|return\\|while\\)\\)\\([^[:alnum:]_$]\\|$\\)" 1 font-lock-keyword-face) (eval list "\\(!\\)[^=]" 1 c-negation-char-face-name) c-font-lock-complex-decl-prepare c-font-lock-cut-off-declarators c-font-lock-declarations c-font-lock-enclosing-decls c-font-lock-c++-using ("\\<\\(\\(?:global\\|\\(?:lo\\|stri\\)ng\\)\\)\\>" 1 'font-lock-type-face)) c-get-lang-constant c-matchers-3 (cc-fonts) systemtap-mode] 4) (#$ . 3332)) #@53 Default expressions to highlight in SystemTap mode. (defvar systemtap-font-lock-keywords systemtap-font-lock-keywords-3 (#$ . 4337)) #@46 Syntax table used in systemtap-mode buffers. (defvar systemtap-mode-syntax-table nil (#$ . 4476)) (byte-code "\204� \302=\203�\303\202�\304\305\306\307# \302\207" [systemtap-mode-syntax-table c-version-sym 5\.35\.1 (lambda nil (let ((table (make-syntax-table))) (c-populate-syntax-table table) nil table)) c-get-lang-constant c-make-mode-syntax-table (cc-langs) systemtap-mode] 4) #@52 Abbreviation table used in systemtap-mode buffers. (defvar systemtap-mode-abbrev-table nil (#$ . 4868)) #@40 Keymap used in systemtap-mode buffers. (defvar systemtap-mode-map (byte-code "\301 \302\303\304#\210\302\305\306#\210)\207" [map c-make-inherited-keymap define-key "e" systemtap-execute-script "c" systemtap-interrupt-script] 4) (#$ . 4978)) #@25 SystemTap Mode Commands (defvar systemtap-menu nil (#$ . 5231)) (byte-code "\302\303\304\305\306\307 \310=\203�\311\202�\312\313\314\315#\"B$\207" [systemtap-mode-map c-version-sym easy-menu-do-define systemtap-menu "SystemTap Mode Commands" "SystemTap" append (["Execute This Script" systemtap-execute-script t] ["Interrupt Execution of Script" systemtap-interrupt-script (get-process "systemtap-script")] "----") 5\.35\.1 (["Comment Out Region" comment-region (c-fn-region-is-active-p)] ["Uncomment Region" (comment-region (region-beginning) (region-end) '(4)) (c-fn-region-is-active-p)] ["Indent Expression" c-indent-exp (memq (char-after) '(40 91 123))] ["Indent Line or Region" c-indent-line-or-region t] ["Fill Comment Paragraph" c-fill-paragraph t] "----" ["Backward Statement" c-beginning-of-statement t] ["Forward Statement" c-end-of-statement t] "----" ("Style..." ["Set Style..." c-set-style t] ["Show Current Style Name" (message "Style Name: %s" c-indentation-style) t] ["Guess Style from this Buffer" c-guess-buffer-no-install t] ["Install the Last Guessed Style..." c-guess-install (and c-guess-guessed-offsets-alist c-guess-guessed-basic-offset)] ["View the Last Guessed Style" c-guess-view (and c-guess-guessed-offsets-alist c-guess-guessed-basic-offset)]) "----" ("Toggle..." ["Syntactic indentation" c-toggle-syntactic-indentation :style toggle :selected c-syntactic-indentation] ["Electric mode" c-toggle-electric-state :style toggle :selected c-electric-flag] ["Auto newline" c-toggle-auto-newline :style toggle :selected c-auto-newline] ["Hungry delete" c-toggle-hungry-state :style toggle :selected c-hungry-delete-key] ["Subword mode" c-subword-mode :style toggle :selected (and (boundp 'c-subword-mode) c-subword-mode)])) c-get-lang-constant c-mode-menu (cc-langs) systemtap-mode] 11) #@41 Name of the SystemTap execution buffer. (defvar systemtap-buffer-name "*SystemTap*" (#$ . 7050)) (byte-code "\300\301\302\303\304\305\306\307&\210\300\310\311\312\304\313\306\307&\207" [custom-declare-variable systemtap-stap-program "stap" "SystemTap's stap program to execute scripts." :type file :group systemtap-mode systemtap-stap-options '("-v") "A list of options to give to stap." (repeat string)] 8) #@35 Execute current SystemTap script. (defalias 'systemtap-execute-script #[nil "\305!\203\n�\306!\210\307!\210\310!\210\311 \312\n C\"\313\314\315\f%\210*\316\317!\207" [systemtap-buffer-name file-name systemtap-stap-options options systemtap-stap-program get-buffer kill-buffer get-buffer-create display-buffer buffer-file-name append apply start-process "systemtap-script" message "Execution of SystemTap script started."] 6 (#$ . 7466) nil]) #@37 Interrupt running SystemTap script. (defalias 'systemtap-interrupt-script #[nil "\300\301!\210\302\303!\207" [interrupt-process "systemtap-script" message "SystemTap script is interrupted."] 2 (#$ . 7922) nil]) (byte-code "\300\301\302\"\210\303\304!\207" [add-to-list auto-mode-alist ("\\.stp\\'" . systemtap-mode) require simple] 3) (defvar systemtap-mode-hook nil) (byte-code "\300\301N\204\f�\302\300\301\303#\210\304\305!\204�\302\305\306\307#\210\300\207" [systemtap-mode-hook variable-documentation put "Hook run after entering SystemTap mode.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" boundp systemtap-mode-map definition-name systemtap-mode] 4) (defvar systemtap-mode-map (make-sparse-keymap)) (byte-code "\300\301N\204�\302\300\301\303\304!#\210\302\305\306\307#\210\302\305\310\311#\207" [systemtap-mode-map variable-documentation put purecopy "Keymap for `systemtap-mode'." systemtap-mode derived-mode-parent prog-mode custom-mode-group systemtap] 5) #@253 Major mode for editing SystemTap scripts. Key bindings: \{systemtap-mode-map} In addition to any hooks its parent mode `prog-mode' might have run, this mode runs the hook `systemtap-mode-hook', as the final or penultimate step during initialization. (defalias 'systemtap-mode #[nil "\306\300!\210\307\310 \210\311\312\310\313N\203�\314\311\313\310\313N#\210\315!\204'�\316\317 \"\210\320!\210\321\f!\210 @\322\307!\210\320!\210\311\323\211ABC\306\324!\210\306\325!\210\306\326!\210\306\327!\210\306\330!\210\306\331!\210\306\332!\210\3331sD\334=\203;\324B\335\325B\336\326B\337\327B\340\330B\323\331B\341\332B\342\343B\323#\344B\345$\346B\347\350\211C\204\257�\351\352!\210C\353N\211\204\275�\351\354C\"\210\355P!\266\202J\262!$\323EFGF\203\356�F@EFAF\356E@EAG#\210\202\321�G+&\357B\360\211H<\203H\202HC)/\361B\362\211H<\203H\202HC)1\363B\364\211H<\203/H\2022HC)3\365B\3665\367B\3707\371B\3239\372B\323:\373B\374;\375B\323=\376B\323>\377B\323?\201I�B\201\372�I\201J�B\201\373�J\201K�B\201\374�K\201L�B\201\375�L\201M�B\201\376�M\201N�B\201\377�N\201O�B\323O\201P�B\201\372�P\201Q�B\201�Q\201R�B\323R\201S�B\323S\201T�B\201T\201U�B\323U\201V�B\323V\201W�B\323W\201X�B\323X\201Y�B\335Y\201Z�B\323Z\201[�B\323[\201\\�B\323\\\201]�B\323]\201^�B\201^\201_�B\201_\201`�B\201`\201a�B\323a\201b�B\323b\201c�B\201c\201d�B\201d\201e�B\201e\201f�B\201f\201g�B\335g\201h�B\201h\201i�B\201 i\201j�B\335j\201k�B\201\nk\201l�B\201l\201m�B\201\fm\201n�B\201 n\201o�B\335o\201p�B\201p\201q�B\201q\201r�B\201r\201s�B\201s\201t�B\201t\201u�B\201u\201v�B\201v\201w�B\335w\201x�B\335x\201y�B\201y\201z�B\201z\201{�B\201{\201|�B\323|\201}�B\323}\201~�B\335~\201�B\323\201\200�B\201\200\201\201�B\335\201\201\202�B\201\202\201\203�B\323\203\201\204�B\201\204\201\205�B\335\205\201\206�B\323\206\201\207�B\201\207\201\210�B\201\210\201\211�B\201\211\201\212�B\201\212\201\213�B\201\213\201\214�B\201\214\201\215�B\201\215\201\216�B\201\216\201\217�B\201\217\201\220�B\201\220\201\221�B\201\221\201\222�B\323\222\201\223�B\323\223\201\224�B\323\224\201\225�B\201\225\201\226�B\201\226\201\227�B\201\227\201\230�B\201\230\201\231�B\201\231\201\232�B\323\232\201\233�B\201\233\201\234�B\201\201\323\"\234\201\235�B\201\235\201\236�B\201\236\201\237�B\201\237\201\240�B\201\240\201\241�B\201\241\201\242�B\201\242\201\243�B\201\243\201\244�B\201\244\201\245�B\201 \245\201\246�B\201!\246\201\247�B\201\247\201\250�B\323\250\201\251�B\323\251\201\252�B\201\252\201\253�B\201\253\201\254�B\323\254\201\255�B\201\255\201\256�B\201\256\201\257�B\201\257\201\260�B\201\"\260\201\261�B\201\261\201\262�B\201#\262\201\263�B\201\263\201\264�B\201$\264\201\265�B\201%\265\201\266�B\201&\266\201\267�B\323\267\201\270�B\201'\270\201\271�B\201(\271\201\272�B\323\272\201\273�B\201)\273\201\274�B\201*\274\201\275�B\201\275\201\276�B\323\276\201\277�B\201+\277\201\300�B\201,\300\201\301�B\201-\301\201\306�B\201.\302\323\211\303\304\201/\302G\2010_\201\n\"\305\302\203.\302@@\303\302@A\304\302A\302\2011\355\303\305\"\2012\2013\201\2014\304\"\"\"\210\202\372\305,\306\201\307�B\201!\307\201\310�B\2015\310\201\311�B\335\311\201\312�B\2016\312\201\313�B\201\372�\313\201\314�B\2016\314\201\315�B\323\315\201\316�B\2017\316\201\317�B\2018\317\201\320�B\2019\320\201\321�B\335\321\201\322�B\201:\322\201\323�B\201;\323\201\324�B\201<\324\201\325�B\323\325\201\326�B\323\326\201\332�B\201=\201>C\204\335\351\352!\210C\353N\211\204\353\351\354C\"\210\355P!\266\202!\205\201>\211C\204\351\352!\210C\353N\211\204\351\354C\"\210\355P!\266\202J\262\327\201?\323\201\201@\327\"\"\330\201?\323\201\201A\327\"\"\331\201B\201C\201D\201E\323\201D\201F\331\"\"C\330\"\201G\"\201HQ+\332\201\333�B\323\333\201\334�B\323\334\201\335�B\201\335\201\336�B\335\336\201\337�B\323\337\201\340�B\323\340\201\341�B\201I\341\201\342�B\335\342\201\343�B\323\343\201\344�B\323\344\201\345�B\323\345\201\346�B\323\346\201\347�B\323\347\201\350�B\323\350\201\351�B\323\351\201\352�B\323\352\201\353�B\201J\353\201\354�B\201K\354\201\355�B\201K\355\201\356�B\335\356\201\357�B\323\357\201\360�B\323\360\201\361�B\323\361\201\362�B\307\362\201\363�B\201L\211\363\202n\307A\201M\211\364\323\365\211\366\205m\366@\211\365@B\365@\201N\365A@!L\210\366A\211\366\204M\323+0\210\202\252\367B\203\236\201O\201PBA\203\227\201Q\201R\311\201S\370$\202\230\337\367$\202\250\201T\367@\367A\")\210+\201U\311!\210\201V\371!\210\201W\201X!\210\201Y \210)\201W\201Z!\207" [delay-mode-hooks major-mode mode-name systemtap-mode-map systemtap-mode-syntax-table systemtap-mode-abbrev-table make-local-variable t prog-mode systemtap-mode "SystemTap" mode-class put keymap-parent set-keymap-parent current-local-map use-local-map set-syntax-table c-initialize-cc-mode nil font-lock-comment-end-skip comment-start comment-end comment-start-skip comment-end-can-be-escaped beginning-of-defun-function end-of-defun-function (error) 5\.35\.1 "\\`a\\`" "# " "" "\\(?:#+\\)\\s *" c-awk-beginning-of-defun c-awk-end-of-defun c-no-parens-syntax-table c-identifier-syntax-modifications ((46 . "_") (39 . ".")) c-identifier-syntax-table copy-syntax-table #4="mode-syntax-table" error "Not inside a CC Mode based mode" c-mode-prefix "%S has no mode prefix known to `c-mode-symbol'" intern modify-syntax-entry c-get-state-before-change-functions c-awk-record-region-clear-NL c-before-font-lock-functions (c-depropertize-new-text c-awk-extend-and-syntax-tablify-region) c-before-context-fontification-functions c-awk-context-expand-fl-region c-at-vsemi-p-fn c-awk-at-vsemi-p c-vsemi-status-unknown-p-fn c-awk-vsemi-status-unknown-p c-has-bitfields c-single-quotes-quote-strings c-string-delims (34) c-has-quoted-numbers c-has-compound-literals c-modified-constant local-abbrev-table source-eval current-var c-buffer-is-cc-mode c-version-sym mod mods table fs c-symbol-start c-symbol-chars c-symbol-char-key c-symbol-key c-nonsymbol-chars c-nonsymbol-key c-opt-identifier-concat-key c-identifier-start c-identifier-key c-string-escaped-newlines c-multiline-string-start-char c-string-innards-re-alist c-opt-cpp-symbol c-opt-cpp-prefix c-anchored-cpp-prefix c-opt-cpp-start c-cpp-include-key c-opt-cpp-macro-define c-opt-cpp-macro-define-start c-opt-cpp-macro-define-id c-cpp-expr-intro-re c-cpp-expr-functions-key c-operator-re c-non-after-{}-ops-re c-overloadable-operators-regexp c-opt-op-identifier-prefix c-ambiguous-overloadable-or-identifier-prefix-re c-nonsymbol-token-regexp c-assignment-op-regexp c-arithmetic-op-regexp c-:$-multichar-token-regexp c-<>-multichar-token-regexp c-<-op-cont-regexp c-<-pseudo-digraph-cont-regexp c-<-pseudo-digraph-cont-len c->-op-cont-regexp c->-op-without->-cont-regexp c-multichar->-op-not->>->>>-regexp c-:-op-cont-regexp c-stmt-delim-chars c-stmt-boundary-skip-chars c-stmt-boundary-skip-list c-stmt-delim-chars-with-comma c-stmt-boundary-skip-chars-with-comma c-stmt-boundary-skip-list-with-comma c-pack-key c-auto-ops-re c-haskell-op-re c-pre-start-tokens c-pre-lambda-tokens-re c-line-comment-starter c-block-comment-starter c-block-comment-ender c-block-comment-ender-regexp c-block-comment-awkward-chars c-comment-start-regexp c-block-comment-start-regexp c-line-comment-start-regexp c-last-c-comment-end-on-line-re c-literal-start-regexp c-doc-comment-start-regexp c-block-comment-is-default c-syntactic-ws-start c-syntactic-ws-end c-syntactic-eol c-paragraph-start c-paragraph-separate c-return-key c-primitive-type-key c-typedef-key c-typeof-key c-template-typename-key c-type-prefix-key c-opt-type-modifier-prefix-key c-opt-type-modifier-key c-opt-type-component-key c-type-decl-suffix-ws-ids-key c-class-id-suffix-ws-ids-key c-class-key c-brace-list-key c-after-brace-list-key c-recognize-post-brace-list-type-p c-other-decl-block-key c-other-decl-block-key-in-symbols-alist c-defun-type-name-decl-key c-typedef-decl-key c-using-key c-no-type-key c-equals-type-clause-key c-decl-hangon-key c-prefix-spec-kwds-re c-specifier-key c-not-decl-init-keywords c-not-primitive-type-keywords-regexp c-protection-key c-post-protection-token c-opt-block-decls-with-vars-key c-postfix-decl-spec-key c-make-top-level-key c-colon-type-list-re c-paren-nontype-key c-opt-<>-sexp-key c-inside-<>-type-key c-block-stmt-1-key c-block-stmt-1-2-key c-block-stmt-2-key c-block-stmt-hangon-key c-opt-block-stmt-key c-simple-stmt-key c-paren-stmt-key c-opt-asm-stmt-key c-case-kwds-regexp c-label-kwds-regexp c-opt-inexpr-brace-list-key c-brace-stack-thing-key c-brace-stack-no-semi-key c-decl-block-key c-opt-bitfield-key c-std-abbrev-keywords c-keywords-regexp c-stmt-block-only-keywords-regexp alist kwd lang-const-list obarray c-keywords-obarray c-regular-keywords-regexp c-primary-expr-regexp c-decl-start-colon-kwd-re c-decl-prefix-re c-decl-start-re c-decl-prefix-or-start-re c-dposr-cpp-macro-depth c-cast-parens c-block-prefix-charset c-type-decl-prefix-key c-type-decl-operator-prefix-key c-type-decl-suffix-key c-after-suffixed-type-decl-key c-after-suffixed-type-maybe-decl-key c-opt-type-concat-key c-opt-type-suffix-key extra-types regexp-strings plain-strings c-known-type-key c-special-brace-lists c-recognize-knr-p c-pre-id-bracelist-key c-pre-brace-non-bracelist-key c-recognize-typeless-decls c-recognize-<>-arglists c-<>-notable-chars-re c-enum-clause-introduction-re c-enums-contain-decls c-recognize-paren-inits c-recognize-bare-brace-inits c-recognize-paren-inexpr-blocks c-opt-<>-arglist-start c-opt-<>-arglist-start-in-paren c-opt-postfix-decl-spec-key c-recognize-colon-labels c-label-prefix-re c-nonlabel-token-key c-nonlabel-nonparen-token-key c-nonlabel-token-2-key c-opt-extra-label-key c-opt-friend-key c-opt-method-key c-type-decl-end-used c-maybe-decl-faces init var-init --dolist-tail-- err c-version systemtap-menu "[[:alpha:]_]" "[:alnum:]_$" "[[:alnum:]_$]+" "[[:alpha:]_][[:alnum:]_$]*" "^[:alnum:]_$" "[^[:alnum:]_$]" "\\([[:alpha:]_][[:alnum:]_$]*\\)" ((34 . "\\(\\\\\\(.\\|\n\\)\\|[^\\\n \"]\\)*")) "\\(\\`a\\`\\)" "\\(?:!=\\|%=\\|&[&=]\\|\\*=\\|\\+[+=]\\|-[=>-]\\|/=\\|<\\(?:<=\\|[<=]\\)\\|==\\|>\\(?:>=\\|[=>]\\)\\|\\^=\\||[=|]\\|[]!%&(-,./:<-?[|~^-]\\)" "\\(?:!=\\|%=\\|&[&=]\\|\\*=\\|\\+=\\|-[=>]\\|/=\\|<\\(?:<=\\|[<=]\\)\\|==\\|>\\(?:>=\\|[=>]\\)\\|\\^=\\||[=|]\\|[%&*,.:<-?|^]\\)" "\\(?:!=\\|%=\\|&[&=]\\|\\*=\\|\\+[+=]\\|-[=>-]\\|/=\\|<\\(?:<=\\|[<=]\\)\\|==\\|>\\(?:>=\\|[=>]\\)\\|\\^=\\||[=|]\\|[!%&*+,./:-?|~^-]\\)" "=\\([^=]\\|$\\)\\|\\(?:\\(?:<<\\|>>\\|[%&*+/|^-]\\)=\\)" "\\(?:!=\\|%=\\|&[&=]\\|\\*=\\|\\+=\\|-=\\|/=\\|<\\(?:<=\\|[<=]\\)\\|==\\|>\\(?:>=\\|[=>]\\)\\|\\^=\\||[=|]\\|[%&*+/<=>|^-]\\)" "\\(?:->\\|<\\(?:<=\\|[<=]\\)\\|>\\(?:>=\\|[=>]\\)\\)" "\\(?:<=\\|[<=]\\)" 0 "\\(?:>=\\|[=>]\\)" "=" "\\(?:->\\|>\\(?:>?=\\)\\)" "^;{}?:" (59 123 125 63 58) "^;,{}?:" (59 44 123 125 63 58) (";" "{" "}") "\\(\\(?:!=\\|%=\\|&[&=]\\|\\*=\\|\\+[+=]\\|-[=-]\\|/=\\|<\\(?:<=\\|[<=]\\)\\|==\\|>\\(?:>=\\|[=>]\\)\\|\\^=\\||[=|]\\|[!%&(*+,/:-?[{-~^-]\\)\\)\\([^[:alnum:]_$]\\|$\\)" "#" "#\\|\\s!" "#\\|\\s!\\|\"\\|\\s|" "\\s \\|[\n #]\\|\\\\[\n ]\\|\\s!" "\\s \\|[\n ]\\|\\s!" "\\s *\\(#\\|\\\\$\\|$\\)" "$" "\\(\\(?:return\\)\\)\\([^[:alnum:]_$]\\|$\\)" "\\(\\(?:global\\|\\(?:lo\\|stri\\)ng\\)\\)\\([^[:alnum:]_$]\\|$\\)" mapcar #[#5=(elt) "\211\301\230\203�\302\202�\303\304P!B\207" [elt #6="extern" inextern-lang intern #7="in"] 4] "\\(\\(?:function\\|probe\\)\\)\\([^[:alnum:]_$]\\|$\\)" "\\(\\(?:break\\|c\\(?:\\(?:as\\|ontinu\\)e\\)\\|d\\(?:e\\(?:fault\\|lete\\)\\|o\\)\\|else\\|for\\(?:each\\)?\\|if\\|next\\|return\\|while\\)\\)\\([^[:alnum:]_$]\\|$\\)" "\\(\\(?:break\\|c\\(?:\\(?:as\\|ontinu\\)e\\)\\|d\\(?:e\\(?:fault\\|lete\\)\\|o\\)\\|else\\|f\\(?:or\\(?:each\\)?\\|unction\\)\\|if\\|next\\|probe\\|return\\|while\\)\\)\\([^[:alnum:]_$]\\|$\\)" "\\(\\(?:do\\|else\\)\\)\\([^[:alnum:]_$]\\|$\\)" "\\(\\(?:else\\|for\\(?:each\\)?\\|if\\|while\\)\\)\\([^[:alnum:]_$]\\|$\\)" "\\(\\(?:do\\|else\\|for\\(?:each\\)?\\|if\\|while\\)\\)\\([^[:alnum:]_$]\\|$\\)" "\\(\\(?:break\\|continue\\|delete\\|next\\|return\\)\\)\\([^[:alnum:]_$]\\|$\\)" "\\(\\(?:for\\)\\)\\([^[:alnum:]_$]\\|$\\)" "\\(\\(?:case\\)\\)\\([^[:alnum:]_$]\\|$\\)" "\\(\\(?:case\\|default\\)\\)\\([^[:alnum:]_$]\\|$\\)" "\\([),:;{}]\\)" "\\([{}]\\)" ("else" "while") "\\(\\(?:break\\|c\\(?:\\(?:as\\|ontinu\\)e\\)\\|d\\(?:e\\(?:fault\\|lete\\)\\|o\\)\\|else\\|f\\(?:or\\(?:each\\)?\\|unction\\)\\|global\\|if\\|long\\|next\\|probe\\|return\\|string\\|while\\)\\)\\([^[:alnum:]_$]\\|$\\)" "\\(^\\|\\=\\|[^[:alnum:]_$]\\)\\(\\(?:break\\|c\\(?:\\(?:as\\|ontinu\\)e\\)\\|d\\(?:e\\(?:fault\\|lete\\)\\|o\\)\\|else\\|f\\(?:or\\(?:each\\)?\\|unction\\)\\|if\\|next\\|probe\\|return\\|while\\)\\)\\([^[:alnum:]_$]\\|$\\)" (("default" c-label-kwds) ("case" c-case-kwds c-label-kwds) ("while" c-block-stmt-2-kwds c-block-stmt-kwds) ("if" c-block-stmt-2-kwds c-block-stmt-kwds) ("foreach" c-block-stmt-2-kwds c-block-stmt-kwds) ("for" c-block-stmt-2-kwds c-paren-stmt-kwds c-block-stmt-kwds) ("else" c-block-stmt-2-kwds c-block-stmt-1-kwds c-block-stmt-kwds) ("do" c-block-stmt-1-kwds c-block-stmt-kwds) ("return" c-return-kwds c-simple-stmt-kwds) ("next" c-simple-stmt-kwds) ("delete" c-simple-stmt-kwds) ("continue" c-simple-stmt-kwds) ("break" c-simple-stmt-kwds) (#3="global" c-type-start-kwds c-primitive-type-kwds) (#2="long" c-type-start-kwds c-primitive-type-kwds) (#1="string" c-type-start-kwds c-primitive-type-kwds) ("function" c-modifier-kwds c-prefix-spec-kwds) ("probe" c-modifier-kwds c-prefix-spec-kwds)) make-vector 2 setplist apply nconc #[#8=(lang-const) "\301D\207" [lang-const t] 2] "\\(\\(\\`a\\`\\)\\|\\(?:\\+\\+\\|--\\|[(+-]\\)\\)\\|[[:alpha:]_]\\|\\.?[0-9]\\|[!~]\\|\\s\"\\|\\s|" "\\([{}();,]+\\)" (40) "^!-#%-/:-@[-^`{-~" "\\(\\`a\\`\\)\\|\\(function\\|probe\\)\\>\\([^_]\\|$\\)" "\\((\\)" "{" "\\({\\)\\|[;,]" boundp #9="font-lock-extra-types" delq #[#10=(re) "\301\302\"\205�\207" [re string-match #11="[][.*+?^$\\]"] 3] #[#12=(re) "\301\302\"?\205 �\207" [re string-match #13="[][.*+?^$\\]"] 3] #14="\\<\\(" c-concat-separated append c-make-keywords-re (#1# #2# #3#) #15="\\|" #16="\\)\\>" "[<;{},|+&>)-]" "\\([{};]+\\)" "\\(\\(?:break\\|continue\\|d\\(?:elete\\|o\\)\\|else\\|f\\(?:or\\(?:each\\)?\\|unction\\)\\|global\\|if\\|long\\|next\\|probe\\|return\\|string\\|while\\)\\)\\([^[:alnum:]_$]\\|$\\)" (list nil font-lock-type-face c-reference-face-name font-lock-keyword-face) ((font-lock-comment-end-skip (c-lang-const c-font-lock-comment-end-skip)) (comment-start (c-lang-const comment-start)) (comment-end (c-lang-const comment-end)) (comment-start-skip (c-lang-const comment-start-skip)) (comment-end-can-be-escaped (c-lang-const comment-end-can-be-escaped)) (beginning-of-defun-function (c-lang-const beginning-of-defun-function)) (end-of-defun-function (c-lang-const end-of-defun-function)) (c-no-parens-syntax-table (and (c-lang-const c-make-no-parens-syntax-table) (funcall (eval (c-lang-const c-make-no-parens-syntax-table)))) nil) (c-identifier-syntax-modifications (c-lang-const c-identifier-syntax-modifications) "A list that describes the modifications that should be done to the\nmode syntax table to get a syntax table that matches all identifiers\nand keywords as words.\n\nThe list is just like the one used in `font-lock-defaults': Each\nelement is a cons where the car is the character to modify and the cdr\nthe new syntax, as accepted by `modify-syntax-entry'.") (c-identifier-syntax-table (let ((table (copy-syntax-table (c-mode-var #4#))) (mods c-identifier-syntax-modifications) mod) (while mods (setq mod (car mods) mods (cdr mods)) (modify-syntax-entry (car mod) (cdr mod) table)) table) "Syntax table built on the mode syntax table but additionally\nclassifies symbol constituents like `_' and `$' as word constituents,\nso that all identifiers are recognized as words.") (c-get-state-before-change-functions (let ((fs (c-lang-const c-get-state-before-change-functions))) (if (listp fs) fs (list fs))) "If non-nil, a list of functions called from c-before-change-hook.\nTypically these will record enough state to allow\n`c-before-font-lock-functions' to extend the region to fontify,\nand may do such things as removing text-properties which must be\nrecalculated.\n\nThese functions will be run in the order given. Each of them\ntakes 2 parameters, the BEG and END supplied to every\nbefore-change function; on entry, the buffer will have been\nwidened and match-data will have been saved; point is undefined\non both entry and exit; the return value is ignored.\n\nThe functions are called even when font locking isn't enabled.\n\nWhen the mode is initialized, the functions are called with\nparameters (point-min) and (point-max).") (c-before-font-lock-functions (let ((fs (c-lang-const c-before-font-lock-functions))) (if (listp fs) fs (list fs))) "If non-nil, a list of functions called just before font locking.\nTypically they will extend the region about to be fontified (see\nbelow) and will set `syntax-table' text properties on the region.\n\nThese functions will be run in the order given. Each of them\ntakes 3 parameters, the BEG, END, and OLD-LEN supplied to every\nafter-change function; point is undefined on both entry and exit;\non entry, the buffer will have been widened and match-data will\nhave been saved; the return value is ignored.\n\nThe functions may extend the region to be fontified by setting the\nbuffer local variables c-new-BEG and c-new-END.\n\nThe functions are called even when font locking is disabled.\n\nWhen the mode is initialized, these functions are called with\nparameters (point-min), (point-max) and <buffer size>.") (c-before-context-fontification-functions (let ((fs (c-lang-const c-before-context-fontification-functions))) (if (listp fs) fs (list fs))) "If non-nil, a list of functions called just before context (or\nother non-change) fontification is done. Typically they will\nextend the region.\n\nThese functions will be run in the order given. Each of them\ntakes 2 parameters, the BEG and END of the region to be\nfontified. Point is undefined on both entry and exit. On entry,\nthe buffer will have been widened and match-data will have been\nsaved; the return value is a cons of the adjusted\nregion, (NEW-BEG . NEW-END).") (c-at-vsemi-p-fn (c-lang-const c-at-vsemi-p-fn) "Contains a function \"Is there a virtual semicolon at POS or point?\".\nSuch a function takes one optional parameter, a buffer position (defaults to\npoint), and returns nil or t. This variable contains nil for languages which\ndon't have EOL terminated statements. ") (c-vsemi-status-unknown-p-fn (c-lang-const c-vsemi-status-unknown-p-fn) "A function \"are we unsure whether there is a virtual semicolon on this line?\".\nThe (admittedly kludgy) purpose of such a function is to prevent an infinite\nrecursion in c-beginning-of-statement-1 when point starts at a `while' token.\nThe function MUST NOT UNDER ANY CIRCUMSTANCES call `c-beginning-of-statement-1',\neven indirectly. This variable contains nil for languages which don't have\nEOL terminated statements.") (c-has-bitfields (c-lang-const c-has-bitfields) "Whether the language has bitfield declarations.") (c-single-quotes-quote-strings (c-lang-const c-single-quotes-quote-strings) "Whether the language uses single quotes for multi-char strings.\n\nNote that to set up a language to use this, additionally:\n(i) the syntax of \"'\" must be \"string quote\" (7);\n(ii) the language's value of `c-has-quoted-numbers' must be nil;\n(iii) the language's value of `c-get-state-before-change-functions' may not\n contain `c-parse-quotes-before-change';\n(iv) the language's value of `c-before-font-lock-functions' may not contain\n `c-parse-quotes-after-change'.") (c-string-delims (c-lang-const c-string-delims) nil) (c-has-quoted-numbers (c-lang-const c-has-quoted-numbers) "Whether the language has numbers quoted like 4'294'967'295.") (c-has-compound-literals (c-lang-const c-has-compound-literals) "Whether literal initializers {...} are used other than in initializations.") (c-modified-constant (c-lang-const c-modified-constant) "Regexp that matches a “modified†constant literal such as \"L\\='a\\='\",\na “long characterâ€. In particular, this recognizes forms of constant\nwhich `c-backward-sexp' needs to be called twice to move backwards over.") (c-symbol-start (c-lang-const c-symbol-start) "Regexp that matches the start of a symbol, i.e. any identifier or\nkeyword. It's unspecified how far it matches. Does not contain a \\|\noperator at the top level.") (c-symbol-chars (c-lang-const c-symbol-chars) "Set of characters that can be part of a symbol.\nThis is of the form that fits inside [ ] in a regexp.") (c-symbol-char-key (c-lang-const c-symbol-char-key) "Regexp matching a sequence of at least one identifier character.") (c-symbol-key (c-lang-const c-symbol-key) "Regexp matching identifiers and keywords (with submatch 0). Assumed\nto match if `c-symbol-start' matches on the same position.") (c-nonsymbol-chars (c-lang-const c-nonsymbol-chars) "This is the set of chars that can't be part of a symbol, i.e. the\nnegation of `c-symbol-chars'.") (c-nonsymbol-key (c-lang-const c-nonsymbol-key) "Regexp that matches any character that can't be part of a symbol.\nIt's usually appended to other regexps to avoid matching a prefix.\nIt's assumed to not contain any submatchers.") (c-opt-identifier-concat-key (c-lang-const c-opt-identifier-concat-key) nil) (c-identifier-start (c-lang-const c-identifier-start) "Regexp that matches the start of an (optionally qualified) identifier.\nIt should also match all keywords. It's unspecified how far it\nmatches.") (c-identifier-key (c-lang-const c-identifier-key) "Regexp matching a fully qualified identifier, like \"A::B::c\" in\nC++. It does not recognize the full range of syntactic whitespace\nbetween the tokens; `c-forward-name' has to be used for that. It\nshould also not match identifiers containing parenthesis groupings,\ne.g. identifiers with template arguments such as \"A<X,Y>\" in C++.") (c-string-escaped-newlines (c-lang-const c-string-escaped-newlines) "Set if the language support backslash escaped newlines inside string\nliterals.") (c-multiline-string-start-char (c-lang-const c-multiline-string-start-char) "Set if the language supports multiline string literals without escaped\nnewlines. If t, all string literals are multiline. If a character,\nonly literals where the open quote is immediately preceded by that\nliteral are multiline.") (c-string-innards-re-alist (c-lang-const c-string-innards-re-alist) nil) (c-opt-cpp-symbol (c-lang-const c-opt-cpp-symbol) "The symbol which starts preprocessor constructs when in the margin.") (c-opt-cpp-prefix (c-lang-const c-opt-cpp-prefix) "Regexp matching the prefix of a cpp directive in the languages that\nnormally use that macro preprocessor. Tested at bol or at boi.\nAssumed to not contain any submatches or \\| operators.") (c-anchored-cpp-prefix (c-lang-const c-anchored-cpp-prefix) "Regexp matching the prefix of a cpp directive anchored to BOL,\nin the languages that have a macro preprocessor.") (c-opt-cpp-start (c-lang-const c-opt-cpp-start) "Regexp matching the prefix of a cpp directive including the directive\nname, or nil in languages without preprocessor support. The first\nsubmatch surrounds the directive name.") (c-cpp-include-key (c-lang-const c-cpp-include-key) nil) (c-opt-cpp-macro-define (c-lang-const c-opt-cpp-macro-define) "Cpp directive (without the prefix) that is followed by a macro\ndefinition, or nil if the language doesn't have any.") (c-opt-cpp-macro-define-start (c-lang-const c-opt-cpp-macro-define-start) nil) (c-opt-cpp-macro-define-id (c-lang-const c-opt-cpp-macro-define-id) nil) (c-cpp-expr-intro-re (c-lang-const c-cpp-expr-intro-re) "Regexp which matches the start of a CPP directive which contains an\nexpression, or nil if there aren't any in the language.") (c-cpp-expr-functions-key (c-lang-const c-cpp-expr-functions-key) nil) (c-operator-re (c-lang-const c-operator-re) nil) (c-non-after-{}-ops-re (c-lang-const c-non-after-{}-ops-re) nil) (c-overloadable-operators-regexp (c-lang-const c-overloadable-operators-regexp) nil) (c-opt-op-identifier-prefix (c-lang-const c-opt-op-identifier-prefix) "Regexp matching the token before the ones in\n`c-overloadable-operators' when operators are specified in their\n\"identifier form\". This typically matches \"operator\" in C++ where\noperator functions are specified as e.g. \"operator +\". It's nil in\nlanguages without operator functions or where the complete operator\nidentifier is listed in `c-overloadable-operators'.\n\nThis regexp is assumed to not match any non-operator identifier.") (c-ambiguous-overloadable-or-identifier-prefix-re (c-lang-const c-ambiguous-overloadable-or-identifier-prefix-re) nil) (c-nonsymbol-token-regexp (c-lang-const c-nonsymbol-token-regexp) nil) (c-assignment-op-regexp (c-lang-const c-assignment-op-regexp) nil) (c-arithmetic-op-regexp (c-lang-const c-arithmetic-op-regexp) nil) (c-:$-multichar-token-regexp (c-lang-const c-:$-multichar-token-regexp) nil) (c-<>-multichar-token-regexp (c-lang-const c-<>-multichar-token-regexp) nil) (c-<-op-cont-regexp (c-lang-const c-<-op-cont-regexp) nil) (c-<-pseudo-digraph-cont-regexp (c-lang-const c-<-pseudo-digraph-cont-regexp) "Regexp matching the continuation of a pseudo digraph starting \"<\".\nThis is used only in C++ Mode, where \"<::\" is handled as a\ntemplate opener followed by the \"::\" operator - usually.") (c-<-pseudo-digraph-cont-len (c-lang-const c-<-pseudo-digraph-cont-len) "The maximum length of the main bit of a `c-<-pseudo-digraph-cont-regexp' match.\nThis doesn't count the merely contextual bits of the regexp match.") (c->-op-cont-regexp (c-lang-const c->-op-cont-regexp) nil) (c->-op-without->-cont-regexp (c-lang-const c->-op-without->-cont-regexp) nil) (c-multichar->-op-not->>->>>-regexp (c-lang-const c-multichar->-op-not->>->>>-regexp) nil) (c-:-op-cont-regexp (c-lang-const c-:-op-cont-regexp) nil) (c-stmt-delim-chars (c-lang-const c-stmt-delim-chars) nil) (c-stmt-boundary-skip-chars (c-lang-const c-stmt-boundary-skip-chars) nil) (c-stmt-boundary-skip-list (c-lang-const c-stmt-boundary-skip-list) nil) (c-stmt-delim-chars-with-comma (c-lang-const c-stmt-delim-chars-with-comma) nil) (c-stmt-boundary-skip-chars-with-comma (c-lang-const c-stmt-boundary-skip-chars-with-comma) nil) (c-stmt-boundary-skip-list-with-comma (c-lang-const c-stmt-boundary-skip-list-with-comma) nil) (c-pack-key (c-lang-const c-pack-key) nil) (c-auto-ops-re (c-lang-const c-auto-ops-re) nil) (c-haskell-op-re (c-lang-const c-haskell-op-re) nil) (c-pre-start-tokens (c-lang-const c-pre-start-tokens) "List of operators following which an apparent declaration (e.g.\n\"t1 *fn (t2 *b);\") is most likely to be an actual declaration\n(as opposed to an arithmetic expression).") (c-pre-lambda-tokens-re (c-lang-const c-pre-lambda-tokens-re) nil) (c-line-comment-starter (c-lang-const c-line-comment-starter) "String that starts line comments, or nil if such don't exist.\nLine comments are always terminated by newlines. At least one of\n`c-block-comment-starter' and this one is assumed to be set.\n\nNote that it's currently not enough to set this to support a new\ncomment style. Other stuff like the syntax table must also be set up\nproperly.") (c-block-comment-starter (c-lang-const c-block-comment-starter) "String that starts block comments, or nil if such don't exist.\nBlock comments are ended by `c-block-comment-ender', which is assumed\nto be set if this is. At least one of `c-line-comment-starter' and\nthis one is assumed to be set.\n\nNote that it's currently not enough to set this to support a new\ncomment style. Other stuff like the syntax table must also be set up\nproperly.") (c-block-comment-ender (c-lang-const c-block-comment-ender) "String that ends block comments, or nil if such don't exist.\n\nNote that it's currently not enough to set this to support a new\ncomment style. Other stuff like the syntax table must also be set up\nproperly.") (c-block-comment-ender-regexp (c-lang-const c-block-comment-ender-regexp) nil) (c-block-comment-awkward-chars (c-lang-const c-block-comment-awkward-chars) "List of characters which, inside a block comment, could be the first\ncharacter of a double character construct. This doesn't include\nbackslash.") (c-comment-start-regexp (c-lang-const c-comment-start-regexp) nil) (c-block-comment-start-regexp (c-lang-const c-block-comment-start-regexp) nil) (c-line-comment-start-regexp (c-lang-const c-line-comment-start-regexp) nil) (c-last-c-comment-end-on-line-re (c-lang-const c-last-c-comment-end-on-line-re) "Regexp which matches the last block comment ender on the\ncurrent line, if any, or nil in those languages without block\ncomments. When a match is found, submatch 1 contains the comment\nender.") (c-literal-start-regexp (c-lang-const c-literal-start-regexp) nil) (c-doc-comment-start-regexp (c-lang-const c-doc-comment-start-regexp) "Regexp to match the start of documentation comments.") (c-block-comment-is-default (c-lang-const c-block-comment-is-default) "Non-nil when the default comment style is block comment.") (c-syntactic-ws-start (c-lang-const c-syntactic-ws-start) nil) (c-syntactic-ws-end (c-lang-const c-syntactic-ws-end) nil) (c-syntactic-eol (c-lang-const c-syntactic-eol) nil) (c-paragraph-start (c-lang-const c-paragraph-start) "Regexp to append to `paragraph-start'.") (c-paragraph-separate (c-lang-const c-paragraph-separate) "Regexp to append to `paragraph-separate'.") (c-return-key (c-lang-const c-return-key) nil) (c-primitive-type-key (c-lang-const c-primitive-type-key) nil) (c-typedef-key (c-lang-const c-typedef-key) nil) (c-typeof-key (c-lang-const c-typeof-key) nil) (c-template-typename-key (c-lang-const c-template-typename-key) nil) (c-type-prefix-key (c-lang-const c-type-prefix-key) nil) (c-opt-type-modifier-prefix-key (c-lang-const c-opt-type-modifier-prefix-key) nil) (c-opt-type-modifier-key (c-lang-const c-opt-type-modifier-key) nil) (c-opt-type-component-key (c-lang-const c-opt-type-component-key) nil) (c-type-decl-suffix-ws-ids-key (c-lang-const c-type-decl-suffix-ws-ids-key) nil) (c-class-id-suffix-ws-ids-key (c-lang-const c-class-id-suffix-ws-ids-key) nil) (c-class-key (c-lang-const c-class-key) nil) (c-brace-list-key (c-lang-const c-brace-list-key) nil) (c-after-brace-list-key (c-lang-const c-after-brace-list-key) nil) (c-recognize-post-brace-list-type-p (c-lang-const c-recognize-post-brace-list-type-p) "Set to t when we recognize a colon and then a type after an enum,\ne.g., enum foo : int { A, B, C };") (c-other-decl-block-key (c-lang-const c-other-decl-block-key) nil) (c-other-decl-block-key-in-symbols-alist (mapcar (lambda #5# (cons elt (if (string= elt #6#) 'inextern-lang (intern (concat #7# elt))))) (c-lang-const c-other-block-decl-kwds)) "Alist associating keywords in c-other-decl-block-decl-kwds with\ntheir matching \"in\" syntactic symbols.") (c-defun-type-name-decl-key (c-lang-const c-defun-type-name-decl-key) nil) (c-typedef-decl-key (c-lang-const c-typedef-decl-key) nil) (c-using-key (c-lang-const c-using-key) nil) (c-no-type-key (c-lang-const c-no-type-key) nil) (c-equals-type-clause-key (c-lang-const c-equals-type-clause-key) nil) (c-decl-hangon-key (c-lang-const c-decl-hangon-key) nil) (c-prefix-spec-kwds-re (c-lang-const c-prefix-spec-kwds-re) nil) (c-specifier-key (c-lang-const c-specifier-key) nil) (c-not-decl-init-keywords (c-lang-const c-not-decl-init-keywords) nil) (c-not-primitive-type-keywords-regexp (c-lang-const c-not-primitive-type-keywords-regexp) nil) (c-protection-key (c-lang-const c-protection-key) nil) (c-post-protection-token (c-lang-const c-post-protection-token) "The token which (may) follow a protection keyword,\ne.g. the \":\" in C++ Mode's \"public:\". nil if there is no such token.") (c-opt-block-decls-with-vars-key (c-lang-const c-opt-block-decls-with-vars-key) nil) (c-postfix-decl-spec-key (c-lang-const c-postfix-decl-spec-key) nil) (c-make-top-level-key (c-lang-const c-make-top-level-key) nil) (c-colon-type-list-re (c-lang-const c-colon-type-list-re) "Regexp matched after the keywords in `c-colon-type-list-kwds' to skip\nforward to the colon. The end of the match is assumed to be directly\nafter the colon, so the regexp should end with \":\". Must be a\nregexp if `c-colon-type-list-kwds' isn't nil.") (c-paren-nontype-key (c-lang-const c-paren-nontype-key) nil) (c-opt-<>-sexp-key (c-lang-const c-opt-<>-sexp-key) nil) (c-inside-<>-type-key (c-lang-const c-inside-<>-type-key) nil) (c-block-stmt-1-key (c-lang-const c-block-stmt-1-key) nil) (c-block-stmt-1-2-key (c-lang-const c-block-stmt-1-2-key) nil) (c-block-stmt-2-key (c-lang-const c-block-stmt-2-key) nil) (c-block-stmt-hangon-key (c-lang-const c-block-stmt-hangon-key) nil) (c-opt-block-stmt-key (c-lang-const c-opt-block-stmt-key) nil) (c-simple-stmt-key (c-lang-const c-simple-stmt-key) nil) (c-paren-stmt-key (c-lang-const c-paren-stmt-key) nil) (c-opt-asm-stmt-key (c-lang-const c-opt-asm-stmt-key) nil) (c-case-kwds-regexp (c-lang-const c-case-kwds-regexp) nil) (c-label-kwds-regexp (c-lang-const c-label-kwds-regexp) nil) (c-opt-inexpr-brace-list-key (c-lang-const c-opt-inexpr-brace-list-key) nil) (c-brace-stack-thing-key (c-lang-const c-brace-stack-thing-key) nil) (c-brace-stack-no-semi-key (c-lang-const c-brace-stack-no-semi-key) nil) (c-decl-block-key (c-lang-const c-decl-block-key) nil) (c-opt-bitfield-key (c-lang-const c-opt-bitfield-key) nil) (c-std-abbrev-keywords (c-lang-const c-std-abbrev-keywords) "List of keywords which may need to cause electric indentation.") (c-keywords-regexp (c-lang-const c-keywords-regexp) nil) (c-stmt-block-only-keywords-regexp (c-lang-const c-stmt-block-only-keywords-regexp) nil) (c-keywords-obarray (let* ((alist (c-lang-const c-keyword-member-alist)) kwd lang-const-list (obarray (make-vector (* (length alist) 2) 0))) (while alist (setq kwd (caar alist) lang-const-list (cdar alist) alist (cdr alist)) (setplist (intern kwd obarray) (apply 'nconc (mapcar (lambda #8# (list lang-const t)) lang-const-list)))) obarray) nil) (c-regular-keywords-regexp (c-lang-const c-regular-keywords-regexp) nil) (c-primary-expr-regexp (c-lang-const c-primary-expr-regexp) nil) (c-decl-start-colon-kwd-re (c-lang-const c-decl-start-colon-kwd-re) "Regexp matching a keyword that is followed by a colon, where\n the whole construct can precede a declaration.\n E.g. \"public:\" in C++.") (c-decl-prefix-re (c-lang-const c-decl-prefix-re) nil) (c-decl-start-re (c-lang-const c-decl-start-re) "Regexp matching the start of any declaration, cast or label.\nIt's used on the token after the one `c-decl-prefix-re' matched. This\nregexp should not try to match those constructs accurately as it's\nonly used as a sieve to avoid spending more time checking other\nconstructs.") (c-decl-prefix-or-start-re (c-lang-const c-decl-prefix-or-start-re) nil) (c-dposr-cpp-macro-depth (c-lang-const c-dposr-cpp-macro-depth) nil) (c-cast-parens (c-lang-const c-cast-parens) nil) (c-block-prefix-charset (c-lang-const c-block-prefix-charset) nil) (c-type-decl-prefix-key (c-lang-const c-type-decl-prefix-key) nil) (c-type-decl-operator-prefix-key (c-lang-const c-type-decl-operator-prefix-key) "Regexp matching any declarator operator which isn't a keyword,\nthat might precede the identifier in a declaration, e.g. the\n\"*\" in \"char *argv\". The end of the first submatch is taken\nas the end of the operator. Identifier syntax is in effect when\nthis is matched (see `c-identifier-syntax-table').") (c-type-decl-suffix-key (c-lang-const c-type-decl-suffix-key) nil) (c-after-suffixed-type-decl-key (c-lang-const c-after-suffixed-type-decl-key) nil) (c-after-suffixed-type-maybe-decl-key (c-lang-const c-after-suffixed-type-maybe-decl-key) nil) (c-opt-type-concat-key (c-lang-const c-opt-type-concat-key) nil) (c-opt-type-suffix-key (c-lang-const c-opt-type-suffix-key) "Regexp matching operators that might follow after a type, or nil in\nlanguages that don't have such operators. The end of the first\nsubmatch is taken as the end of the operator. This should not match\nthings like C++ template arglists if `c-recognize-<>-arglists' is set.\nIt's undefined whether identifier syntax (see `c-identifier-syntax-table')\nis in effect or not.") (c-known-type-key (let* ((extra-types (when (boundp (c-mode-symbol #9#)) (c-mode-var "font-lock-extra-types"))) (regexp-strings (delq nil (mapcar (lambda #10# (when (string-match #11# re) re)) extra-types))) (plain-strings (delq nil (mapcar (lambda #12# (unless (string-match #13# re) re)) extra-types)))) (concat #14# (c-concat-separated (append (list (c-make-keywords-re nil (append (c-lang-const c-primitive-type-kwds) plain-strings))) regexp-strings) #15#) #16#)) nil) (c-special-brace-lists (c-lang-const c-special-brace-lists) "List of open- and close-chars that makes up a pike-style brace list,\ni.e., for a ([ ]) list there should be a cons (?\\[ . ?\\]) in this\nlist.") (c-recognize-knr-p (c-lang-const c-recognize-knr-p) "Non-nil means K&R style argument declarations are valid.") (c-pre-id-bracelist-key (c-lang-const c-pre-id-bracelist-key) nil) (c-pre-brace-non-bracelist-key (c-lang-const c-pre-brace-non-bracelist-key) "A regexp matching tokens which, preceding a brace, make it a non-bracelist.") (c-recognize-typeless-decls (c-lang-const c-recognize-typeless-decls) "Non-nil means function declarations without return type should be\nrecognized. That can introduce an ambiguity with parenthesized macro\ncalls before a brace block. This setting does not affect declarations\nthat are preceded by a declaration starting keyword, so\ne.g. `c-typeless-decl-kwds' may still be used when it's set to nil.") (c-recognize-<>-arglists (c-lang-const c-recognize-<>-arglists) "Non-nil means C++ style template arglists should be handled. More\nspecifically, this means a comma separated list of types or\nexpressions surrounded by \"<\" and \">\". It's always preceded by an\nidentifier or one of the keywords on `c-<>-type-kwds' or\n`c-<>-arglist-kwds'. If there's an identifier before then the whole\nexpression is considered to be a type.") (c-<>-notable-chars-re (c-lang-const c-<>-notable-chars-re) "A regexp matching any single character notable inside a <...> construct.\nThis must include \"<\" and \">\", and should include \",\", and\nany character which cannot be valid inside such a construct.\nThis is used in `c-forward-<>-arglist-recur' to try to detect\nsequences of tokens which cannot be a template/generic construct.\nWhen \"(\" is present, that defun will attempt to parse a\nparenthesized expression inside the template. When \")\" is\npresent it will treat an unbalanced closing paren as a sign of\nthe invalidity of the putative template construct.") (c-enum-clause-introduction-re (c-lang-const c-enum-clause-introduction-re) nil) (c-enums-contain-decls (c-lang-const c-enums-contain-decls) "Non-nil means that an enum structure can contain declarations.") (c-recognize-paren-inits (c-lang-const c-recognize-paren-inits) "Non-nil means that parenthesis style initializers exist,\ni.e. constructs like\n\nFoo bar (gnu);\n\nin addition to the more classic\n\nFoo bar = gnu;") (c-recognize-bare-brace-inits (c-lang-const c-recognize-bare-brace-inits) "Non-nil means that brace initializers without \"=\" exist,\ni.e. constructs like\n\nint foo[] {1, 2, 3};\n\nin addition to the more classic\n\nint foo[] = {1, 2, 3};") (c-recognize-paren-inexpr-blocks (c-lang-const c-recognize-paren-inexpr-blocks) "Non-nil to recognize gcc style in-expression blocks,\ni.e. compound statements surrounded by parentheses inside expressions.") (c-opt-<>-arglist-start (c-lang-const c-opt-<>-arglist-start) nil) (c-opt-<>-arglist-start-in-paren (c-lang-const c-opt-<>-arglist-start-in-paren) nil) (c-opt-postfix-decl-spec-key (c-lang-const c-opt-postfix-decl-spec-key) nil) (c-recognize-colon-labels (c-lang-const c-recognize-colon-labels) "Non-nil if generic labels ending with \":\" should be recognized.\nThat includes labels in code and access keys in classes. This does\nnot apply to labels recognized by `c-label-kwds' and\n`c-opt-extra-label-key'.") (c-label-prefix-re (c-lang-const c-label-prefix-re) "Regexp like `c-decl-prefix-re' that matches any token that can precede\na generic colon label. Not used if `c-recognize-colon-labels' is\nnil.") (c-nonlabel-token-key (c-lang-const c-nonlabel-token-key) "Regexp matching things that can't occur in generic colon labels,\nneither in a statement nor in a declaration context. The regexp is\ntested at the beginning of every sexp in a suspected label,\ni.e. before \":\". Only used if `c-recognize-colon-labels' is set.") (c-nonlabel-nonparen-token-key (c-lang-const c-nonlabel-nonparen-token-key) "Regexp matching things that can't occur in generic colon labels,\nneither in a statement nor in a declaration context, with the\nexception of an open parenthesis. The regexp is tested at the\nbeginning of every sexp in a suspected label, i.e. before \":\".\nOnly used if `c-recognize-colon-labels' is set.") (c-nonlabel-token-2-key (c-lang-const c-nonlabel-token-2-key) "Regexp matching things that can't occur two symbols before a colon in\na label construct. This catches C++'s inheritance construct \"class foo\n: bar\". Only used if `c-recognize-colon-labels' is set.") (c-opt-extra-label-key (c-lang-const c-opt-extra-label-key) "Optional regexp matching labels.\nNormally, labels are detected according to `c-nonlabel-token-key',\n`c-decl-prefix-re' and `c-nonlabel-decl-prefix-re'. This regexp can\nbe used if there are additional labels that aren't recognized that\nway.") (c-opt-friend-key (c-lang-const c-opt-friend-key) nil) (c-opt-method-key (c-lang-const c-opt-method-key) nil) (c-type-decl-end-used (c-lang-const c-type-decl-end-used) nil) (c-maybe-decl-faces (c-lang-const c-maybe-decl-faces) "List of faces that might be put at the start of a type when\n`c-font-lock-declarations' runs. This must be evaluated (with `eval') at\nruntime to get the actual list of faces. This ensures that face name\naliases in Emacs are resolved.")) eval message "Eval error in the `c-lang-defvar' or `c-lang-setvar' for `%s'%s: %S" format " (fallback source eval - %s compiled with CC Mode %s but loaded with %s)" "5.35.1" signal c-common-init easy-menu-add run-mode-hooks c-mode-common-hook c-update-modeline systemtap-mode-hook] 9 (#$ . 8980) nil]) (provide 'systemtap-mode)