Gecko [ fernandoquevedodop.com ]

Name	Size	Permission
analyze	[ DIR ]	drwxr-xr-x
bovine	[ DIR ]	drwxr-xr-x
decorate	[ DIR ]	drwxr-xr-x
symref	[ DIR ]	drwxr-xr-x
wisent	[ DIR ]	drwxr-xr-x
analyze.elc	28.54 KB	-rw-r--r--
bovine.elc	4.98 KB	-rw-r--r--
chart.elc	4.28 KB	-rw-r--r--
complete.elc	76.43 KB	-rw-r--r--
ctxt.elc	35.96 KB	-rw-r--r--
db-debug.elc	2.75 KB	-rw-r--r--
db-ebrowse.elc	19.95 KB	-rw-r--r--
db-el.elc	13.43 KB	-rw-r--r--
db-file.elc	14.32 KB	-rw-r--r--
db-find.elc	42.67 KB	-rw-r--r--
db-global.elc	9.38 KB	-rw-r--r--
db-javascript.elc	10.97 KB	-rw-r--r--
db-mode.elc	6.7 KB	-rw-r--r--
db-ref.elc	4.96 KB	-rw-r--r--
db-typecache.elc	18.33 KB	-rw-r--r--
db.elc	39.36 KB	-rw-r--r--
debug.elc	17.84 KB	-rw-r--r--
decorate.elc	8.29 KB	-rw-r--r--
dep.elc	7.5 KB	-rw-r--r--
doc.elc	4.14 KB	-rw-r--r--
ede-grammar.elc	9.58 KB	-rw-r--r--
edit.elc	21.04 KB	-rw-r--r--
find.elc	24.37 KB	-rw-r--r--
format.elc	34.91 KB	-rw-r--r--
fw.elc	12.36 KB	-rw-r--r--
grammar-wy.elc	53.64 KB	-rw-r--r--
grammar.elc	78.55 KB	-rw-r--r--
html.elc	7.16 KB	-rw-r--r--
ia-sb.elc	9.44 KB	-rw-r--r--
ia.elc	11.76 KB	-rw-r--r--
idle.elc	60.12 KB	-rw-r--r--
imenu.elc	12.07 KB	-rw-r--r--
java.elc	16.47 KB	-rw-r--r--
lex-spp.elc	34.13 KB	-rw-r--r--
lex.elc	77.22 KB	-rw-r--r--
loaddefs.el	58.17 KB	-rw-r--r--
mru-bookmark.elc	15.46 KB	-rw-r--r--
sb.elc	11.45 KB	-rw-r--r--
scope.elc	25 KB	-rw-r--r--
senator.elc	29.09 KB	-rw-r--r--
sort.elc	18.84 KB	-rw-r--r--
symref.elc	17.35 KB	-rw-r--r--
tag-file.elc	6.45 KB	-rw-r--r--
tag-ls.elc	24.72 KB	-rw-r--r--
tag-write.elc	3.77 KB	-rw-r--r--
tag.elc	54.36 KB	-rw-r--r--
texi.elc	16.99 KB	-rw-r--r--
util-modes.elc	44.17 KB	-rw-r--r--
util.elc	13.24 KB	-rw-r--r--
wisent.elc	7.67 KB	-rw-r--r--

Code Editor : db-javascript.elc

