Gecko [ goons4good.org ]

Name	Size	Permission	Date
analyze	[ DIR ]	drwxr-xr-x	2023-06-09 05:02
bovine	[ DIR ]	drwxr-xr-x	2023-06-09 05:02
decorate	[ DIR ]	drwxr-xr-x	2023-06-09 05:02
symref	[ DIR ]	drwxr-xr-x	2023-06-09 05:02
wisent	[ DIR ]	drwxr-xr-x	2023-06-09 05:02
analyze.elc	22.96 KB	-rw-r--r--	2023-06-07 04:12
bovine.elc	5.3 KB	-rw-r--r--	2023-06-07 04:12
chart.elc	4.46 KB	-rw-r--r--	2023-06-07 04:12
complete.elc	60.95 KB	-rw-r--r--	2023-06-07 04:12
ctxt.elc	33.49 KB	-rw-r--r--	2023-06-07 04:13
db-debug.elc	2.91 KB	-rw-r--r--	2023-06-07 04:13
db-ebrowse.elc	18.33 KB	-rw-r--r--	2023-06-07 04:13
db-el.elc	10.99 KB	-rw-r--r--	2023-06-07 04:13
db-file.elc	13.46 KB	-rw-r--r--	2023-06-07 04:13
db-find.elc	41.29 KB	-rw-r--r--	2023-06-07 04:13
db-global.elc	7.24 KB	-rw-r--r--	2023-06-07 04:13
db-javascript.elc	8.8 KB	-rw-r--r--	2023-06-07 04:13
db-mode.elc	6.46 KB	-rw-r--r--	2023-06-07 04:13
db-ref.elc	4.23 KB	-rw-r--r--	2023-06-07 04:13
db-typecache.elc	16.64 KB	-rw-r--r--	2023-06-07 04:13
db.elc	31.92 KB	-rw-r--r--	2023-06-07 04:13
debug.elc	15.22 KB	-rw-r--r--	2023-06-07 04:13
decorate.elc	9.35 KB	-rw-r--r--	2023-06-07 04:13
dep.elc	7.65 KB	-rw-r--r--	2023-06-07 04:13
doc.elc	4.01 KB	-rw-r--r--	2023-06-07 04:13
ede-grammar.elc	7.78 KB	-rw-r--r--	2023-06-07 04:13
edit.elc	21.61 KB	-rw-r--r--	2023-06-07 04:13
find.elc	24.33 KB	-rw-r--r--	2023-06-07 04:13
format.elc	34.35 KB	-rw-r--r--	2023-06-07 04:13
fw.elc	11.69 KB	-rw-r--r--	2023-06-07 04:13
grammar-wy.elc	54.27 KB	-rw-r--r--	2023-06-07 04:13
grammar.elc	76.45 KB	-rw-r--r--	2023-06-07 04:13
html.elc	7.55 KB	-rw-r--r--	2023-06-07 04:13
ia-sb.elc	9.94 KB	-rw-r--r--	2023-06-07 04:13
ia.elc	11.97 KB	-rw-r--r--	2023-06-07 04:13
idle.elc	55.48 KB	-rw-r--r--	2023-06-07 04:13
imenu.elc	12.47 KB	-rw-r--r--	2023-06-07 04:13
java.elc	16.67 KB	-rw-r--r--	2023-06-07 04:13
lex-spp.elc	29.99 KB	-rw-r--r--	2023-06-07 04:13
lex.elc	78.19 KB	-rw-r--r--	2023-06-07 04:13
loaddefs.el	59.31 KB	-rw-r--r--	2023-06-07 04:00
mru-bookmark.elc	12.75 KB	-rw-r--r--	2023-06-07 04:13
sb.elc	11.13 KB	-rw-r--r--	2023-06-07 04:13
scope.elc	23.66 KB	-rw-r--r--	2023-06-07 04:13
senator.elc	26.04 KB	-rw-r--r--	2023-06-07 04:13
sort.elc	18.89 KB	-rw-r--r--	2023-06-07 04:13
symref.elc	13 KB	-rw-r--r--	2023-06-07 04:13
tag-file.elc	6.7 KB	-rw-r--r--	2023-06-07 04:13
tag-ls.elc	24.51 KB	-rw-r--r--	2023-06-07 04:13
tag-write.elc	4.04 KB	-rw-r--r--	2023-06-07 04:13
tag.elc	54.79 KB	-rw-r--r--	2023-06-07 04:13
texi.elc	17.29 KB	-rw-r--r--	2023-06-07 04:13
util-modes.elc	38.76 KB	-rw-r--r--	2023-06-07 04:13
util.elc	13.23 KB	-rw-r--r--	2023-06-07 04:13
wisent.elc	8.21 KB	-rw-r--r--	2023-06-07 04:13

