Gecko [ goons4good.org ]

Name	Size	Permission	Date
args.elc	4.17 KB	-rw-r--r--	2023-06-07 04:12
compile.elc	14.18 KB	-rw-r--r--	2023-06-07 04:12
cpp.elc	5.46 KB	-rw-r--r--	2023-06-07 04:12
ctxt.elc	6.13 KB	-rw-r--r--	2023-06-07 04:12
dictionary.elc	16.78 KB	-rw-r--r--	2023-06-07 04:12
document.elc	18.43 KB	-rw-r--r--	2023-06-07 04:12
el.elc	2.78 KB	-rw-r--r--	2023-06-07 04:12
expandproto.elc	2.29 KB	-rw-r--r--	2023-06-07 04:12
extract.elc	6.32 KB	-rw-r--r--	2023-06-07 04:12
fields.elc	11.77 KB	-rw-r--r--	2023-06-07 04:12
filters.elc	1.06 KB	-rw-r--r--	2023-06-07 04:12
find.elc	7.69 KB	-rw-r--r--	2023-06-07 04:12
getset.elc	7.96 KB	-rw-r--r--	2023-06-07 04:12
insert.elc	27.87 KB	-rw-r--r--	2023-06-07 04:12
java.elc	1.58 KB	-rw-r--r--	2023-06-07 04:12
loaddefs.el	7.58 KB	-rw-r--r--	2023-06-07 04:00
map.elc	10.37 KB	-rw-r--r--	2023-06-07 04:12
mode.elc	10.94 KB	-rw-r--r--	2023-06-07 04:12
semantic.elc	11.09 KB	-rw-r--r--	2023-06-07 04:12
srt-mode.elc	24.57 KB	-rw-r--r--	2023-06-07 04:12
srt-wy.elc	33.62 KB	-rw-r--r--	2023-06-07 04:12
srt.elc	2.97 KB	-rw-r--r--	2023-06-07 04:12
table.elc	8.19 KB	-rw-r--r--	2023-06-07 04:12
template.elc	1.87 KB	-rw-r--r--	2023-06-07 04:12
texi.elc	8.86 KB	-rw-r--r--	2023-06-07 04:12

Rename

