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:39 2023
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/cedet/srecode/texi.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!\207" [require semantic semantic/texi srecode/semantic] 2)
#@113 Add an item into the current menu.  Add @node statements as well.
Argument NEWNODE is the name of the new node.
(defalias 'srecode-texi-add-menu #[(newnode) "\306!\210\307 \210\310\311 !\312\211\204�\313\314!\210\n@\315\n!\316 \317\230\203*�\320 \210\202U�	@b\210\321\322	A@\323#\204N�	A@b\210\324\325!\204G�\313\326!\210\327\330!\210\202U�\321\331!\210\320 \210\316 \317\230\205$\312\327\332\333
#\210\334`!\210\335 \315\n!\320 \210\336u\210\320 \210\312-\337\340!\204\213�	A@-\202\360�\341\342!./0\343\344p!!\3121\2112\203\301�.2@\2113@)\230\203\270�2@1B12A\2112\204\242�1\237+\2113\203\357�3@\21133\34538)4\3464!\203\350�\3474!\202\354�4\342H*-*-\204\374�\fb\210\313\350!\210-\205#-b\210n\203\f\336u\210\351c\210\352 \n=\203\327\353\333
#\202#\327\354\333
#+*\207" [major-mode nodebounds currnode newnode returnpoint menuname srecode-load-tables-for-mode semantic-fetch-tags reverse semantic-find-tag-by-overlay nil error "Cannot find node to put menu item into" semantic-tag-texi-section-text-bounds semantic-texi-current-environment "menu" beginning-of-line re-search-forward "^@menu" t y-or-n-p "Add menu here? " "Abort" srecode-insert "declaration:menu" "@end menu" "declaration:menuitem" "NAME" set-mark make-marker -1 looking-at "\\* \$[^:]+\$:" match-string 1 semantic-something-to-tag-table semantic-flatten-tags-table 4 semantic-overlay-p semantic-overlay-end "Could not find location for new node" "\n" semantic-current-tag "declaration:subnode" "declaration:node" end nname semantic-case-fold case-fold-search result tags tag o] 5 (#$ . 664) "sName of new node: "])
#@166 Add macros into the dictionary DICT based on the current texinfo file.
Adds the following:
  LEVEL - chapter, section, subsection, etc
  NEXTLEVEL - One below level
(defalias 'srecode-semantic-handle-:texi #[(dict) "\306 \210\307\310 !\311\211\203&�	@\312\211\211A@)\n*=\204&�	A\211\204�	\203^�\212	@\211\3138)\314\f!\203A�\315\f!\202D�\f\316H*b\210\317\320!\203S�\321y\210\322 \210\317\323!\203]�\324\321!)\325
\326\206f�\327#\210\330\331\"\325
\332A#+\207" [level tags class tag o dict semantic-fetch-tags reverse semantic-find-tag-by-overlay nil section 4 semantic-overlay-p semantic-overlay-start 0 looking-at "@node" 1 beginning-of-line "@\$\\w+\$" match-string srecode-dictionary-set-value "LEVEL" "chapter" assoc ((nil . "top") ("top" . "chapter") ("chapter" . "section") ("section" . "subsection") ("subsection" . "subsubsection") ("subsubsection" . "subsubsection")) "NEXTLEVEL" nl] 5 (#$ . 2299)])
#@139 Add macros into the dictionary DICT based on the current :tag file.
Adds the following:
  TAGDOC - Texinfo formatted doc string for :tag.
(defalias 'srecode-semantic-handle-:texitag #[(dict) "\303\304\"\305\211\204�\306!\210\303\304\"\211\204�\307\310!\210\311\n\312\"\313\n!\211\2054�\314\315\316\n\317\n!	##*\207" [dict doc tag srecode-dictionary-lookup-name "TAG" nil srecode-semantic-handle-:tag error "No tag to insert for :texitag template argument" eieio-oref :prime semantic-documentation-for-tag srecode-dictionary-set-value "TAGDOC" srecode-texi-massage-to-texinfo semantic-tag-buffer] 8 (#$ . 3234)])
#@223 Insert FOREIGN-TAG from a foreign buffer in TAGFILE.
Assume TAGFILE is a source buffer, and create a documentation
thingy from it using the `document' tool.

Override semantic-insert-foreign-tag in `texinfo-mode' buffers.
(defalias 'semantic-insert-foreign-tag-texinfo-mode #[(foreign-tag) "\301!\207" [foreign-tag srecode-texi-insert-tag-as-doc] 2 (#$ . 3864)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semantic-insert-foreign-tag-texinfo-mode definition-name semantic-insert-foreign-tag mode-local-bind ((semantic-insert-foreign-tag . semantic-insert-foreign-tag-texinfo-mode)) (override-flag t) texinfo-mode] 4)
#@50 Insert TAG into the current buffer with SRecode.
(defalias 'srecode-texi-insert-tag-as-doc #[(tag) "\303=\204\n�\304\305!\210	\306!\210\307\310!)\207" [major-mode tag srecode-semantic-selected-tag texinfo-mode error "Can only insert tags into texinfo in texinfo mode" srecode-load-tables-for-mode srecode-insert "declaration:function"] 2 (#$ . 4506)])
#@123 Texify the doc string DOCSTRING.
Takes plain text formatting that may exist, and converts it to
using TeXinfo formatting.
(defalias 'srecode-texi-texify-docstring #[(docstring) "\306\211\307\310\211\n\311!\307\n\204+�\211\204+�\205*�\312
\"\n\203U�\f\204U�\n\313N\203D�\312
\n\313N\"\211\204+�\n\211\314N\206O�\n\315N)\211\204/�\f,\211\205h�	\203f�	N\205h�J+\206\341�\211\316N)\205\341�\211\316N)\307\310\211\n\311!\307\n\204\243�\211\204\243�\205\242�\312
\"\n\203\315�\f\204\315�\n\313N\203\274�\312
\n\313N\"\211\204\243�\n\211\314N\206\307�\n\315N)\211\204\247�\f,\211\205\340�	\203\336�	N\205\340�J+)\211\203\360�!\202\364�\317!)\207" [overload property mode symbol bind name srecode-texi-texify-docstring nil override-flag symbol-name intern-soft mode-local-symbol-table mode-local-parent derived-mode-parent overload-obsolete srecode-texi-texify-docstring-default mode-local-active-mode major-mode #1=#:override docstring] 5 (#$ . 4868)])
(put 'srecode-texi-texify-docstring 'mode-local-overload t)
#@97 Texify the doc string DOCSTRING.
Takes a few very generic guesses as to what the formatting is.
(defalias 'srecode-texi-texify-docstring-default #[(docstring) "\304\305\306\307\n#\2034�\310\311\n\"\211\312\230\204-�\313\230\204-�\n\305\311\224O\314\315\n\311\225\304O\260)\311\225\202�\n*\207" [start case-fold-search docstring ms nil 0 string-match "\$^\\|[^{]\$\\<\$[A-Z0-9_-]+\$\\>\$$\\|[^}]\$" match-string 2 "A" "a" "@var{" "}"] 8 (#$ . 5943)])
#@107 Massage TAG's documentation from BUFFER as STRING.
This is to take advantage of TeXinfo's markup symbols.
(defalias 'srecode-texi-massage-to-texinfo #[(tag buffer string) "\212\203�q\210\306	!\202$�\n\307\310\311\216\312
!\210\313!\306	!,)\207" [buffer string mode-local-active-mode #1=#:new-mode #2=#:old-locals #3=#:mode srecode-texi-texify-docstring nil texinfo-mode ((byte-code "\306!\210	\307\211\203�@\211@\nAL\210A\211\204\f�*\f\310\f!\207" [#1# #2# #4=#:local --dolist-tail-- #3# mode-local-active-mode deactivate-mode-local-bindings nil activate-mode-local-bindings] 3)) deactivate-mode-local-bindings activate-mode-local-bindings] 3 (#$ . 6416)])
#@626 Take STRING, (a normal doc string), and convert it into a texinfo string.
For instances where CLASS is the class being referenced, do not Xref
that class.

`function' => @dfn{function}
 `variable' => @code{variable}
 `class'    => @code{class} @xref{class}
 `unknown'  => @code{unknown}
 "text"     => ``text''
 'quoteme   => @code{quoteme}
 non-nil    => non-@code{nil}
 t          => @code{t}
 :tag       => @code{:tag}
 [ stuff ]  => @code{[ stuff ]}
 Key        => @kbd{Key}     (key is C\-h, M\-h, SPC, RET, TAB and the like)
 ...        => @dots{}

Override srecode-texi-texify-docstring in `emacs-lisp-mode' buffers.
(defalias 'srecode-texi-texify-docstring-emacs-lisp-mode #[(string) "\303\304\"\203,�\305\224\305\225O\306	!\307\310\n!\203�\311\202�\312	\313Q\314\315$\260*\202��\303\316\"\203>�\307\317\315\314\320%\202,�\303\321\"\203P�\307\322\315\314\320%\202>�\303\323\"\203b�\307\317\315\314\320%\202P�\303\324\"\203t�\307\325\315\314\320%\202b�\303\326\"\203\206�\307\327\315\314\330%\202t�\303\331\"\203\230�\307\332\315\314\330%\202\206�\333!\207" [string vs v string-match "`\$[-a-zA-Z0-9<>.]+\$'" 1 intern-soft replace-match fboundp "@dfn{" "@code{" "}" nil t "\$ \\|^\$\$nil\\|t\\|'[-a-zA-Z0-9]+\\|:[-a-zA-Z0-9]+\$\$[. ,]\\|$\$" "@code{\\2}" 2 "\$ \\|^\$\$\\(non-\$\$nil\$\\)\$[. ,]\\|$\$" "\\3@code{\\4}" "\$ \\|^\$\$\\[[^]]+\\]\$\$ \\|$\$" "\$ \\|^\$\$\\(\\(C-\\|M-\\|S-\$+\$[^ 	\n]\\|RET\\|SPC\\|TAB\$\\)\\|\$RET\\|SPC\\|TAB\$\\)\$ \\|\\s.\\|$\$" "@kbd{\\2}" "\"\$.+\$\"" "``\\1''" 0 "\\.\\.\\." "@dots{}" srecode-texi-texify-docstring-default] 6 (#$ . 7099)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\210\310\311!\207" [put srecode-texi-texify-docstring-emacs-lisp-mode definition-name srecode-texi-texify-docstring mode-local-bind ((srecode-texi-texify-docstring . srecode-texi-texify-docstring-emacs-lisp-mode)) (override-flag t) emacs-lisp-mode provide srecode/texi] 4)