Rename

;ELC���
;;; Compiled by mockbuild@buildfarm06.corp.cloudlinux.com on Wed Jun  7 08:13:12 2023
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/cedet/semantic/html.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/format sgml-mode] 2)
#@67 Regular expression used to find special sections in an HTML file.
(defvar semantic-html-super-regex "<\$h[1-9]\\|title\\|script\\|body\\|a +href\$\\>" (#$ . 659))
#@56 Alist of sectioning commands and their relative level.
(defvar semantic-html-section-list '(("title" 1) ("script" 1) ("body" 1) ("a" 11) ("h1" 2) ("h2" 3) ("h3" 4) ("h4" 5) ("h5" 6) ("h6" 7) ("h7" 8) ("h8" 9) ("h9" 10)) (#$ . 830))
#@252 Parse the current html buffer for semantic tags.
IGNORE any arguments.  Always parse the whole buffer.
Each tag returned is of the form:
 ("NAME" section (:members CHILDREN))
or
 ("NAME" anchor)

Override semantic-parse-region in `html-mode' buffers.
(defalias 'semantic-parse-region-html-mode #[(&rest ignore) "\300\301\302 \"\207" [mapcar semantic-html-expand-tag semantic-html-parse-headings] 3 (#$ . 1069)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semantic-parse-region-html-mode definition-name semantic-parse-region mode-local-bind ((semantic-parse-region . semantic-parse-region-html-mode)) (override-flag t) html-mode] 4)
#@106 We can't parse changes for HTML mode right now.

Override semantic-parse-changes in `html-mode' buffers.
(defalias 'semantic-parse-changes-html-mode #[nil "\301\211\207" [semantic-parse-tree-state needs-rebuild] 2 (#$ . 1727)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semantic-parse-changes-html-mode definition-name semantic-parse-changes mode-local-bind ((semantic-parse-changes . semantic-parse-changes-html-mode)) (override-flag t) html-mode] 4)
#@26 Expand the HTML tag TAG.
(defalias 'semantic-html-expand-tag #[(tag) "\305!\211\203+�\306\307\310	\"\211\211AA)\211:\203(�\f\311\312\f@\n#!\240\210\210,\313!@)\207" [tag chil value attribute plist-cdr semantic-html-components :members mapcar semantic-html-expand-tag semantic-tag-make-plist plist-put semantic--tag-expand] 7 (#$ . 2205)])
#@37 Return components belonging to TAG.
(defalias 'semantic-html-components #[(tag) "\302\303\3048)	\"*\207" [tag attribute :members plist-get 2] 3 (#$ . 2561)])
#@54 Parse the current html buffer for all semantic tags.
(defalias 'semantic-html-parse-headings #[nil "\306\212eb\210\307\310\311\312	!\"ed#\313\306\314#\2037�\315\224B\n`\f\247\203.�\f
@Y\2052�\316
\f\"*\210\202�\317\n!\210*\237\320\315\"@)\207" [pass1 buffer-file-name semantic--progress-reporter semantic-html-super-regex value reporter nil make-progress-reporter format "Parsing %s..." file-name-nondirectory re-search-forward t 0 progress-reporter-do-update progress-reporter-done semantic-html-recursive-combobulate-list] 5 (#$ . 2731)])
#@183 Set the end point of the first section tag in METATAGLIST to PNT.
METATAGLIST is a list of tags in the intermediate tag format used by the
html parser.  PNT is the new point to set.
(defalias 'semantic-html-set-endpoint #[(metataglist pnt) "\304	\203�	@\211A@)\305=\204�	A\211\204�	@\211\205)�GS\233\240\210)\207" [metatag metataglist tag pnt nil section] 3 (#$ . 3290)])
#@256 Create a semantic tag of class section.
NAME is the name of this section.
MEMBERS is a list of semantic tags representing the elements that make
up this section.
LEVEL is the leveling level.
START and END define the location of data described by the tag.
(defalias 'semantic-html-new-section-tag #[(name members level start end) "\306=\307\n	\203�\310\202�\311\312D\211
\313\f!\314\211\257+
	\203)�`\202+�D\")\207" [level anchorp name members attributes class 11 append anchor section :members semantic-tag-make-plist nil start end] 7 (#$ . 3680)])
(put 'semantic-html-new-section-tag 'byte-optimizer 'byte-compile-inline-expand)
#@139 Extract a section name from the current buffer and point.
Assume the cursor is in the tag representing the section we
need the name from.
(defalias 'semantic-html-extract-section-name #[nil "\212\302\303!\210\303u\210\302\304!\210\305\306w\210\307\310!\203!�\302\304!\210\305\306w\210\202�`\306\311\312\306\313#\203>�\314\224b\210\315\306x\210`\316	\"\202?�\317+\207" [end start forward-sexp -1 1 "\n	 " nil looking-at "<" re-search-forward "</" t 0 " \n	" buffer-substring-no-properties ""] 4 (#$ . 4329)])
#@262 Rearrange SECTIONLIST to be a hierarchical tag list starting at LEVEL.
Return the rearranged new list, with all remaining tags from
SECTIONLIST starting at ELT 2.  Sections not are not dealt with as soon as a
tag with greater section value than LEVEL is found.
(defalias 'semantic-html-recursive-combobulate-list #[(sectionlist level) "\305\306\305\212\307\310\215\210)\f\237,B\207" [sectionlist tag case-fold-search oldl newl nil t level-jump (byte-code "\203\313�@b\210\306\307!\203\304�\310\311!\312	\n\313#\314\211\314\204(�\315\316	\"\210`\203G�A@X\203G�\203B�\317
\"\210\320\321\313\"\210\311\225b\210\322\314w\210\323 \324AA@\"\f@A@
d !\"\325=#\326\"#\203\200�\327\202\201�\330\331!D$%\211\"%\332$!\314\211\257+ #\203\242�`\202\244�D\".&\203\265�\317
\"\210&BA-\202��\315\333!\210\202��\314\207" [oldl word semantic-html-section-list levelmatch text begin looking-at "<\$\\w+\$" match-string 1 assoc-string t nil error "Tag %s matched in regexp but is not in list" semantic-html-set-endpoint throw level-jump " 	" semantic-html-extract-section-name semantic-html-recursive-combobulate-list 11 append anchor section :members semantic-tag-make-plist "Problem finding section in semantic/html parser" tmp level newl end start members name anchorp attributes class tag] 7)] 4 (#$ . 4849)])
#@99 The children TAG expands to.

Override semantic-sb-tag-children-to-expand in `html-mode' buffers.
(defalias 'semantic-sb-tag-children-to-expand-html-mode #[(tag) "\301!\207" [tag semantic-html-components] 2 (#$ . 6219)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semantic-sb-tag-children-to-expand-html-mode definition-name semantic-sb-tag-children-to-expand mode-local-bind ((semantic-sb-tag-children-to-expand . semantic-sb-tag-children-to-expand-html-mode)) (override-flag t) html-mode] 4)
#@44 Set up a buffer for parsing of HTML files.
(defalias 'semantic-default-html-setup #[nil "\306\307\310\311\312\313\314\315\211\316\317\320\321\322\307\"\207" [semantic-parser-name semantic--parse-table imenu-create-index-function semantic-command-separation-character semantic-type-relation-separator-character semantic-symbol->name-assoc-list "HTML" t semantic-create-imenu-index ">" (":") ((section . "Section")) (section) nil (section) (section) (section) semantic-install-function-overrides ((tag-components . semantic-html-components)) semantic-imenu-expandable-tag-classes semantic-imenu-bucketize-file semantic-imenu-bucketize-type-members senator-step-at-start-end-tag-classes senator-step-at-tag-classes semantic-stickyfunc-sticky-classes] 4 (#$ . 6738)])
(byte-code "\302\303\304	\305#\210\306\307	\"*\210\310\311!\207" [parent mode html-helper-mode html-mode put mode-local-parent mode-local-map-mode-buffers activate-mode-local-bindings provide semantic/html] 4)