;ELC���
;;; Compiled by mockbuild@buildfarm06.corp.cloudlinux.com on Wed Jun  7 08:12:35 2023
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/cedet/srecode/srt-mode.el
;;; in Emacs version 24.3.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!\210\300\303!\210\300\304!\210\300\305!\210\300\306!\207" [require srecode/compile srecode/ctxt srecode/template semantic semantic/analyze semantic/wisent] 2)
#@54 Syntax table used in semantic recoder macro buffers.
(defvar srecode-template-mode-syntax-table (byte-code "\301\302 !\303\304\305#\210\303\306\307#\210\303\310\311#\210\303\312\311#\210\303\313\311#\210\303\314\311#\210\303\315\311#\210\303\316\311#\210\303\317\311#\210\303\320\321#\210\303\322\323#\210\303\324\325#\210\303\326\327#\210\303\330\327#\210\303\331\327#\210)\207" [table make-syntax-table standard-syntax-table modify-syntax-entry 59 ". 12" 10 ">" 36 "." 58 60 62 35 33 63 34 "\"" 45 "_" 92 "\\" 96 "'" 39 44] 4) (#$ . 754))
(custom-declare-face 'srecode-separator-face '((t (:weight bold :strike-through t))) "Face used for decorating separators in srecode template mode." :group 'srecode)
#@53 Keywords for use with srecode macros and font-lock.
(defvar srecode-font-lock-keywords '(("^\$template\$\\s-+\$\\w*\$\$\\( \\(:\\w+\$\\|\\)+\\)$" (1 font-lock-keyword-face) (2 font-lock-function-name-face) (3 font-lock-builtin-face)) ("^\$sectiondictionary\$\\s-+\"" (1 font-lock-keyword-face)) ("^\\s *\$section\$\\s-+\"" (1 font-lock-keyword-face)) ("^\\s *\$end\$" (1 font-lock-keyword-face)) ("^\$bind\$\\s-+\"" (1 font-lock-keyword-face)) ("^\\s *\$set\$\\s-+\$\\w+\$\\s-+" (1 font-lock-keyword-face) (2 font-lock-variable-name-face)) ("^\\s *\$show\$\\s-+\$\\w+\$\\s-*$" (1 font-lock-keyword-face) (2 font-lock-variable-name-face)) ("\\<\$macro\$\\s-+\"" (1 font-lock-keyword-face)) ("^\$context\$\\s-+\$\\w+\$" (1 font-lock-keyword-face) (2 font-lock-builtin-face)) ("^\$prompt\$\\s-+\$\\w+\$" (1 font-lock-keyword-face) (2 font-lock-variable-name-face)) ("\$default\\(macro\$?\\)\\s-+\$\\(\\w\\|\\s_\$+\\)" (1 font-lock-keyword-face) (3 font-lock-type-face)) ("\\<\$default\\(macro\$?\\)\\>" (1 font-lock-keyword-face)) ("\\<\$read\$\\s-+\$\\(\\w\\|\\s_\$+\\)" (1 font-lock-keyword-face) (2 font-lock-type-face)) ("^----\n" 0 'srecode-separator-face) (srecode-template-mode-macro-escape-match 1 font-lock-string-face) ((lambda (limit) (srecode-template-mode-font-lock-macro-helper limit "\$\\??\\w+\$[^ 	\n{}$#@&*()]*")) 1 font-lock-variable-name-face) ((lambda (limit) (srecode-template-mode-font-lock-macro-helper limit "\$[#/]\\w+\$[^ 	\n{}$#@&*()]*")) 1 font-lock-keyword-face) ((lambda (limit) (srecode-template-mode-font-lock-macro-helper limit "\$[<>]\\w*\$:\$\\w+\$:\$\\w+\$")) (1 font-lock-keyword-face) (2 font-lock-builtin-face) (3 font-lock-type-face)) ((lambda (limit) (srecode-template-mode-font-lock-macro-helper limit "\$[<>?]?\\w*\$:\$\\w+\$")) (1 font-lock-keyword-face) (2 font-lock-type-face)) ((lambda (limit) (srecode-template-mode-font-lock-macro-helper limit "!\$[^{}$]*\$")) 1 font-lock-comment-face)) (#$ . 1484))
#@81 Match against escape characters.
Don't scan past LIMIT.  Match with EXPRESSION.
(defalias 'srecode-template-mode-font-lock-macro-helper #[(limit expression) "\306\211\307\310 !\307\311 !\n\fQ\204<�\312 \313\216\314
\315#\2036�\316 @\317\232\2038�\312 \315\2028�\315*\202�\320	!\210	\205E�\315-\207" [done md es ee expression regex nil regexp-quote srecode-template-get-escape-start srecode-template-get-escape-end match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) re-search-forward t srecode-calculate-context "code" set-match-data save-match-data-internal limit] 5 (#$ . 3496)])
#@57 Match against escape characters.
Don't scan past LIMIT.
(defalias 'srecode-template-mode-macro-escape-match #[(limit) "\306\211\307\310 !\307\311 !\312\n\313\314\260\204>�\315 \316\216\317\f\320#\2038�\321 @\322\232\203:�\315 \320\202:�\320*\202�\323	!\210	\205G�\320-\207" [done md es ee regex save-match-data-internal nil regexp-quote srecode-template-get-escape-start srecode-template-get-escape-end "\$" "\\|" "\$" match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) re-search-forward t srecode-calculate-context "code" set-match-data limit] 6 (#$ . 4144)])
#@165 Dynamically generated `font-lock' keywords for srecode templates.
Once the escape_start, and escape_end sequences are known, then
we can tell font lock about them.
(defvar srecode-font-lock-macro-keywords nil (#$ . 4775))
#@30 Keymap used in srecode mode.
(defvar srecode-template-mode-map (byte-code "\301 \302\303\304#\210\302\305\306#\210\302\307\310#\210)\207" [km make-sparse-keymap define-key "" srecode-compile-templates "
" srecode-macro-help "/" srecode-self-insert-complete-end-macro] 4) (#$ . 5003))
(byte-code "\300\301N\204�\302\300\301\303\304!#\210\305\306!\204�\302\306\307\310#\210\300\207" [srecode-template-mode-hook variable-documentation put purecopy "Hook run when entering SRecorder mode.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it.  (This is true for all hook variables.)" boundp srecode-template-mode-map definition-name srecode-template-mode] 5)
(defvar srecode-template-mode-map (make-sparse-keymap))
(byte-code "\300\301N\204�\302\300\301\303\304!#\210\305\306!\204�\302\306\307\310#\210\300\207" [srecode-template-mode-map variable-documentation put purecopy "Keymap for `srecode-template-mode'." boundp srecode-template-mode-syntax-table definition-name srecode-template-mode] 5)
(defvar srecode-template-mode-syntax-table (make-syntax-table))
(byte-code "\300\301N\204�\302\300\301\303\304!#\210\302\305\306\307#\207" [srecode-template-mode-syntax-table variable-documentation put purecopy "Syntax table for `srecode-template-mode'." srecode-template-mode-abbrev-table definition-name srecode-template-mode] 5)
(defvar srecode-template-mode-abbrev-table (progn (define-abbrev-table 'srecode-template-mode-abbrev-table nil) srecode-template-mode-abbrev-table))
(byte-code "\300\301N\204�\302\300\301\303\304!#\210\302\305\306\307#\207" [srecode-template-mode-abbrev-table variable-documentation put purecopy "Abbrev table for `srecode-template-mode'." srecode-template-mode derived-mode-parent nil] 5)
#@166 Major-mode for writing SRecode macros.

This mode runs the hook `srecode-template-mode-hook', as the final step
during initialization.

\{srecode-template-mode-map}
(defalias 'srecode-template-mode #[nil "\306\300!\210\307\310 \210\311\312\313!\210\314\f!\210
\306\315!\210\316
\306\317!\210\320\306\321!\210\307\306\322!\210\323\306\324!\210\325)\326\327!\207" [delay-mode-hooks major-mode mode-name srecode-template-mode-map srecode-template-mode-syntax-table srecode-template-mode-abbrev-table make-local-variable t kill-all-local-variables srecode-template-mode "SRecorder" use-local-map set-syntax-table comment-start ";;" comment-end "" parse-sexp-ignore-comments comment-start-skip "\$\\(^\\|[^\\\\\n]\$\$\\\\\\\\\$*\\);+ *" font-lock-defaults (srecode-font-lock-keywords nil nil ((95 . "w") (45 . "w"))) run-mode-hooks srecode-template-mode-hook local-abbrev-table] 2 (#$ . 6772) nil])
(defalias 'srt-mode 'srecode-template-mode)
#@63 Self insert the current key, then autocomplete the end macro.
(defalias 'srecode-self-insert-complete-end-macro #[nil "\305\306!\210\307 \205A�\307 \310\211\211A@)*=\205A�\311 \312 \212\nG[u\210\313u\210\314\315\n!!\2055�\316`\317\")\211\205@�\fc\210c+\207" [class tag es ee name call-interactively self-insert-command semantic-current-tag function srecode-template-get-escape-start srecode-template-get-escape-end -1 looking-at regexp-quote srecode-up-context-get-name t] 4 (#$ . 7735) nil])
#@53 Provide help for working with macros in a template.
(defalias 'srecode-macro-help #[nil "\306\211\307N	H\310 \311 
r\312\313!q\210p\314 \210\315\211\316\211 \316!\"\317 \210\320\321!\210+\211#$\322\323!\210\324 \210\324 \210\n\205y�\n@%\325%!&\326%\327\"\205_�\330%\327\"\316'\nA\331%\307N	H\n\"\332\333\215\210,\202D�\334#!\210.\207" [root class-children chl ess ees default-directory srecode-template-inserter eieio-class-definition srecode-template-get-escape-start srecode-template-get-escape-end get-buffer-create "*SRecode Macros*" kill-all-local-variables nil t erase-buffer run-hooks temp-buffer-setup-hook princ "Description of known SRecode Template Macros." terpri symbol-name slot-exists-p key eieio-oref append skip (byte-code "\306=\203�\307\310\311\"\210\312\313N	H>A\242\203�\307\310\311\"\210\314\315!\210\314\n!\210\314\316!\210\317\303\"\203Y�\203Y�\314\320!\210;\203R�\311\321\230\203K�\314\322!\210\202Y�\323!\210\202Y�\323\324\325\"!\210\326 \210\314\327\330\"!\210\326 \210\f\203x�\314\331!\210\326 \210\332
#\210\326 \207" [C class-options name key showexample ess srecode-template-inserter-section-end throw skip nil :abstract eieio-class-definition princ "`" "'" slot-exists-p " - Character Key: " "\n" "\"\\n\"" prin1 format "%c" terpri documentation-property variable-documentation "Example:" srecode-inserter-prin-example ees] 4) internal-temp-output-buffer-show #1=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only #2=#:buf standard-output C name showexample] 4 (#$ . 8242) nil])
#@118 Insert the SRecode TAG into the current buffer.

Override semantic-ia-insert-tag in `srecode-template-mode' buffers.
(defalias 'semantic-ia-insert-tag-srecode-template-mode #[(tag) "\211@)c\207" [tag] 2 (#$ . 9861)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semantic-ia-insert-tag-srecode-template-mode definition-name semantic-ia-insert-tag mode-local-bind ((semantic-ia-insert-tag . semantic-ia-insert-tag-srecode-template-mode)) (override-flag t) srecode-template-mode] 4)
#@237 Non-nil if POINT is inside a macro bounds.
If the ESCAPE_START and END are different sequences,
a simple search is used.  If ESCAPE_START and END are the same
characters, start at the beginning of the line, and find out
how many occur.
(defalias 'srecode-in-macro-p #[(&optional point) "\306 \307\310 !\307\311 !\206�`\211\205\224�\f\312\211\211A@)
*=\205\224�\n\230\203G�\212\313 \210\314	\315\316$\2041�\314	\315#\205C�\315)\202\224�\212\317\f\211\320\f8)\321!\203b�\322!\202f�\323H*\315#\205\223�\314\n\f\211\320\f8)\321!\203\206�\324!\202\212�\325H*\315#\206\221�		Y),\207" [point start ee es tag class semantic-current-tag regexp-quote srecode-template-get-escape-start srecode-template-get-escape-end function beginning-of-line re-search-forward t 2 re-search-backward 4 semantic-overlay-p semantic-overlay-start 0 semantic-overlay-end 1 o] 6 (#$ . 10366)])
#@297 Move up one context as for `semantic-up-context', and return the name.
Moves point to the opening characters of the section macro text.
If there is no upper context, return nil.
Starts at POINT if provided.
If FIND-UNMATCHED is specified as non-nil, then we are looking for an unmatched
section.
(defalias 'srecode-up-context-get-name #[(&optional point find-unmatched) "\203�`b\210\306 \307\310 !\211\311P`\312\211	\313\211\211A@)*=\205\253�\204\242�\314	\211\315	8)\316!\203K�\317!\202O�\320H*\321#\203\242�\212\322\323!\n\324
Q\325	\211\315	8)\316!\203{�\326!\202�\323H*\321#\203\213�\f`W\202\227�\204\226�\327\330!\202\227�\321*\203,�`\211\2031�\206\250�\fb\210
.\207" [point tag es start orig name semantic-current-tag regexp-quote srecode-template-get-escape-start "[#<]\$\\w+\$" nil function re-search-backward 4 semantic-overlay-p semantic-overlay-start 0 t match-string 1 "/" re-search-forward semantic-overlay-end error "Unmatched Section Template" res class o endr find-unmatched] 5 (#$ . 11270)])
#@137 Move up one context in the current code.
Moves out one named section.

Override semantic-up-context in `srecode-template-mode' buffers.
(defalias 'semantic-up-context-srecode-template-mode #[(&optional point) "\301!?\207" [point srecode-up-context-get-name] 2 (#$ . 12339)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semantic-up-context-srecode-template-mode definition-name semantic-up-context mode-local-bind ((semantic-up-context . semantic-up-context-srecode-template-mode)) (override-flag t) srecode-template-mode] 4)
#@168 Move to the beginning of the current context.
Moves to the beginning of one named section.

Override semantic-beginning-of-context in `srecode-template-mode' buffers.
(defalias 'semantic-beginning-of-context-srecode-template-mode #[(&optional point) "\303!\203�\304\207\305\306 !\305\307 !\310\n!\210\310	!\210*\311\207" [point ee es semantic-up-context t regexp-quote srecode-template-get-escape-start srecode-template-get-escape-end re-search-forward nil] 3 (#$ . 12889)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semantic-beginning-of-context-srecode-template-mode definition-name semantic-beginning-of-context mode-local-bind ((semantic-beginning-of-context . semantic-beginning-of-context-srecode-template-mode)) (override-flag t) srecode-template-mode] 4)
#@150 Move to the end of the current context.
Moves to the end of one named section.

Override semantic-end-of-context in `srecode-template-mode' buffers.
(defalias 'semantic-end-of-context-srecode-template-mode #[(&optional point) "\305!\306 \307\310 !\211\204�\311\202A�\312	\313Q\n\211\314\n8)\315\f!\203.�\316\f!\2021�\f\317H*\311#\204<�\320\321\"\210\322\224b\210\323+\207" [point es tag name o srecode-up-context-get-name semantic-current-tag regexp-quote srecode-template-get-escape-start t re-search-forward "/" 4 semantic-overlay-p semantic-overlay-end 1 error "Section %s has no end" 0 nil] 5 (#$ . 13682)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semantic-end-of-context-srecode-template-mode definition-name semantic-end-of-context mode-local-bind ((semantic-end-of-context . semantic-end-of-context-srecode-template-mode)) (override-flag t) srecode-template-mode] 4)
#@122 Get local variables from an SRecode template.

Override semantic-get-local-variables in `srecode-template-mode' buffers.
(defalias 'semantic-get-local-variables-srecode-template-mode #[(&optional point) "\212\203�`b\210\306 \212\307`!)	\310\311	\312	8)\"*\313\f\313\211\203X�@\211@\313\211\211\314\315\n\316\317\320&,
BA\211\204,�*\n\203\205�\313\204|�\f\203|�\f@@\n\230\203v�\f@A\fA\202`�\321
\")\202\206�
-\207" [point tag name attribute subdicts global semantic-current-tag srecode-up-context-get-name :dictionaries plist-get 2 nil apply semantic-tag variable :type :default-value append D --dolist-tail-- attributes default-value type res] 10 (#$ . 14594)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semantic-get-local-variables-srecode-template-mode definition-name semantic-get-local-variables mode-local-bind ((semantic-get-local-variables . semantic-get-local-variables-srecode-template-mode)) (override-flag t) srecode-template-mode] 4)
#@122 Get local arguments from an SRecode template.

Override semantic-get-local-arguments in `srecode-template-mode' buffers.
(defalias 'semantic-get-local-arguments-srecode-template-mode #[(&optional point) "\306\307!\210\212\203\f�`b\210\310 \211\211\311\312	\313	8)\n\"+\314\315\"\316\317\320!\321\f\"\210\322\323\324\325\"\"\210
.\207" [point tag attribute args argsym argvars require srecode/insert semantic-current-tag :arguments plist-get 2 mapcar intern nil srecode-create-dictionary t srecode-resolve-argument-list maphash #[(key entry) "\306	\306\307\310
\311\312\f\313\n&,\fB\211\f\207" [key entry attributes default-value type name nil apply semantic-tag variable :type :default-value argvars] 9] eieio-oref namehash dict] 6 (#$ . 15612)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semantic-get-local-arguments-srecode-template-mode definition-name semantic-get-local-arguments mode-local-bind ((semantic-get-local-arguments . semantic-get-local-arguments-srecode-template-mode)) (override-flag t) srecode-template-mode] 4)
#@166 Return the current symbol under POINT.
Return nil if point is not on/in a template macro.

Override semantic-ctxt-current-symbol in `srecode-template-mode' buffers.
(defalias 'semantic-ctxt-current-symbol-srecode-template-mode #[(&optional point) "\302!\211A)\207" [point macro srecode-parse-this-macro] 3 (#$ . 16695)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semantic-ctxt-current-symbol-srecode-template-mode definition-name semantic-ctxt-current-symbol mode-local-bind ((semantic-ctxt-current-symbol . semantic-ctxt-current-symbol-srecode-template-mode)) (override-flag t) srecode-template-mode] 4)
#@193 Return the current symbol under POINT.
Return nil if point is not on/in a template macro.
The first element is the key for the current macro, such as # for a
section or ? for an ask variable.
(defalias 'srecode-parse-this-macro #[(&optional point) "\212\203�b\210\306 \307\310 !\307\311 !`\312\211\211%\205\367�%\313&\211%\211%A@)&*=\205\367�\314!\205\367�\315
%\211%%\316%8)'\317'!\203Y�\320'!\202]�'\321H*\322#\205\367�\321\225\211b\210\323\f%\211%%\316%8)'\317'!\203\207�\324'!\202\213�'\325H*\322#\204\232�b\210\326\211D!\210`V?\205\367�\321\224(\327\n(\"\330\331!)\312\332\333\217\211*\205\366�\334*\335\"\336*\337\"\205\327�\334*\337\"\205\327�\340\334*\337\"\341\"B\334*\342\"\"+\"\204\355�\312+B\202\365�\343\344\"\"+B*,.\207" [point raw macrostart start ee es semantic-current-tag regexp-quote srecode-template-get-escape-start srecode-template-get-escape-end nil function srecode-in-macro-p re-search-backward 4 semantic-overlay-p semantic-overlay-start 0 t re-search-forward semantic-overlay-end 1 set-match-data buffer-substring-no-properties srecode-compile-state "TMP" (srecode-compile-parse-inserter raw STATE) ((error)) eieio-oref :object-name slot-boundp :secondname split-string ":" key format "%c" tag class o macroend STATE inserter base] 7 (#$ . 17328)])
#@134 Provide a Semantic analysis in SRecode template mode.

Override semantic-analyze-current-context in `srecode-template-mode' buffers.
(defalias 'semantic-analyze-current-context-srecode-template-mode #[(point) "\306\307 \211@\310	8\311`!@\306\2116\306\21178\312 9\313p!\306:\211;\203K�;@\211<A@)\314=\203B�;@:B:;A\211;\204,�:\237*=\315>\316?!@\317@\320\321\322@\323\"=\"#\210\n\205\326\324\n@\322@\320\"\"6\f\203\202�\f\325\230\203\273�\nG\326V\203\273�A\306\327BCD\330\216\331D!\210BA\332B!C\333\334\n!@!E\335E\336\"@8\337>-\202f\f\340\230\204\307�\f\341\230\203f\nG\342U\203*\313p!\306:\211;\203\371�;@\211<A@)\343=\203\360�;@:B:;A\211;\204\332�:\237*F\324\nA@F\"\206!\344\345 !\343\306GH\211IH\346G!\306\211\257+7\347>)\202G\344\345 !\343\306GH\211IH\346G!\306\211\257+7\347>\nG\326V\203f\350\3517\211<@)!!J\324\334\n!@J\"8)\nG\342U\203\2106\206t\n@7\206|\nA@8\206\204\310\n8E\202\261\nG\310U\203\2426\206\226\n@8\206\236\nA@D\202\261\nG\326U\205\2616\206\260\n@C\352\353\354p\355@\356\357
\206\301\n\360\306\3619\362\306\363\fC\364\nG\365>C&\211.
\207" [context-return prefixandbounds prefix bounds key prefixsym nil semantic-ctxt-current-symbol-and-bounds 2 srecode-parse-this-macro semantic-ctxt-current-class-list semantic-something-to-tag-table variable macro semantic-calculate-scope eieio-oset fullscope append eieio-oref localvar semantic-find-first-tag-by-name "?" 1 emacs-lisp-mode ((byte-code "\306!\210	\307\211\203�@\211@\nAL\210A\211\204\f�*\f\310\f!\207" [#1=#:new-mode #2=#:old-locals #3=#:local --dolist-tail-- #4=#:mode mode-local-active-mode deactivate-mode-local-bindings nil activate-mode-local-bindings] 3)) deactivate-mode-local-bindings activate-mode-local-bindings semanticdb-find-tags-by-name last semanticdb-find-result-nth 0 elispfcn "<" ">" 3 context symbol-name srecode-template-current-context semantic-tag-make-plist template srecode-template-find-templates-of-context read semantic-analyze-context-functionarg "context-for-srecode" :buffer :scope :bounds :prefix :prefixtypes :prefixclass :errors :function :index :argument prefix-var prefix-context prefix-function prefixclass result tags tag globalvar argtype point scope mode-local-active-mode #1# #2# #4# fcns contexts attributes class name toc] 23 (#$ . 18663)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semantic-analyze-current-context-srecode-template-mode definition-name semantic-analyze-current-context mode-local-bind ((semantic-analyze-current-context . semantic-analyze-current-context-srecode-template-mode)) (override-flag t) srecode-template-mode] 4)
#@141 Return a list of possible completions based on NONTEXT.

Override semantic-analyze-possible-completions in `srecode-template-mode' buffers.
(defalias 'semantic-analyze-possible-completions-srecode-template-mode #[(context) "r\306\307\"q\210\310\306\311\"!@\211;\203�	\202'�	\312\313\314\217)\205'�	\211@)\306\315\"@\312\f\316=\203\245�G\317p!\312\211\203n�\320\321\312@\211@)\321 &\322=\203e�@BA\211\204F�\237+\317
!\312\211\203\235�@\211A@)\323=\203\224�@BA\211\204�\237*\202K\f\324=\203\375�!\312\325\"#$\326\216\327$!\210\"!\330\"!#\331!\317
!\312\211\203\364�@\211A@)\323=\203\353�@BA\211\204\326�\237*,\202K\f\332=\203K\306\333\"G\317\306\334\"!\312\211\203E\320\321\312@\211@)\321 &\322=\203<@BA\211\204\237+)
-\207" [context prefix tag prefixstr argtype matches eieio-oref buffer last :prefix nil (byte-code ":\205#�@;\205#�A@9\205#�A@\205#�\3018<\205#�\3028<\207" [tag 2 3] 2) ((error)) :argument template semantic-something-to-tag-table compare-strings 0 t function elispfcn emacs-lisp-mode ((byte-code "\306!\210	\307\211\203�@\211@\nAL\210A\211\204\f�*\f\310\f!\207" [#1=#:new-mode #2=#:old-locals #3=#:local --dolist-tail-- #4=#:mode mode-local-active-mode deactivate-mode-local-bindings nil activate-mode-local-bindings] 3)) deactivate-mode-local-bindings activate-mode-local-bindings semanticdb-find-tags-for-completion macro scope fullscope l result tags semantic-case-fold mode-local-active-mode #1# #2# #4#] 9 (#$ . 21358)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semantic-analyze-possible-completions-srecode-template-mode definition-name semantic-analyze-possible-completions mode-local-bind ((semantic-analyze-possible-completions . semantic-analyze-possible-completions-srecode-template-mode)) (override-flag t) srecode-template-mode] 4)
#@54 Get the supported major mode for this template file.
(defalias 'srecode-template-get-mode #[nil "\303\304p\"\211\205�\305\211\306\307	\310	8)\n\"+!)\207" [m tag attribute semantic-find-first-tag-by-name "mode" read :default-value plist-get 2] 5 (#$ . 23290)])
#@42 Get the current escape_start characters.
(defalias 'srecode-template-get-escape-start #[nil "\303\304p\"\211\203�\305\306\n\307\n8)	\"*@\202�\310)\207" [es attribute tag semantic-find-first-tag-by-name "escape_start" :default-value plist-get 2 "{{"] 4 (#$ . 23563)])
#@40 Get the current escape_end characters.
(defalias 'srecode-template-get-escape-end #[nil "\303\304p\"\211\203�\305\306\n\307\n8)	\"*@\202�\310)\207" [ee attribute tag semantic-find-first-tag-by-name "escape_end" :default-value plist-get 2 "}}"] 4 (#$ . 23843)])
#@43 Calculate the context encompassing POINT.
(defalias 'srecode-template-current-context #[(&optional point) "\212\203�`b\210\305 \211\204�\306 	\203F�	\307\211\211A@)\n*=\204F�\306	\211\3108)\311\f!\203<�\312\f!\202?�\f\313H*!\211\204�	\203T�\314	\211@)!\202U�\315*\207" [point ct class tag o semantic-current-tag semantic-find-tag-by-overlay-prev context 4 semantic-overlay-p semantic-overlay-start 0 read declaration] 4 (#$ . 24117)])
#@113 Find all the templates belonging to a particular CONTEXT.
When optional BUFFER is provided, search that buffer.
(defalias 'srecode-template-find-templates-of-context #[(context &optional buffer) "\212\203�q\210	\306\307\211\f	=\203�\310
\307\f\211
\203v�
@\211\f\311\211\211A@)*=\203O�\312\f\211@)!\211	=\203O�\310\203m�\f\313\211\211A@)*=\203m�\f\nB
A\211
\204#�*\n\237-\207" [buffer semantic--buffer-cache ans scan cc tags declaration nil t context read function T --dolist-tail-- class tag] 5 (#$ . 24574)])
(provide 'srecode/srt-mode)