;ELC���
;;; Compiled
;;; in Emacs version 27.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!\207" [require semantic/db semantic/db-find] 2)
#@116 Hard-coded list of javascript tags for semanticdb.
See bottom of this file for instructions on managing this list.
(defvar semanticdb-javascript-tags '(("eval" function (:arguments (("x" variable nil nil nil))) nil nil) ("parseInt" function (:arguments (("string" variable nil nil nil) ("radix" variable nil nil nil))) nil nil) ("parseFloat" function (:arguments (("string" variable nil nil nil))) nil nil) ("isNaN" function (:arguments (("number" variable nil nil nil))) nil nil) ("isFinite" function (:arguments (("number" variable nil nil nil))) nil nil) ("decodeURI" function (:arguments (("encodedURI" variable nil nil nil))) nil nil) ("decodeURIComponent" function (:arguments (("encodedURIComponent" variable nil nil nil))) nil nil) ("encodeURI" function (:arguments (("uri" variable nil nil nil))) nil nil) ("encodeURIComponent" function (:arguments (("uriComponent" variable nil nil nil))) nil nil)) (#$ . 491))
(byte-code "\300\301\302\303!\"\210\300\304\305\303!\"\210\300\306\304\"\210\307\306\310\311#\210\312\303\313\304#\314\303\315\316\317$\207" [defalias semanticdb-table-javascript-p eieio-make-class-predicate semanticdb-table-javascript semanticdb-table-javascript--eieio-childp eieio-make-child-predicate semanticdb-table-javascript-child-p make-obsolete "use (cl-typep ... \\='semanticdb-table-javascript) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (semanticdb-search-results-table) ((major-mode :initform javascript-mode)) (:documentation "A table for returning search results from javascript.")] 6)
#@66 Create a new object of class type `semanticdb-table-javascript'.
(defalias 'semanticdb-table-javascript #[(&rest slots) "\301\302\303#\207" [slots apply make-instance semanticdb-table-javascript] 4 (#$ . 2057)])
(byte-code "\300\301\302\303#\300\207" [function-put semanticdb-table-javascript compiler-macro semanticdb-table-javascript--anon-cmacro] 4)
(defalias 'semanticdb-table-javascript--anon-cmacro #[(whole &rest slots) "@;\204�	\207\302\303\304@	@#	@\305@DABB\"\207" [slots whole macroexp--warn-and-return format "Obsolete name arg %S to constructor %S" identity] 5])
(byte-code "\300\301\302\303!\"\210\300\304\305\303!\"\210\300\306\304\"\210\307\306\310\311#\210\312\303\313\304#\314\303\315\316\317$\207" [defalias semanticdb-project-database-javascript-p eieio-make-class-predicate semanticdb-project-database-javascript semanticdb-project-database-javascript--eieio-childp eieio-make-child-predicate semanticdb-project-database-javascript-child-p make-obsolete "use (cl-typep ... \\='semanticdb-project-database-javascript) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (semanticdb-project-database eieio-singleton) ((new-table-class :initform semanticdb-table-javascript :type class :documentation "New tables created for this database are of this class.")) (:documentation "Database representing javascript.")] 6)
#@77 Create a new object of class type `semanticdb-project-database-javascript'.
(defalias 'semanticdb-project-database-javascript #[(&rest slots) "\301\302\303#\207" [slots apply make-instance semanticdb-project-database-javascript] 4 (#$ . 3433)])
(byte-code "\300\301\302\303#\300\207" [function-put semanticdb-project-database-javascript compiler-macro semanticdb-project-database-javascript--anon-cmacro] 4)
(defalias 'semanticdb-project-database-javascript--anon-cmacro #[(whole &rest slots) "@;\204�	\207\302\303\304@	@#	@\305@DABB\"\207" [slots whole macroexp--warn-and-return format "Obsolete name arg %S to constructor %S" identity] 5])
(byte-code "\305 C\306\307BC\310\311#\210\312\313\311\"\210)\314\307\311\315!\316\2042�	\211\262\2042�\n\262\2050�\317\"\262\203]�\211\204]�\303N\203L�\317\303N\"\211\262\2042�\211\320N\206V�\211\321N\262\262\2022�\266\203\322\323#\210\324\306\325\fBC\310\311#\210\312\326\311\"\210)\314\325\311\315!\316\204\223�	\211\262\204\223�\n\262\205\221�\317\"\262\203\276�\211\204\276�\303N\203\255�\317\303N\"\211\262\204\223�\211\320N\206\267�\211\321N\262\262\202\223�\266\203\322\327#\210\330\331\316\332\333\334%\210\330\335\316\336\316\337%\210\330\340\316\341\316\342%\210\330\343\316\344\316\345%\207" [#1=#:tmp0 mode-local-active-mode major-mode mode-local-symbol-table #2=#:tmp0 semanticdb-project-database-javascript mode-local-bind semanticdb-project-system-databases (mode-variable-flag t) javascript-mode mode-local-map-mode-buffers #[nil "\302\301!\210\211\207" [#1# semanticdb-project-system-databases make-local-variable] 2] put symbol-name nil intern-soft mode-local-parent derived-mode-parent variable-documentation "Search javascript for symbols." (project omniscience) semanticdb-find-default-throttle #[nil "\302\301!\210\211\207" [#2# semanticdb-find-default-throttle make-local-variable] 2] "Search project files, then search this omniscience database.\nIt is not necessary to do system or recursive searching because of\nthe omniscience database." cl-generic-define-method semanticdb-get-database-tables ((obj semanticdb-project-database-javascript)) t #[(#3=#:cl--cnm obj) "\303\304\"\204�\305 \306\304	C#\210\306	\307#\210\306	\310\311#\210)\n \207" [obj newtable #3# slot-boundp tables semanticdb-table-javascript eieio-oset parent-db tags nil] 4 "For a javascript database, there are no explicit tables.\nCreate one of our special tables that can act as an intermediary."] semanticdb-file-table ((obj semanticdb-project-database-javascript) filename) #[(obj filename) "\301!@\207" [obj semanticdb-get-database-tables] 2 "From OBJ, return FILENAME's associated table object."] semanticdb-get-tags ((table semanticdb-table-javascript)) #[(table) "\207" [semanticdb-javascript-tags] 1 "Return the list of tags belonging to TABLE."] semanticdb-equivalent-mode ((table semanticdb-table-javascript) &optional buffer) #[(table &optional buffer) "rq\210	\206	�\n)\303=\207" [buffer mode-local-active-mode major-mode javascript-mode] 2 "Return non-nil if TABLE's mode is equivalent to BUFFER.\nEquivalent modes are specified by the `semantic-equivalent-major-modes'\nlocal variable."]] 9)
#@250 Return a list of semanticdb tables associated with PATH.
If brutish, do the default action.
If not brutish, do the default action, and append the system
database (if available.)

Override semanticdb-find-translate-path in `javascript-mode' buffers.
(defalias 'semanticdb-find-translate-path-javascript-mode #[(path brutish) "\306\307	\n\")\n\204�\204�\202!�\310\311\312\313\f\"\"\311
\"))\207" [semanticdb-search-system-databases path brutish default semanticdb-project-system-databases tables nil semanticdb-find-translate-path-default apply append mapcar #[(db) "\301!\207" [db semanticdb-get-database-tables] 2]] 5 (#$ . 6637)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semanticdb-find-translate-path-javascript-mode definition-name semanticdb-find-translate-path mode-local-bind ((semanticdb-find-translate-path . semanticdb-find-translate-path-javascript-mode)) (override-flag t) javascript-mode] 4)
#@57 Search for REGEXP in our fixed list of javascript tags.
(defalias 'semanticdb-javascript-regexp-search #[(regexp) "\304	\203�\305	@@\"\203�	@\nB	A\211\204�\n*\207" [semanticdb-javascript-tags tags result regexp nil string-match] 4 (#$ . 7577)])
(byte-code "\300\301\302\303\304\305%\210\300\306\302\307\304\310%\210\300\311\302\312\304\313%\210\300\314\302\315\304\316%\210\300\317\302\320\302\321%\210\300\322\302\323\302\324%\210\300\325\302\326\302\327%\210\300\330\302\331\304\332%\207" [cl-generic-define-method semanticdb-find-tags-by-name-method nil ((table semanticdb-table-javascript) name &optional tags) t #[(#1=#:cl--cnm table name &optional tags) "\203�	 \207\304\n\"\207" [tags #1# name semanticdb-javascript-tags assoc-string] 3 "Find all tags named NAME in TABLE.\nReturn a list of tags."] semanticdb-find-tags-by-name-regexp-method ((table semanticdb-table-javascript) regex &optional tags) #[(#2=#:cl--cnm table regex &optional tags) "\203�	 \207\303\n!\207" [tags #2# regex semanticdb-javascript-regexp-search] 2 "Find all tags with name matching REGEX in TABLE.\nOptional argument TAGS is a list of tags to search.\nReturn a list of tags."] semanticdb-find-tags-for-completion-method ((table semanticdb-table-javascript) prefix &optional tags) #[(#3=#:cl--cnm table prefix &optional tags) "\203�	 \207\303\304\n\305Q!\207" [tags #3# prefix semanticdb-javascript-regexp-search "^" ".*"] 4 "In TABLE, find all occurrences of tags matching PREFIX.\nOptional argument TAGS is a list of tags to search.\nReturns a table of all matching tags."] semanticdb-find-tags-by-class-method ((table semanticdb-table-javascript) class &optional tags) #[(#4=#:cl--cnm table class &optional tags) "\205�	 \207" [tags #4#] 1 "In TABLE, find all occurrences of tags of CLASS.\nOptional argument TAGS is a list of tags to search.\nReturns a table of all matching tags."] semanticdb-deep-find-tags-by-name-method ((table semanticdb-table-javascript) name &optional tags) #[(table name &optional tags) "\303	\n#\207" [table name tags semanticdb-find-tags-by-name-method] 4 "Find all tags name NAME in TABLE.\nOptional argument TAGS is a list of tags to search.\nLike `semanticdb-find-tags-by-name-method' for javascript."] semanticdb-deep-find-tags-by-name-regexp-method ((table semanticdb-table-javascript) regex &optional tags) #[(table regex &optional tags) "\303	\n#\207" [table regex tags semanticdb-find-tags-by-name-regexp-method] 4 "Find all tags with name matching REGEX in TABLE.\nOptional argument TAGS is a list of tags to search.\nLike `semanticdb-find-tags-by-name-method' for javascript."] semanticdb-deep-find-tags-for-completion-method ((table semanticdb-table-javascript) prefix &optional tags) #[(table prefix &optional tags) "\303	\n#\207" [table prefix tags semanticdb-find-tags-for-completion-method] 4 "In TABLE, find all occurrences of tags matching PREFIX.\nOptional argument TAGS is a list of tags to search.\nLike `semanticdb-find-tags-for-completion-method' for javascript."] semanticdb-find-tags-external-children-of-type-method ((table semanticdb-table-javascript) type &optional tags) #[(#5=#:cl--cnm table type &optional tags) "\205�	 \207" [tags #5#] 1 "Find all nonterminals which are child elements of TYPE.\nOptional argument TAGS is a list of tags to search.\nReturn a list of tags."]] 6)
#@47 Strip TAGS from overlays and reparse symbols.
(defalias 'semanticdb-javascript-strip-tags #[(tags) ":\203�@\301=\203�\302\207\303!\203�\302\207:\204�\207\304@!\304A!B\207" [tags reparse-symbol nil overlayp semanticdb-javascript-strip-tags] 3 (#$ . 10929)])
(provide 'semantic/db-javascript)

${this.title}

Code Editor : db-javascript.elc