WWWWWW

Current Directory: /usr/share/emacs/24.3/lisp/cedet/semantic
Viewing File: /usr/share/emacs/24.3/lisp/cedet/semantic/ede-grammar.elc
;ELC
;;; Compiled by mockbuild@buildfarm01-new.corp.cloudlinux.com on Tue Nov 11 12:56:56 2025
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/cedet/semantic/ede-grammar.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!\210\300\304!\210\300\305!\210\300\306!\210\307\310\311\312\313$\210\314\315\316\315\317\"\"\210\320\315\321\310\322$\207" [require semantic ede/proj ede/pmake ede/pconf ede/proj-elisp semantic/grammar eieio-defclass semantic-ede-proj-target-grammar (ede-proj-target-elisp) ((menu :initform nil) (keybindings :initform nil) (phony :initform t) (sourcetype :initform (semantic-ede-source-grammar-wisent semantic-ede-source-grammar-bovine)) (availablecompilers :initform (semantic-ede-grammar-compiler-wisent semantic-ede-grammar-compiler-bovine)) (aux-packages :initform '("semantic" "cedet-compat")) (pre-load-packages :initform '("cedet-compat" "semantic/grammar" "semantic/bovine/grammar" "semantic/wisent/grammar"))) ("This target consists of a group of grammar files.\nA grammar target consists of grammar files that build Emacs Lisp programs for\nparsing different languages.") eieio--defalias ede-proj-makefile-dependencies eieio--defgeneric-init-form #1="Return a string representing the dependencies for THIS.\nSome compilers only use the first element in the dependencies, others\nhave a list of intermediates (object files), and others don't care.\nThis allows customization of how these elements appear.\nFor Emacs Lisp, return addsuffix command on source files." eieio--defmethod nil #[(this) "\302\301\"@\303\304	\"\203\305\306\307!\"\202#\303\310	\"\205#\305\311\307!\")\207" [this source eieio-oref string-match "\\.wy$" format "$(addsuffix -wy.elc, $(basename $(%s)))" ede-proj-makefile-sourcevar "\\.by$" "$(addsuffix -by.elc, $(basename $(%s)))"] 4 #1#]] 5)
#@53 Semantic Grammar source code definition for wisent.
(defvar semantic-ede-source-grammar-wisent (ede-sourcecode "semantic-ede-grammar-source-wisent" :name "Wisent Grammar" :sourcepattern "\\.wy$" :garbagepattern '("*-wy.el")) (#$ . 2200))
(eieio-defclass 'semantic-ede-grammar-compiler-class '(ede-compiler) nil '("Specialized compiler for semantic grammars."))
#@30 Compile Emacs Lisp programs.
(defvar semantic-ede-grammar-compiler-wisent (byte-code "\300\301\302\303\304\305\306\307\310\311\312\313\314\306\315&C\316\317\320\321&\207" [semantic-ede-grammar-compiler-class "ede-emacs-wisent-compiler" :name "emacs" :variables (("EMACS" . "emacs") ("EMACSFLAGS" . "-batch --no-site-file --eval '(setq debug-on-error t)'") ("require" . "$(foreach r,$(1),(require (quote $(r))))")) :rules ede-makefile-rule "elisp-inference-rule" :target "%-wy.el" :dependencies "%.wy" ("$(EMACS) $(EMACSFLAGS) $(addprefix -L ,$(LOADPATH)) --eval '(progn $(call require,$(PRELOADS)))' -f semantic-grammar-batch-build-packages $^") :sourcetype (semantic-ede-source-grammar-wisent) :objectextention "-wy.el"] 15) (#$ . 2567))
#@60 Semantic Grammar source code definition for the bovinator.
(defvar semantic-ede-source-grammar-bovine (ede-sourcecode "semantic-ede-grammar-source-bovine" :name "Bovine Grammar" :sourcepattern "\\.by$" :garbagepattern '("*-by.el")) (#$ . 3314))
#@30 Compile Emacs Lisp programs.
(defvar semantic-ede-grammar-compiler-bovine (byte-code "\300\301\302\303\304\305\306\307\310\311\312\313\314\306\315&C\316\317\320\321&\207" [semantic-ede-grammar-compiler-class "ede-emacs-wisent-compiler" :name "emacs" :variables (("EMACS" . "emacs") ("EMACSFLAGS" . "-batch --no-site-file --eval '(setq debug-on-error t)'") ("require" . "$(foreach r,$(1),(require (quote $(r))))")) :rules ede-makefile-rule "elisp-inference-rule" :target "%-by.el" :dependencies "%.by" ("$(EMACS) $(EMACSFLAGS) $(addprefix -L ,$(LOADPATH)) --eval '(progn $(call require,$(PRELOADS)))' -f semantic-grammar-batch-build-packages $^") :sourcetype (semantic-ede-source-grammar-bovine) :objectextention "-by.el"] 15) (#$ . 3565))
(byte-code "\301\302\303\302\304\"\"\210\305\302\306\300\307$\210\301\310\303\310\311\"\"\210\305\310\306\300\312$\210\301\313\303\313\314\"\"\210\305\313\306\300\315$\210\301\316\303\316\317\"\"\210\305\316\320\300\321$\210\301\322\303\322\323\"\"\210\305\322\324\300\325$\210\301\326\303\326\327\"\"\210\305\326\306\300\330$\210\331\332\"\210\333\334!\207" [semantic-ede-proj-target-grammar eieio--defalias ede-buffer-mine eieio--defgeneric-init-form #1="Return t if object THIS lays claim to the file in BUFFER.\nLays claim to all -by.el, and -wy.el files." eieio--defmethod nil #[(this buffer) "\301\302\303!\"\203\304\207\305 \207" [buffer string-match "-[bw]y\\.elc?$" buffer-file-name t call-next-method] 4 #1#] project-compile-target #2="Compile all sources in a Lisp target OBJ." #[(obj) "p\306	!\307\n\310\"\311\211\312\313\307	\314\"\"\210\315\316\317	!\"\210\f
-B\207" [cb obj proj default-directory comp utd ede-target-parent eieio-oref directory 0 mapc #[(src) "r\306!q\210\307 \310\311	\"\210\312\313	\"r\nq\210\314 )\315!\316P\f\317W\203F\320!\2034\321\"\203=
T\322!\202]T\211\202]\323\324\325#\326=\203W
T\211\202]T\211-\207" [src package fname csrc emacs-major-version comp find-file-noselect semantic-grammar-create-package string-match ".*/\\(.+\\.el\\)" match-string 1 buffer-file-name file-name-sans-extension ".elc" 24 file-exists-p file-newer-than-file-p byte-compile-file byte-recompile-file nil 0 t utd] 4] source message "All Semantic Grammar sources are up to date in %s" object-name] 6 #2#] ede-proj-makefile-sourcevar #3="Return the variable name for THIS's sources." #[(this) "\303 \203	\304\305!\207\306	\302\"\307\310\n\"\203!\311\312\313\314\n$\202\n*\315P\207" [this obj name ede-proj-automake-p error "No Automake support for Semantic Grammars" eieio-oref string-match #4="\\." replace-match #5="_" nil t "_SEMANTIC_GRAMMAR"] 5 #3#] ede-proj-makefile-insert-variables #6="Insert variables needed by target THIS." :AFTER #[(this) "\305\306\307\310\311\312F!!\210\313\314	\302\"\315\316\n\"\203#\317\320\321\313\n$\202\n*\322P\212db\210\323\324\325Q\321\313#)\203`\326\225b\210\327 \210i\330W\203Xh\331U\204[h\332U\204[\333c\210\202[\334c\210\321\202e\335\261\210\336\337\314\340\"\333#c\210\f\203v\341c\210db*\207" [this obj name v addcr ede-proj-makefile-insert-loadpath-items ede-proj-elisp-packages-to-loadpath "eieio" "semantic" "inversion" "ede" t eieio-oref string-match #4# replace-match #5# nil "_SEMANTIC_GRAMMAR_EL" re-search-backward "^" "\\s-*=" 0 ede-pmake-end-of-variable 40 61 32 " " "\\\n   " "=" mapconcat #[(src) "r\301!q\210\302 \303P)\207" [src find-file-noselect semantic-grammar-package ".el"] 2] source "\n"] 6 #6#] ede-proj-makefile-insert-rules #7="Insert rules needed by THIS target.\nThis raises `max-specpdl-size' and `max-lisp-eval-depth', which can be\nneeded for the compilation of the resulting parsers." :after #[(this) "\301\302\303\304\"\"c\207" [this format "%s: EMACSFLAGS+= --eval '(setq max-specpdl-size 1500 max-lisp-eval-depth 700)'\n" eieio-oref name] 5 #7#] ede-proj-makefile-insert-dist-dependencies #8="Insert dist dependencies, or intermediate targets.\nThis makes sure that all grammar lisp files are created before the dist\nruns, so they are always up to date.\nArgument THIS is the target that should insert stuff." #[(this) "\303 \210\304\305	\302\"\306\307\n\"\203\310\311\312\313\n$\202\n*\314\261\207" [this obj name call-next-method " $(" eieio-oref string-match #4# replace-match #5# nil t "_SEMANTIC_GRAMMAR_EL)"] 6 #8#] ede-proj-register-target "semantic grammar" provide semantic/ede-grammar] 5)
F1l3 Manager
