WWWWWW

Current Directory: /usr/share/emacs/24.3/lisp/cedet/semantic/bovine
Viewing File: /usr/share/emacs/24.3/lisp/cedet/semantic/bovine/make.elc
;ELC
;;; Compiled by mockbuild@buildfarm01-new.corp.cloudlinux.com on Tue Nov 11 12:57:38 2025
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/cedet/semantic/bovine/make.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!\207" [require make-mode semantic semantic/bovine semantic/bovine/make-by semantic/analyze semantic/dep] 2)
#@52 Detect and create a beginning of line token (BOL).
(defvar semantic-lex-make-backslash-no-newline nil (#$ . 763))
(defalias 'semantic-lex-make-backslash-no-newline #[nil "\300\207" [nil] 1])
(byte-code "\301\300\302M\207" [semantic-lex-make-backslash-no-newline ((and (looking-at #1="\\(\\\\\n\\s-*\\)") (semantic-lex-push-token (semantic-lex-token 'whitespace (match-beginning 1) (match-end 1))) (goto-char (match-end 1)) nil) nil) #[nil "\306``dB\307\310\311!\203@\312\313\224\313\225BB
B\211@\211\f\211\fA@\247\2041\fAA\2024\fA)A)\211\203@\313\225b\210
-\207" [semantic-lex-depth semantic-lex-maximum-depth semantic-lex-current-depth semantic-lex-analysis-bounds semantic-lex-end-point semantic-lex-token-stream nil 0 looking-at #1# whitespace 1 token] 6 "Detect and create a beginning of line token (BOL)."]] 2)
#@90 A command in a Makefile consists of a line starting with TAB, and ending at the newline.
(defvar semantic-lex-make-command nil (#$ . 1602))
(defalias 'semantic-lex-make-command #[nil "\300\207" [nil] 1])
(byte-code "\301\300\302M\207" [semantic-lex-make-command ((looking-at #1="^\\(	\\)") (let ((start (match-end 0))) (while (progn (end-of-line) (save-excursion (forward-char -1) (looking-at #2="\\\\"))) (forward-char 1)) (semantic-lex-push-token (semantic-lex-token 'shell-command start (point))))) #[nil "\306``dB\307\310\311!\203P\307\225\306\210\212\312u\210\310\313!)\203*\314u\210\202\315`BB
B\211@\211\211A@\247\204HAA\202KA)A))
-\207" [semantic-lex-depth semantic-lex-maximum-depth semantic-lex-current-depth semantic-lex-analysis-bounds semantic-lex-end-point semantic-lex-token-stream nil 0 looking-at #1# -1 #2# 1 shell-command start token] 6 "A command in a Makefile consists of a line starting with TAB, and ending at the newline."]] 2)
#@75 An automake conditional seems to really bog down the parser.
Ignore them.
(defvar semantic-lex-make-ignore-automake-conditional nil (#$ . 2588))
(defalias 'semantic-lex-make-ignore-automake-conditional #[nil "\300\207" [nil] 1])
(byte-code "\301\300\302M\207" [semantic-lex-make-ignore-automake-conditional ((looking-at #1="^@\\(\\w\\|\\s_\\)+@") (setq semantic-lex-end-point (match-end 0))) #[nil "\306``dB\307\310\311!\203\307\225
-\207" [semantic-lex-depth semantic-lex-maximum-depth semantic-lex-current-depth semantic-lex-analysis-bounds semantic-lex-end-point semantic-lex-token-stream nil 0 looking-at #1#] 5 "An automake conditional seems to really bog down the parser.\nIgnore them."]] 2)
#@74 Lexical analyzer for Makefiles.
See `semantic-lex' for more information.
(defalias 'semantic-make-lexer #[(start end &optional depth length) "\306\307\310	\n#\210`\306\211	@	A\311BC\206DE	\nBF\306G\ndV\2034\312\313\nd#\210\314 pHI\315\216\316J!\210	b\210`\nW\203\337K\203X\fGKX\203\337n\203\201\317``BB\fB\211@\211L\211LA@\247\204yLAA\202|LA)A)A\320\321!\203\216\311\225A\202\206\320\322!\203\324\311\225\306\210\212\323u\210\320\324!)\203\253\325u\210\202\227\326	`BB\fB\211@\211L\211LA@\247\204\310LAA\202\313LA)A)A)\202\206\320\327!\203	\330\325\224\325\225BB\fB\211@\211L\211LA@\247\204\371LAA\202\374LA)A)\211A\203	\325\225b\210\320\331!\203f\f@\211L@)\330=\203<\311\225A\f@\211LA@\247\2041LAA\2024LA)A\241\210\202\206\330\311\224\311\225BB\fB\211@\211L\211LA@\247\204[LAA\202^LA)A)A\202\206\320\332!\203\226\333\325\224\325\225BB\fB\211@\211L\211LA@\247\204\213LAA\202\216LA)A)A\202\206\320\334!\203\357\335\311!\211MM\336N!\205\267M;\205\267\337MN\")\211M\205\301MJ)\206\306\340\311\224\311\225BB\fB\211@\211L\211LA@\247\204\344LAA\202\347LA)A)A\202\206\320\341!\203\342\311\224\311\225BB\fB\211@\211L\211LA@\247\204LAA\202LA)A)A\202\206\320\343!\203\241E\2032BEW\203aBTB\344\311\224\311\225BB\fB\211@\211L\211LA@\247\204VLAA\202YLA)A)A\202\206\345\311\224\212O\203wP\203w\346\325!\210`\202{\306\347\350\217)BB\fB\211@\211L\211LA@\247\204\226LAA\202\231LA)A)A\202\206\320\351!\203\326BSB\352\311\224\311\225BB\fB\211@\211L\211LA@\247\204\313LAA\202\316LA)A)A\202\206\320\353!\203\354`\212O\203\361P\203\361\355\325!\210`\202\365\306\356\357\217)BB\fB\211@\211L\211LA@\247\204LAA\202LA)A)A\202\206\320Q!\203R`R\360\325!\210`R=\2039\361\362\363 \"\210\202@n\203@\323u\210`R=\203K\312\364!\210`A)\202\206\320\365!\203\202\366\311\224\311\225BB\fB\211@\211L\211LA@\247\204wLAA\202zLA)A)A\202\206\312\367!\210A@=\203\226\312\370@\f@#\210A@Ab\210S\203\263\371 \204\255\372 \203\263\373S\374\"\210\f@LT\205\332\306U\375\216L\203\314\376L!U\377\201[\201\\LB#!*)\210\202E+
\203)
\211A@\211V\211W\203\201]\201^W@W\211XA@)#\210
\211A@\211W\204\362V@YZYF@FA#b\210`\211A)\210*b\210\f\237.	\207" [semantic-lex-block-streams start end starting-position semantic-lex-token-stream semantic-lex-block-stack nil run-hook-with-args semantic-lex-reset-functions 0 error "semantic-make-lexer: end (%d) > point-max (%d)" syntax-table ((byte-code "rq\210\302	!\210)\302\207" [#1=#:buffer #2=#:table set-syntax-table] 2)) set-syntax-table bol looking-at "^@\\(\\w\\|\\s_\\)+@" "^\\(	\\)" -1 "\\\\" 1 shell-command "\\(\\\\\n\\s-*\\)" whitespace "\\s-+" "\\s-*\\(\n\\|\\s>\\)" newline "\\(\\sw\\|\\s_\\)+" match-string arrayp intern-soft symbol "\\s\\+" charquote "\\s(" open-paren semantic-list forward-list (byte-code "\300\301!\210`\207" [forward-list 1] 2) ((error (byte-code "\304	\n@\nA#b\210`\211)\207" [syntax semantic-lex-unterminated-syntax-end-function semantic-lex-analysis-bounds semantic-lex-end-point semantic-list] 4))) "\\s)" close-paren "\\s\"" string forward-sexp (byte-code "\300\301!\210`\207" [forward-sexp 1] 2) ((error (byte-code "\304	\n@\nA#b\210`\211)\207" [syntax semantic-lex-unterminated-syntax-end-function semantic-lex-analysis-bounds semantic-lex-end-point string] 4))) forward-comment skip-syntax-forward "-.'" point-at-eol "Strange comment syntax prevents lexical analysis" "\\(\\s.\\|\\s$\\|\\s'\\)" punctuation "Unmatched Text during Lexical Analysis" "semantic-make-lexer: endless loop at %d, after %S" input-pending-p accept-process-output throw lex ((byte-code "\203\301!\210\301\207" [o semantic-overlay-delete] 2)) semantic-lex-highlight-token semantic-read-event tmp-start semantic-lex-end-point semantic-lex-current-depth depth semantic-lex-depth semantic-lex-maximum-depth semantic-lex-analysis-bounds parse-sexp-lookup-properties #1# #2# semantic-lex-syntax-table length token name semantic-flex-keywords-obarray debug-on-error semantic-lex-debug-analyzers semantic-lex-comment-regex comment-start-point semantic-current-input-throw-symbol semantic-lex-debug o last blk x syntax semantic-lex-unterminated-syntax-end-function format "%S :: Depth: %d :: SPC - continue" message "semantic-make-lexer: `%s' block from %S is unterminated"] 6 (#$ . 3302)])
#@52 Expand TAG into a list of equivalent tags, or nil.
(defalias 'semantic-make-expand-tag #[(tag) "\211@)\303\211:\203Z\211A@)\304>\203Z\nG\305V\203Z\n\203g\n@\n\2061\211@)\211A@)\306\3078)!\306\3108)!\3118)\257*	B\nA\211\202 \n:\203d\n@\240\210C	*\207" [tag xpand name nil #'include 1 copy-sequence 2 3 4] 7 (#$ . 7750)])
#@183 Override `semantic-get-local-variables' so it does not throw an error.
We never have local variables in Makefiles.

Override semantic-get-local-variables in `makefile-mode' buffers.
(defalias 'semantic-get-local-variables-makefile-mode #[(&optional point) "\300\207" [nil] 1 (#$ . 8112)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semantic-get-local-variables-makefile-mode definition-name semantic-get-local-variables mode-local-bind ((semantic-get-local-variables . semantic-get-local-variables-makefile-mode)) (override-flag t) makefile-mode] 4)
#@122 List of classes that are valid to place at point.

Override semantic-ctxt-current-class-list in `makefile-mode' buffers.
(defalias 'semantic-ctxt-current-class-list-makefile-mode #[(&optional point) "\302 \211\2057\303\304\305\217\203\306\2027\307\211\211A@)	*=\203&\310\2027\311\211\211A@)	*=\2057\312)\207" [tag class semantic-current-tag nil (byte-code "\212\300\301\302\217\210\303u\210\304\305!)\207" [nil (forward-sexp -1) ((error)) -2 looking-at "\\$\\s("] 3) ((error)) (variable) function #'filename variable #'filename] 4 (#$ . 8687)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semantic-ctxt-current-class-list-makefile-mode definition-name semantic-ctxt-current-class-list mode-local-bind ((semantic-ctxt-current-class-list . semantic-ctxt-current-class-list-makefile-mode)) (override-flag t) makefile-mode] 4)
#@129 Return an abbreviated string describing tag for Makefiles.

Override semantic-format-tag-abbreviate in `makefile-mode' buffers.
(defalias 'semantic-format-tag-abbreviate-makefile-mode #[(tag &optional parent color) "\211A@)\305	\n#\211\306=\203\307P\202*\f\310=\203%\311P\202*\312	\n#*\207" [tag parent color name class semantic-format-tag-name function ":" filename "./" semantic-format-tag-abbreviate-default] 6 (#$ . 9550)])
(byte-code "\306\307\310\311#\210\312\313\314\315#\210\316\312\317BC\320\315#\210\321\322\315\"\210\210)\306\317\315\323\n!\324	\204B
\211\204B\205A\325\f\"	\203l\204l	\326N\203[\325\f	\326N\"\211\204B	\211\327N\206f	\330N)\211\204F,\331\332#\207" [#1=#:tmp0 mode symbol bind name mode-local-active-mode put semantic-format-tag-abbreviate-makefile-mode definition-name semantic-format-tag-abbreviate mode-local-bind ((semantic-format-tag-abbreviate . semantic-format-tag-abbreviate-makefile-mode)) (override-flag t) makefile-mode " " semantic-function-argument-separator (mode-variable-flag t) mode-local-map-mode-buffers #[nil "\302\301!\210\211\207" [#1# semantic-function-argument-separator make-local-variable] 2] symbol-name nil intern-soft mode-local-symbol-table mode-local-parent derived-mode-parent variable-documentation "Separator used between dependencies to rules." major-mode] 5)
#@125 Return a prototype string describing tag for Makefiles.

Override semantic-format-tag-prototype in `makefile-mode' buffers.
(defalias 'semantic-format-tag-prototype-makefile-mode #[(tag &optional parent color) "\211A@)\306\n#	\307=\203-\f\310\311\211\312\313\3148)
\"+\315#Q\202>	\316=\2039\317\fP\202>\320\n#*\207" [tag class parent color name attribute semantic-format-tag-name function ": " semantic--format-tag-arguments :arguments plist-get 2 semantic-format-tag-prototype filename "./" semantic-format-tag-prototype-default] 7 (#$ . 10924)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semantic-format-tag-prototype-makefile-mode definition-name semantic-format-tag-prototype mode-local-bind ((semantic-format-tag-prototype . semantic-format-tag-prototype-makefile-mode)) (override-flag t) makefile-mode] 4)
#@182 Return a concise prototype string describing tag for Makefiles.
This is the same as a regular prototype.

Override semantic-format-tag-concise-prototype in `makefile-mode' buffers.
(defalias 'semantic-format-tag-concise-prototype-makefile-mode #[(tag &optional parent color) "\303	\n#\207" [tag parent color semantic-format-tag-prototype] 4 (#$ . 11782)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semantic-format-tag-concise-prototype-makefile-mode definition-name semantic-format-tag-concise-prototype mode-local-bind ((semantic-format-tag-concise-prototype . semantic-format-tag-concise-prototype-makefile-mode)) (override-flag t) makefile-mode] 4)
#@174 Return a UML prototype string describing tag for Makefiles.
This is the same as a regular prototype.

Override semantic-format-tag-uml-prototype in `makefile-mode' buffers.
(defalias 'semantic-format-tag-uml-prototype-makefile-mode #[(tag &optional parent color) "\303	\n#\207" [tag parent color semantic-format-tag-prototype] 4 (#$ . 12461)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\207" [put semantic-format-tag-uml-prototype-makefile-mode definition-name semantic-format-tag-uml-prototype mode-local-bind ((semantic-format-tag-uml-prototype . semantic-format-tag-uml-prototype-makefile-mode)) (override-flag t) makefile-mode] 4)
#@194 Return a list of possible completions in a Makefile.
Uses default implementation, and also gets a list of filenames.

Override semantic-analyze-possible-completions in `makefile-mode' buffers.
(defalias 'semantic-analyze-possible-completions-makefile-mode #[(context) "\212\306\307!\210\310\311\"q\210\312!\310\313\"\314\315\n>\203Y\310\316\"@\211\314\317\320\217)\2034\f\211@)\202E\f;\203=\f\202E\f@;\205E\f@\321\314\322P#\323\324\"+\325	\",\207" [context normal classes filetags prefix tag require semantic/analyze/complete eieio-oref buffer semantic-analyze-possible-completions-default :prefixclass nil filename :prefix (byte-code ":\205#@;\205#A@9\205#A@\205#\3018<\205#\3028<\207" [tag 2 3] 2) ((error)) directory-files "^" mapcar #[(f) "\304\305\211\n\306	!\305\211\257+\207" [f attributes class name filename nil semantic-tag-make-plist] 6] append completetext default-directory files] 6 (#$ . 13112)])
(byte-code "\306\307\310\311#\210\312\313\314\315#\210\316\300\317\320\321\322\321\323\324\325\326\327&\210\312\330	BC\331\315#\210\332\333\315\"\210	\210)\306\330\315\334!\317\n\204R#\211\204R$\205Q\335
\"\n\203|\f\204|\n\336N\203k\335
\n\336N\"\211\204R\n\211\337N\206v\n\340N)\211\204V\f,\341\342#\210\306\330\315\300#\207" [semantic-makefile-dependency-system-include-path #3=#:tmp0 mode symbol bind name put semantic-analyze-possible-completions-makefile-mode definition-name semantic-analyze-possible-completions mode-local-bind ((semantic-analyze-possible-completions . semantic-analyze-possible-completions-makefile-mode)) (override-flag t) makefile-mode custom-declare-variable nil "The system include path used by Makefiles language." :group makefile semantic :type (repeat (directory :tag "Directory")) :set #[(sym val) "\303	\"\210	\304\305\nBC\306\307#\210\310\311\307\"\210\n\210)\312\313!\205\"\310\313\307\"\207" [sym val #1=#:tmp0 set-default mode-local-bind semantic-dependency-system-include-path #2=(mode-variable-flag t) makefile-mode mode-local-map-mode-buffers #[nil "\302\301!\210\211\207" [#1# semantic-dependency-system-include-path make-local-variable] 2] fboundp semantic-decoration-unparsed-include-do-reset] 4] semantic-dependency-system-include-path #2# mode-local-map-mode-buffers #[nil "\302\301!\210\211\207" [#3# semantic-dependency-system-include-path make-local-variable] 2] symbol-name intern-soft mode-local-symbol-table mode-local-parent derived-mode-parent variable-documentation "System path to search for include files." mode-local-active-mode major-mode] 12)
#@53 Set up a Makefile buffer for parsing with semantic.
(defalias 'semantic-default-make-setup #[nil "\306 \210\307\310\311\312\313\314\211\207" [semantic-symbol->name-assoc-list semantic-case-fold semantic-tag-expand-function semantic-lex-syntax-modifications imenu-create-index-function semantic-lex-analyzer semantic-make-by--install-parser ((variable . "Variables") (function . "Rules") (include . "Dependencies") (file . "File")) t semantic-make-expand-tag ((46 "_") (61 ".") (47 "_") (36 ".") (43 ".") (92 ".")) semantic-create-imenu-index semantic-make-lexer] 2 (#$ . 15712)])
(provide 'semantic/bovine/make)
F1l3 Manager
