| Current File : //proc/self/root/kunden/usr/share/emacs/27.2/lisp/cedet/srecode/srt.elc |
;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; 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!\207" [require eieio srecode/dictionary srecode/insert] 2)
#@43 History for `srecode-read-variable-name'.
(defvar srecode-read-variable-name-history nil (#$ . 514))
#@252 Read in the name of a declared variable in the current SRT file.
PROMPT is the prompt to use.
INITIAL is the initial string.
HIST is the history value, otherwise `srecode-read-variable-name-history'
is used.
DEFAULT is the default if RET is hit.
(defalias 'srecode-read-variable-name #[(prompt &optional initial hist default) "\306 \307 \310\311\312 \313\314 \315 8)\n\"*\"\"\210 \316
\317\f\320\"\321\211\206- \322&+\207" [newdict currfcn attribute tag #1=#:object prompt srecode-create-dictionary semantic-current-tag srecode-resolve-argument-list mapcar read :arguments plist-get 2 completing-read slot-value namehash nil srecode-read-variable-name-history initial hist default] 8 (#$ . 622)])
#@43 History for `srecode-read-variable-name'.
(defvar srecode-read-major-mode-history nil (#$ . 1344))
#@231 Read in the name of a desired `major-mode'.
PROMPT is the prompt to use.
INITIAL is the initial string.
HIST is the history value, otherwise `srecode-read-variable-name-history'
is used.
DEFAULT is the default if RET is hit.
(defalias 'srecode-read-major-mode-name #[(prompt &optional initial hist default) "\304 \305\306\n \206 \307&\207" [prompt obarray initial hist completing-read #[(s) "\301\302\303!\"\207" [s string-match "-mode$" symbol-name] 4] nil srecode-read-major-mode-history] 7 (#$ . 1450)])
#@241 Add macros into the dictionary DICT based on the current SRT file.
Adds the following:
ESCAPE_START - This files value of escape_start
ESCAPE_END - This files value of escape_end
MODE - The mode of this buffer. If not declared yet, guess.
(defalias 'srecode-semantic-handle-:srt #[(dict) "\306\307p\"\306\310p\"\306\311p\"\211\205# \n\211\312 \313 \314 8)\f\"+ \315\316\203@ \211\312 \313 \314 8)\f\"+@\202A \317#\210\315\320 \203_ \211\312 \313 \314 8)\f\"+@\202` \321#\210
\204~ \322\323p!! \324\325\"\203} \326\327\"\330P)
\205\210 \315\331
#,\207" [es ee mode-var tag attribute mode semantic-find-first-tag-by-name "escape_start" "escape_end" "mode" :default-value plist-get 2 srecode-dictionary-set-value "ESCAPE_START" "{{" "ESCAPE_END" "}}" file-name-nondirectory buffer-file-name string-match "-\\(\\w+\\)\\.srt" match-string 1 "-mode" "MAJORMODE" dict fname] 7 (#$ . 1973)])
(provide 'srecode/srt)