;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\300\301!\210\300\302!\210\300\303!\207" [require semantic semantic/tag-ls srecode/dictionary] 2)
#@1440 Calculate the context at the current point.
The returned context is a list, with the top-most context first.
Each returned context is a string that would show up in a `context'
statement in an `.srt' file.

Some useful context values used by the provided srecode templates are:
  "file" - Templates that for a file (such as an empty file.)
     "empty" - The file is empty
  "declaration" - Top-level declarations in a file.
     "include" - In or near include statements
     "package" - In or near provide statements
     "function" - In or near function statements
         "NAME" - Near functions within NAME namespace or class
     "variable" - In or near variable statements.
     "type"     - In or near type declarations.
     "comment"  - In a comment
  "classdecl" - Declarations within a class/struct/etc.
     "variable" - In or near class fields
     "function" - In or near methods/functions
        "virtual" - Nearby items are virtual
           "pure" - and those virtual items are pure virtual
     "type"     - In or near type declarations.
     "comment"  - In a comment in a block of code
     -- these items show up at the end of the context list.  --
     "public", "protected", "private" -
                  In or near a section of public/protected/private entries.
  "code" - In a block of code.
     "string" - In a string in a block of code
     "comment"  - In a comment in a block of code

    ... More later.
(defalias 'srecode-calculate-context #[0 "\303\211\304\305\306!\304\204\"\211\262\204\"	\262\n\205 \307\n\"\262
\203M\211\204M\302N\203<\307\302N\"\211\262\204\"\211\310N\206F\211\311N\262
\262\202\"\266\203\211\262\205a\211\203_
N\205aJ\266\203\206\326\211\211\312N\262
\205\326\211\211\312N\262
\304\305\306!\304\204\225\211\262\204\225	\262\n\205\223\307\n\"\262
\203\300\211\204\300\302N\203\257\307\302N\"\211\262\204\225\211\310N\206\271\211\311N\262
\262\202\225\266\203\211\262\205\324\211\203\322
N\205\324J\266\203\262
\211\203\337\211 \207\313 \207" [mode-local-active-mode major-mode mode-local-symbol-table srecode-calculate-context nil override-flag symbol-name intern-soft mode-local-parent derived-mode-parent mode-local--overload-obsolete srecode-calculate-context-default] 12 (#$ . 196)])
(put 'srecode-calculate-context 'mode-local-overload t)
#@204 Calculate the CONTEXT type items nearby the current point.
Assume that what we want to insert next is based on what is just
before point.  If there is nothing, then assume it is whatever is
after point.
(defalias 'srecode-calculate-nearby-things #[0 "\300 \301\211\204\f\302 \262\203\327\303
\211A@\262

=\266\202\204-\304\211A@\262
!C\262
\202\301\211\211\305\306\307
8\262
\"\266\204\304\211A@\262
!B\262\211\3101v\211:\205p\211@;\205p\211A@9\205p\211A@\205p\307
8<\205p\311
8<0\262
\202z\210\301\262
\203\211\211\211@\262
B\266\202\202\227\211;\203\226\211B\266\202\202\227\210\312\306\307
8\262
\"\266\202\203\254\313
B\262
\314\306\307
8\262
\"\266\202\203\301\315
B\262
\316!\262
\203\327
\317=\204\327\304!
B\262
\211\237\207" [semantic-find-tag-by-overlay-prev nil semantic-find-tag-by-overlay-next function symbol-name :parent plist-get 2 (error) 3 :virtual "virtual" :pure-virtual-flag "pure" semantic-tag-protection unknown] 11 (#$ . 2568)])
#@50 Calculate an srecode context by using font-lock.
(defalias 'srecode-calculate-context-font-lock #[0 "\300`\301\"\211\302\267\202\303C\207\304C\207\305\207" [get-text-property face #s(hash-table size 4 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (font-lock-string-face 10 font-lock-doc-face 10 font-lock-comment-face 13 font-lock-comment-delimiter-face 13)) "string" "comment" nil] 3 (#$ . 3568)])
#@55 Generic method for calculating a context for srecode.
(defalias 'srecode-calculate-context-default #[0 "edU\203\n\300\301D\207\302 \210\303 \211\2033\211@\211A@\262
\304=\203=\211@\211\305\306\307
8\262
\"\266\203\310\230\203=\311\312 \206;\313 B\207\211@\211A@\262
\314=\203N\315\312 B\207\211@\211A@\262
\304=\203d\316\312 \206b\313 B\207\211A@\205\202\211A@\211A@\262
\304=\205\202\316\317@\211A@\262
!D\207" ["file" "empty" semantic-fetch-tags semantic-find-tag-by-overlay type :type plist-get 2 "namespace" "declaration" srecode-calculate-context-font-lock srecode-calculate-nearby-things function "code" "classdecl" symbol-name] 8 (#$ . 3993)])
#@444 Add macros into the dictionary DICT based on the current Emacs Lisp file.
Argument TEMPLATE is the template object adding context dictionary
entries.
This might add the following:
   VIRTUAL - show a section if a function is virtual
   PURE - show a section if a function is pure virtual.
   PARENT - The name of a parent type for functions.
   PROTECTION - Show a protection section, and what the protection is.

(fn DICT &optional TEMPLATE)
(defalias 'srecode-semantic-handle-:ctxt #[513 "\211\205\223\301
\302\"\303\300!\205\211@
A@\304!\305\306\230\203L\3078\262
\211\203\211\310\230\203B\311\312\"\210\3138\203\311\314\"\210\202\315\316#\210\202\317\230\203\306\230\204^\320\230\203\321 \211\203~\211\322
\211A@\262

=\266\202\203~\315	\316\211@\262
#\210\210
\323\235\205\221\315\324#\210\311\324\"\266\206\207" [srecode-insertion-start-context eieio-oref object-name boundp last nil "function" 2 "virtual" srecode-dictionary-show-section "VIRTUAL" 3 "PURE" srecode-dictionary-set-value "PARENT" "type" "method" semantic-find-tag-by-overlay-prev type ("public" "private" "protected") "PROTECTION"] 14 (#$ . 4664)])
(provide 'srecode/ctxt)