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:34 2023
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/cedet/semantic/bovine/scm-by.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.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(require 'semantic/lex)
#@29 Table of language keywords.
(defconst semantic-scm-by--keyword-table (semantic-lex-make-keyword-table '(("define" . DEFINE) ("define-module" . DEFINE-MODULE) ("load" . LOAD)) '(("load" summary "Function: (load \"filename\")") ("define-module" summary "Function: (define-module (name arg1 ...)) ") ("define" summary "Function: (define symbol expression)"))) (#$ . 591))
#@26 Table of lexical tokens.
(defconst semantic-scm-by--token-table (semantic-lex-make-type-table '(("close-paren" (CLOSEPAREN . ")")) ("open-paren" (OPENPAREN . "("))) nil) (#$ . 966))
#@15 Parser table.
(defconst semantic-scm-by--parse-table (byte-code "\300\301\302\303DD\304\305\306\307\310\311\312\257D\307\313\314\315\316F\313\317\320\321\322\257\323\317\324E\325\326\327E\314\330D\257\317\302\331DD\332\305\332\333E\314\332\334E\335CF\336BBBBBB\207" [(bovine-toplevel (scheme)) scheme semantic-list #[(vals start end) "@@@A\306\307\211\310\311
\f\n\206�\312	$\"A\242-\207" [vals length depth nonterm end start scheme-list nil semantic-parse-stream semantic-lex 1] 6] scheme-list open-paren "(" scheme-in-list close-paren ")" #[#1=(vals start end) "\303A@	\nD\"\207" [vals start end append] 4] DEFINE symbol expression #[#1# "\306A@\307\3108\307\311\312\f\313\314\315\n	&,
D\"\207" [vals attributes default-value type name start append nil 2 apply semantic-tag variable :type :default-value end] 10] name-args opt-doc sequence #[#1# "\306A@@\307A@A\307\310\311\f\312\313\314\n	&,

D\"\207" [vals attributes arg-list type name start append nil apply semantic-tag function :type :arguments end] 10] DEFINE-MODULE #[#1# "\306A@GA@8\307\211\310\311\312\313\n	&+\f
D\"\207" [vals attributes detail name start end append nil apply semantic-tag package :detail] 8] LOAD string #[#1# "\306\307\310A@!!\310A@!\311\312\313\314\315\n	&+\f
D\"\207" [vals attributes system-flag name start end append file-name-nondirectory read nil apply semantic-tag include :system-flag] 8] #[#1# "\306@\307\211\310\311\312\313\n	&+\f
D\"\207" [vals attributes detail name start end append nil apply semantic-tag code :detail] 8] #[(vals start end) "@@@A\306\307\211\310\311
\f\n\206�\312	$\"A\242-\207" [vals length depth nonterm end start name-arg-expand nil semantic-parse-stream semantic-lex 1] 6] name-arg-expand #[#1# "\303A@	\nD\"\207" [vals start end append] 4] #[#1# "\303@A@B	\nD\"\207" [vals start end append] 4] #[#1# "\302	D!\207" [start end append] 3] ((opt-doc (string) nil) (sequence (expression sequence) (expression)) (expression (symbol) (semantic-list) (string) (number)))] 10) (#$ . 1154))
#@28 Setup the Semantic Parser.
(defalias 'semantic-scm-by--install-parser #[nil "\306\307\f\211\207" [semantic-scm-by--parse-table semantic--parse-table semantic-debug-parser-source semantic-debug-parser-class semantic-scm-by--keyword-table semantic-flex-keywords-obarray "scheme.by" semantic-bovine-debug-parser] 2 (#$ . 3224)])
(provide 'semantic/bovine/scm-by)