Gecko [ goons4good.org ]

Name	Size	Permission	Date
c-by.elc	34.42 KB	-rw-r--r--	2023-06-07 04:13
c.elc	100.68 KB	-rw-r--r--	2023-06-07 04:13
debug.elc	4.23 KB	-rw-r--r--	2023-06-07 04:13
el.elc	37.21 KB	-rw-r--r--	2023-06-07 04:13
gcc.elc	5.47 KB	-rw-r--r--	2023-06-07 04:13
grammar.elc	17.06 KB	-rw-r--r--	2023-06-07 04:13
make-by.elc	5.66 KB	-rw-r--r--	2023-06-07 04:13
make.elc	15.94 KB	-rw-r--r--	2023-06-07 04:13
scm-by.elc	3.51 KB	-rw-r--r--	2023-06-07 04:13
scm.elc	9.35 KB	-rw-r--r--	2023-06-07 04:13

Rename

;ELC���
;;; Compiled by mockbuild@buildfarm06.corp.cloudlinux.com on Wed Jun  7 08:13:32 2023
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/cedet/semantic/bovine/debug.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\303\304\305\306\307$\207" [require semantic/debug semantic/find eieio-defclass semantic-bovine-debug-frame (semantic-debug-frame) ((nonterm :initarg :nonterm :type symbol :documentation "The name of the semantic nonterminal for this frame.") (rule :initarg :rule :type number :documentation "The index into NONTERM's rule list.  0 based.") (match :initarg :match :type number :documentation "The index into NONTERM's RULE's match.  0 based..") (collection :initarg :collection :type list :documentation "List of things matched so far.") (lextoken :initarg :lextoken :type list :documentation "A Token created by `semantic-lex-token'.\nThis is the lexical token being matched by the parser.")) ("Debugger frame representation for the bovinator.")] 5)
#@465 Create one bovine frame.
NONTERM is the name of a rule we are currently parsing.
RULE is the index into the list of rules in NONTERM.
MATCH is the index into the list of matches in RULE.
For example:
  this: that
      | other thing
      | here
      ;
The NONTERM is THIS.
The RULE is for "thing" is 1.
The MATCH for "thing" is 1.
COLLECTION is a list of `things' that have been matched so far.
LEXTOKEN, is a token returned by the lexer which is being matched.
(defalias 'semantic-bovine-debug-create-frame #[(nonterm rule match collection lextoken) "\306\307\310\311	\312\n\313\314\f&\315
\"\210
)\207" [nonterm rule match collection lextoken frame semantic-bovine-debug-frame "frame" :nonterm :rule :match :collection :lextoken semantic-debug-set-frame semantic-debug-current-interface] 12 (#$ . 1356)])
(byte-code "\300\301\302\301\303\"\"\210\304\301\305\306\307$\210\300\310\302\310\311\"\"\210\304\310\305\306\312$\210\313\314\315\316\317$\207" [eieio--defalias semantic-debug-frame-highlight eieio--defgeneric-init-form #1="Highlight one parser frame." eieio--defmethod nil semantic-debug-frame #[(frame) "\306\301\"\306\n\307\"\310\311\312\211$	\313=\203%�\f\203%�\f@\211@)\202)�\314	!\315\n	\306\316\"\306\317\"$\210\320\n\306\321\"\"+\207" [frame nonterm semantic-debug-current-interface pb start tag eieio-oref parser-buffer semantic-brute-find-tag-by-function #[(tag) "\211A@)\301=\207" [tag start] 3] nil bovine-toplevel symbol-name semantic-debug-highlight-rule rule match semantic-debug-highlight-lexical-token lextoken] 8 #1#] semantic-debug-frame-info #2="Display info about this one parser frame." #[(frame) "\301\302\303\304\"\"\207" [frame message "%S" eieio-oref collection] 5 #2#] eieio-defclass semantic-bovine-debug-error-frame (semantic-debug-frame) ((condition :initarg :condition :documentation "An error condition caught in an action.")) ("Debugger frame representation of a lisp error thrown during parsing.")] 5)
#@94 Create an error frame for bovine debugger.
Argument CONDITION is the thrown error condition.
(defalias 'semantic-create-bovine-debug-error-frame #[(condition) "\303\304\305#\306\n	\"\210	)\207" [condition frame semantic-debug-current-interface semantic-bovine-debug-error-frame "frame" :condition semantic-debug-set-frame] 4 (#$ . 3328)])
(byte-code "\300\301\302\301\303\"\"\210\304\301\305\306\307$\210\300\310\302\310\311\"\"\210\304\310\305\306\312$\210\313\314\315\305\316$\210\317\320!\207" [eieio--defalias semantic-debug-frame-highlight eieio--defgeneric-init-form #1="Highlight a frame from an action." eieio--defmethod nil semantic-bovine-debug-error-frame #[(frame) "\300\207" [#1#] 1 #1#] semantic-debug-frame-info #2="Display info about the error thrown." #[(frame) "\301\302\303\304\"\"\207" [frame message "Error: %S" eieio-oref condition] 5 #2#] eieio-defclass semantic-bovine-debug-parser (semantic-debug-parser) ("Represents a parser and its state.") provide semantic/bovine/debug] 5)