Linux server.edchosting.com 4.18.0-553.79.1.lve.el7h.x86_64 #1 SMP Wed Oct 15 16:34:46 UTC 2025 x86_64
LiteSpeed
Server IP : 75.98.162.185 & Your IP : 216.73.216.163
Domains :
Cant Read [ /etc/named.conf ]
User : goons4good
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
usr /
share /
emacs /
24.3 /
lisp /
progmodes /
Delete
Unzip
Name
Size
Permission
Date
Action
ada-mode.elc
107.31
KB
-rw-r--r--
2023-06-07 04:14
ada-prj.elc
17.96
KB
-rw-r--r--
2023-06-07 04:14
ada-stmt.elc
35.97
KB
-rw-r--r--
2023-06-07 04:14
ada-xref.elc
55.09
KB
-rw-r--r--
2023-06-07 04:14
antlr-mode.elc
79.34
KB
-rw-r--r--
2023-06-07 04:14
asm-mode.elc
7.69
KB
-rw-r--r--
2023-06-07 04:14
autoconf.elc
5.1
KB
-rw-r--r--
2023-06-07 04:14
bug-reference.elc
6.43
KB
-rw-r--r--
2023-06-07 04:14
cap-words.elc
3.59
KB
-rw-r--r--
2023-06-07 04:14
cc-align.elc
35.39
KB
-rw-r--r--
2023-06-07 04:14
cc-awk.elc
17.81
KB
-rw-r--r--
2023-06-07 04:14
cc-bytecomp.elc
9.35
KB
-rw-r--r--
2023-06-07 04:14
cc-cmds.elc
96.69
KB
-rw-r--r--
2023-06-07 04:14
cc-compat.elc
2.92
KB
-rw-r--r--
2023-06-07 04:14
cc-defs.elc
49.04
KB
-rw-r--r--
2023-06-07 04:14
cc-engine.elc
173.3
KB
-rw-r--r--
2023-06-07 04:14
cc-fonts.elc
153.89
KB
-rw-r--r--
2023-06-07 04:14
cc-guess.elc
13.77
KB
-rw-r--r--
2023-06-07 04:14
cc-langs.elc
75.55
KB
-rw-r--r--
2023-06-07 04:14
cc-menus.elc
7.28
KB
-rw-r--r--
2023-06-07 04:14
cc-mode.elc
191.85
KB
-rw-r--r--
2023-06-07 04:14
cc-styles.elc
16.38
KB
-rw-r--r--
2023-06-07 04:14
cc-vars.elc
69.17
KB
-rw-r--r--
2023-06-07 04:14
cfengine.elc
15.58
KB
-rw-r--r--
2023-06-07 04:14
cmacexp.elc
6.3
KB
-rw-r--r--
2023-06-07 04:14
compile.elc
83.66
KB
-rw-r--r--
2023-06-07 04:14
cperl-mode.elc
215.31
KB
-rw-r--r--
2023-06-07 04:14
cpp.elc
22.18
KB
-rw-r--r--
2023-06-07 04:14
cwarn.elc
11.09
KB
-rw-r--r--
2023-06-07 04:14
dcl-mode.elc
50.23
KB
-rw-r--r--
2023-06-07 04:14
delphi.elc
50.8
KB
-rw-r--r--
2023-06-07 04:14
ebnf-abn.elc
6.88
KB
-rw-r--r--
2023-06-07 04:14
ebnf-bnf.elc
7.67
KB
-rw-r--r--
2023-06-07 04:14
ebnf-dtd.elc
13.03
KB
-rw-r--r--
2023-06-07 04:15
ebnf-ebx.elc
7.99
KB
-rw-r--r--
2023-06-07 04:15
ebnf-iso.elc
7.83
KB
-rw-r--r--
2023-06-07 04:15
ebnf-otz.elc
8.46
KB
-rw-r--r--
2023-06-07 04:15
ebnf-yac.elc
7.22
KB
-rw-r--r--
2023-06-07 04:15
ebnf2ps.elc
117.22
KB
-rw-r--r--
2023-06-07 04:15
ebrowse.elc
206.22
KB
-rw-r--r--
2023-06-07 04:15
etags.elc
55.93
KB
-rw-r--r--
2023-06-07 04:15
executable.elc
7.49
KB
-rw-r--r--
2023-06-07 04:15
f90.elc
92.25
KB
-rw-r--r--
2023-06-07 04:15
flymake.elc
61.63
KB
-rw-r--r--
2023-06-07 04:15
fortran.elc
60.04
KB
-rw-r--r--
2023-06-07 04:15
gdb-mi.elc
169.74
KB
-rw-r--r--
2023-06-07 04:15
glasses.elc
10.17
KB
-rw-r--r--
2023-06-07 04:15
grep.elc
32.61
KB
-rw-r--r--
2023-06-07 04:15
gud.elc
93.14
KB
-rw-r--r--
2023-06-07 04:15
hideif.elc
26.37
KB
-rw-r--r--
2023-06-07 04:15
hideshow.elc
25.32
KB
-rw-r--r--
2023-06-07 04:15
icon.elc
16.85
KB
-rw-r--r--
2023-06-07 04:15
idlw-complete-structtag.elc
4.5
KB
-rw-r--r--
2023-06-07 04:15
idlw-help.elc
36.32
KB
-rw-r--r--
2023-06-07 04:15
idlw-shell.elc
130.41
KB
-rw-r--r--
2023-06-07 04:15
idlw-toolbar.elc
27.61
KB
-rw-r--r--
2023-06-07 04:15
idlwave.elc
251.77
KB
-rw-r--r--
2023-06-07 04:15
inf-lisp.elc
20.29
KB
-rw-r--r--
2023-06-07 04:15
js.elc
95.5
KB
-rw-r--r--
2023-06-07 04:15
ld-script.elc
5.68
KB
-rw-r--r--
2023-06-07 04:15
m4-mode.elc
6.12
KB
-rw-r--r--
2023-06-07 04:15
make-mode.elc
63.81
KB
-rw-r--r--
2023-06-07 04:15
mantemp.elc
3.71
KB
-rw-r--r--
2023-06-07 04:15
meta-mode.elc
32.62
KB
-rw-r--r--
2023-06-07 04:15
mixal-mode.elc
36.42
KB
-rw-r--r--
2023-06-07 04:15
modula2.elc
29.79
KB
-rw-r--r--
2023-06-07 04:15
octave-inf.elc
13.56
KB
-rw-r--r--
2023-06-07 04:15
octave-mod.elc
33.98
KB
-rw-r--r--
2023-06-07 04:15
pascal.elc
39.33
KB
-rw-r--r--
2023-06-07 04:15
perl-mode.elc
24.86
KB
-rw-r--r--
2023-06-07 04:15
prolog.elc
95.73
KB
-rw-r--r--
2023-06-07 04:15
ps-mode.elc
34.13
KB
-rw-r--r--
2023-06-07 04:15
python.elc
99.85
KB
-rw-r--r--
2023-06-07 04:15
ruby-mode.elc
36.94
KB
-rw-r--r--
2023-06-07 04:15
scheme.elc
18.28
KB
-rw-r--r--
2023-06-07 04:15
sh-script.elc
103.89
KB
-rw-r--r--
2023-06-07 04:15
simula.elc
45.68
KB
-rw-r--r--
2023-06-07 04:15
sql.elc
158.59
KB
-rw-r--r--
2023-06-07 04:15
subword.elc
10.31
KB
-rw-r--r--
2023-06-07 04:15
tcl.elc
39.55
KB
-rw-r--r--
2023-06-07 04:15
vera-mode.elc
45.89
KB
-rw-r--r--
2023-06-07 04:15
verilog-mode.elc
419.97
KB
-rw-r--r--
2023-06-07 04:15
vhdl-mode.elc
528.67
KB
-rw-r--r--
2023-06-07 04:15
which-func.elc
9.72
KB
-rw-r--r--
2023-06-07 04:11
xscheme.elc
37.06
KB
-rw-r--r--
2023-06-07 04:15
Save
Rename
;ELC ;;; Compiled by mockbuild@buildfarm06.corp.cloudlinux.com on Wed Jun 7 08:15:06 2023 ;;; from file /builddir/build/BUILD/emacs-24.3/lisp/progmodes/flymake.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. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; #@71 If t, flymake syntax check process is running for the current buffer. (defvar flymake-is-running nil (#$ . 556)) (make-variable-buffer-local 'flymake-is-running) #@34 Timer for starting syntax check. (defvar flymake-timer nil (#$ . 724)) (make-variable-buffer-local 'flymake-timer) #@29 Time of last buffer change. (defvar flymake-last-change-time nil (#$ . 845)) (make-variable-buffer-local 'flymake-last-change-time) #@41 Time at which syntax check was started. (defvar flymake-check-start-time nil (#$ . 983)) (make-variable-buffer-local 'flymake-check-start-time) #@58 Non-nil if syntax check was killed by `flymake-compile'. (defvar flymake-check-was-interrupted nil (#$ . 1133)) (make-variable-buffer-local 'flymake-check-was-interrupted) #@81 Sorted list of line numbers and lists of err info in the form (file, err-text). (defvar flymake-err-info nil (#$ . 1311)) (make-variable-buffer-local 'flymake-err-info) #@75 Same as `flymake-err-info', effective when a syntax check is in progress. (defvar flymake-new-err-info nil (#$ . 1486)) (make-variable-buffer-local 'flymake-new-err-info) (defalias 'flymake-makehash #[(&optional test) "\301\302!\203 \203 \302\303\"\207\302 \207\304!\207" [test fboundp make-hash-table :test makehash] 3]) (byte-code "\300\301\302\303#\210\304\305\306\307!\205 \307\"\210\304\310\311\"\210\304\312\313\314\315\217\203# \316\202$ \317\"\210\304\320\306\321!\2032 \321\2023 \322\"\207" [put flymake-makehash byte-optimizer byte-compile-inline-expand defalias flymake-float-time fboundp float-time flymake-replace-regexp-in-string replace-regexp-in-string flymake-split-string nil (byte-code "\300\301\302\303#\304\232\207" [split-string " bc " " " t ("bc")] 4) ((error)) #[(str pattern) "\302 \303#\207" [str pattern split-string t] 4] #[(str pattern) "\303 \"\211@\304\232\203 \nA\211\202 \n\237\211@\304\232\203$ \nA\211\202 \n\237)\207" [str pattern split split-string ""] 4 "Split STR into a list of substrings bounded by PATTERN.\nZero-length substrings at the beginning and end of the list are omitted."] flymake-get-temp-dir temp-directory #[nil "\207" [temporary-file-directory] 1]] 5) #@387 Return pixel position of top left corner of glyph at POSITION, relative to top left corner of WINDOW, as a mouse-1 click event (identical to the event that would be triggered by clicking mouse button 1 at the top left corner of the glyph). POSITION and WINDOW default to the position of point in the selected window. DX and DY specify optional offsets from the top left of the glyph. (defalias 'flymake-posn-at-point-as-event #[(&optional position window dx dy) "\204 \306 \204 \307!\n\204 \310 \204 \310\311 \"\211 \312 8) \313! \314! \fAA\315 @@@[\n$\315 A\211 A@)\211 A@)[ $B\240\210\316\f,D\207" [window position dx dy pos x-y selected-window window-point 0 posn-at-point 2 window-inside-pixel-edges window-pixel-edges + mouse-1 edges win-x-y x] 8 (#$ . 2717)]) #@274 Pop up the flymake menu at point, using the data MENU-DATA. POS is a list of the form ((X Y) WINDOW), where X and Y are pixels positions from the top left corner of WINDOW's frame. MENU-DATA is a list of error and warning messages returned by `flymake-make-err-menu-data'. (defalias 'flymake-popup-menu #[(menu-data) "\301\302 \303!\"\207" [menu-data x-popup-menu flymake-posn-at-point-as-event flymake-make-emacs-menu] 4 (#$ . 3519)]) #@184 Return a menu specifier using MENU-DATA. MENU-DATA is a list of error and warning messages returned by `flymake-make-err-menu-data'. See `x-popup-menu' for the menu specifier format. (defalias 'flymake-make-emacs-menu #[(menu-data) "@A@\304\305\n\" \306 +BD\207" [menu-data menu-title menu-items menu-commands mapcar #[(foo) "@A@B\207" [foo] 2] ""] 3 (#$ . 3963)]) #@127 Logging level, only messages with level lower or equal will be logged. -1 = NONE, 0 = ERROR, 1 = WARNING, 2 = INFO, 3 = DEBUG (custom-declare-variable 'flymake-log-level -1 '(#$ . 4342) :group 'flymake :type 'integer) #@254 Log a message at level LEVEL. If LEVEL is higher than `flymake-log-level', the message is ignored. Otherwise, it is printed using `message'. TEXT is a format control string, and the remaining arguments ARGS are the string substitutions (see `format'). (defalias 'flymake-log #[(level text &rest args) " X\205 \305\306\n # \307\310\f\")\207" [level flymake-log-level text args msg apply format message "%s"] 4 (#$ . 4567)]) #@42 Insert VAL into LIST after position POS. (defalias 'flymake-ins-after #[(list pos val) "\304!\n \233 \nT \233B\241\210 )\207" [list tmp pos val copy-sequence] 4 (#$ . 4999)]) #@34 Set VAL at position POS in LIST. (defalias 'flymake-set-at #[(list pos val) "\304!\n \233 \240\210 )\207" [list tmp pos val copy-sequence] 2 (#$ . 5182)]) #@45 List of currently active flymake processes. (defvar flymake-processes nil (#$ . 5345)) (defvar flymake-output-residual nil) (byte-code "\300\301!\210\302\303\304\305\306\307\310\311&\210\312\313\314\315\310\303\316\317&\207" [make-variable-buffer-local flymake-output-residual custom-declare-group flymake nil "Universal on-the-fly syntax checker." :version "23.1" :group tools custom-declare-variable flymake-allowed-file-name-masks '(("\\.\\(?:c\\(?:pp\\|xx\\|\\+\\+\\)?\\|CC\\)\\'" flymake-simple-make-init) ("\\.xml\\'" flymake-xml-init) ("\\.html?\\'" flymake-xml-init) ("\\.cs\\'" flymake-simple-make-init) ("\\.p[ml]\\'" flymake-perl-init) ("\\.php[345]?\\'" flymake-php-init) ("\\.h\\'" flymake-master-make-header-init flymake-master-cleanup) ("\\.java\\'" flymake-simple-make-java-init flymake-simple-java-cleanup) ("[0-9]+\\.tex\\'" flymake-master-tex-init flymake-master-cleanup) ("\\.tex\\'" flymake-simple-tex-init) ("\\.idl\\'" flymake-simple-make-init)) "Files syntax checking is allowed for." :type (repeat (string symbol symbol symbol))] 8) #@72 Return the corresponding entry from `flymake-allowed-file-name-masks'. (defalias 'flymake-get-file-name-mode-and-masks #[(file-name) ";\204 \304\305!\210 \306\n\204( \203( \307 @@\"\203\" @A A\202 \310\311\312\n@$\210\n*\207" [file-name flymake-allowed-file-name-masks mode-and-masks fnm error "Invalid file-name" nil string-match flymake-log 3 "file %s, init=%s"] 5 (#$ . 6411)]) #@94 Determine whether we can syntax check FILE-NAME. Return nil if we cannot, non-nil if we can. (defalias 'flymake-can-syntax-check-file #[(file-name) "\301!\205 \302\207" [file-name flymake-get-init-function t] 2 (#$ . 6809)]) #@47 Return init function to be used for the file. (defalias 'flymake-get-init-function #[(file-name) "\301!@\207" [file-name flymake-get-file-name-mode-and-masks] 3 (#$ . 7042)]) #@50 Return cleanup function to be used for the file. (defalias 'flymake-get-cleanup-function #[(file-name) "\301!A@\206 \302\207" [file-name flymake-get-file-name-mode-and-masks flymake-simple-cleanup] 2 (#$ . 7224)]) (defalias 'flymake-get-real-file-name-function #[(file-name) "\301\302!8\206 \303\207" [file-name 2 flymake-get-file-name-mode-and-masks flymake-get-real-file-name] 3]) (defvar flymake-find-buildfile-cache (byte-code "\301\302\303!\203 \203 \303\304\"\202 \303 \202 \305!)\207" [test equal fboundp make-hash-table :test makehash] 3)) (defalias 'flymake-get-buildfile-from-cache #[(dir-name) "\302 \"\207" [dir-name flymake-find-buildfile-cache gethash] 3]) (defalias 'flymake-add-buildfile-to-cache #[(dir-name buildfile) "\303 \n#\207" [dir-name buildfile flymake-find-buildfile-cache puthash] 4]) (defalias 'flymake-clear-buildfile-cache #[nil "\301!\207" [flymake-find-buildfile-cache clrhash] 2]) #@145 Find buildfile starting from current directory. Buildfile includes Makefile, build.xml etc. Return its file name if found, or nil if not found. (defalias 'flymake-find-buildfile #[(buildfile-name source-dir-name) "\303!\206& \304 \"\211\203 \305\306\307\n#\210\310\n\"\210\n\202% \305\306\311#\210\312)\207" [source-dir-name buildfile-name file flymake-get-buildfile-from-cache locate-dominating-file flymake-log 3 "found buildfile at %s" flymake-add-buildfile-to-cache "buildfile for %s not found" nil] 5 (#$ . 8161)]) #@41 Replace all occurrences of '' with '/'. (defalias 'flymake-fix-file-name #[(name) "\205 \301!\302!\303!\211\207" [name expand-file-name abbreviate-file-name directory-file-name] 3 (#$ . 8693)]) #@90 Check if FILE-NAME-ONE and FILE-NAME-TWO point to same file. Return t if so, nil if not. (defalias 'flymake-same-files #[(file-name-one file-name-two) "\302!\302 !\232\207" [file-name-one file-name-two flymake-fix-file-name] 3 (#$ . 8901)]) (byte-code "\300\301\302\303\304\305\306\307&\210\300\310\311\312\304\305\306\313&\207" [custom-declare-variable flymake-master-file-dirs '("." "./src" "./UnitTest") "Dirs where to look for master files." :group flymake :type (repeat (string)) flymake-master-file-count-limit 32 "Max number of master files to check." integer] 8) #@214 Find (by name and location) all possible master files. Master files include .cpp and .c for .h. Files are searched for starting from the .h directory and max max-level parent dirs. File contents are not checked. (defalias 'flymake-find-possible-master-files #[(file-name master-file-dirs masks) "\306\211 \204\201 \203\201 \307 @\310\f!\" \311 !\203z \204z \203z @ \312 \313# \314\315\316 G%\210 \204q \203q \317@!\204i @\nB\211GY\203i \314\315\320#\210\313A\202A *A\202 * A\202 \n\203\220 \321\f! \322\n\323\")\314\315\324\nG#\210\n+\207" [master-file-dirs dirs files done file-name dir nil expand-file-name file-name-directory file-exists-p directory-files t flymake-log 3 "dir %s, %d file(s) for mask %s" file-directory-p "master file count limit (%d) reached" file-name-nondirectory sort flymake-master-file-compare "found %d possible master file(s)" masks mask dir-files flymake-master-file-count-limit flymake-included-file-name] 7 (#$ . 9482)]) #@182 Compare two files specified by FILE-ONE and FILE-TWO. This function is used in sort to move most possible file names to the beginning of the list (File.h -> File.cpp moved to top). (defalias 'flymake-master-file-compare #[(file-one file-two) "\303!\304 !\232\205 \n\232?\207" [flymake-included-file-name file-one file-two file-name-sans-extension file-name-base] 3 (#$ . 10489)]) #@106 Maximum number of chars to look at when checking possible master file. Nil means search the entire file. (custom-declare-variable 'flymake-check-file-limit 8192 '(#$ . 10879) :group 'flymake :type '(choice (const :tag "No limit" nil) (integer :tag "Characters"))) #@340 Check if MASTER-FILE-NAME is a master file for SOURCE-FILE-NAME. If yes, patch a copy of MASTER-FILE-NAME to include PATCHED-SOURCE-FILE-NAME instead of SOURCE-FILE-NAME. For example, foo.cpp is a master file if it includes foo.h. Whether a buffer for MATER-FILE-NAME exists, use it as a source instead of reading master file from disk. (defalias 'flymake-check-patch-master-file-buffer #[(master-file-temp-buffer master-file-name patched-master-file-name source-file-name patched-source-file-name include-dirs regexp) "\306!\307 !\310 !\311\211 ! \"\312#\nG\313V\2030 \n\314\230\2030 \312\315\316 !\316\n!#\2023 \316 !\"#\317\216r$q\210\"\203I \"dV\203L d\"\320\321\322%#$\210eb\210`\"W\203\314 \323#\"\324#\203\314 \313\224\313\225 & '\320\321\325 #\210\326\313!\nG\313V\203\227 \n\314\230\203\227 \327\312\330\n\" \"\204\227 \331\nQ\332 \311\211 \211G GZ\311&\324=\203\305 \320\321\333 #\210\334 (#\203\305 \324\335'&\306)!#\210\313y\210*\202X \f\203\325 \336*!\210*\f\203\341 \320\337\340%#\210\f.\207" [source-file-name source-file-nondir source-file-extension source-file-nonext found inc-name file-name-nondirectory file-name-extension file-name-sans-extension nil format 1 "tex" "%s\\(?:\\.%s\\)?" regexp-quote ((kill-buffer master-file-temp-buffer)) flymake-log 3 "checking %s against regexp %s" re-search-forward t "found possible match for %s" match-string string-match "\\.%s\\'" "." compare-strings "inc-name=%s" flymake-check-include flymake-replace-region flymake-save-buffer-in-file 2 "found master file %s" flymake-check-file-limit search-limit regexp master-file-temp-buffer master-file-name match-end match-beg include-dirs patched-source-file-name patched-master-file-name] 8 (#$ . 11150)]) #@54 Replace text in BUFFER in region (BEG END) with REP. (defalias 'flymake-replace-region #[(beg end rep) "\212b\210 c\210\n|)\207" [end rep beg] 2 (#$ . 12899)]) #@62 Insert contents of FILE-NAME into newly created temp buffer. (defalias 'flymake-read-file-to-temp-buffer #[(file-name) "\302\303\304\305!P!!r q\210\306!\210) )\207" [file-name temp-buffer get-buffer-create generate-new-buffer-name "flymake:" file-name-nondirectory insert-file-contents] 5 (#$ . 13067)]) #@57 Copy contents of BUFFER into newly created temp buffer. (defalias 'flymake-copy-buffer-to-temp-buffer #[(buffer) "r\301\302\303\304!P!!q\210\305!\210p)\207" [buffer get-buffer-create generate-new-buffer-name "flymake:" buffer-name insert-buffer-substring] 5 (#$ . 13380)]) #@118 Check if SOURCE-FILE-NAME can be found in include path. Return t if it can be found via include path using INC-NAME. (defalias 'flymake-check-include #[(source-file-name inc-name include-dirs) "\303!\203 \304 \"\207\n\203& \304 \305 !\306\n@\306\260\"\204& \nA\211\204 \n\207" [inc-name source-file-name include-dirs file-name-absolute-p flymake-same-files file-name-directory "/"] 8 (#$ . 13662)]) #@80 Check if there exists a buffer visiting FILE-NAME. Return t if so, nil if not. (defalias 'flymake-find-buffer-for-file #[(file-name) "\302!\211\205 \303 !)\207" [file-name buffer-name get-file-buffer get-buffer] 3 (#$ . 14074)]) #@83 Save SOURCE-FILE-NAME with a different name. Find master file, patch and save it. (defalias 'flymake-create-master-file #[(source-file-name patched-source-file-name get-incl-dirs-f create-temp-f masks include-regexp) "\306 \n#\211G \307 \310\211 \310\211 \204d \fW\203d 8\311\"\312!\203A \313\312!!\202G \314!\315\316!!& T\202 \203q D\202{ \317\320\321\f\322!$\210\310.\207" [source-file-name flymake-master-file-dirs masks possible-master-files master-file-count idx flymake-find-possible-master-files 0 nil "flymake_master" flymake-find-buffer-for-file flymake-copy-buffer-to-temp-buffer flymake-read-file-to-temp-buffer flymake-check-patch-master-file-buffer file-name-directory flymake-log 3 "none of %d master file(s) checked includes %s" file-name-nondirectory temp-buffer master-file-name patched-master-file-name found create-temp-f patched-source-file-name get-incl-dirs-f include-regexp] 10 (#$ . 14312)]) (defalias 'flymake-save-buffer-in-file #[(file-name) "\301\302!\303\"\210\304\305\211\305\306%\210\307\310\311\312 $\207" [file-name make-directory file-name-directory 1 write-region nil 566 flymake-log 3 "saved buffer %s in file %s" buffer-name] 6]) #@37 Save string DATA to file FILE-NAME. (defalias 'flymake-save-string-to-file #[(file-name data) "\302\303 \303\304%\207" [data file-name write-region nil 566] 6 (#$ . 15547)]) #@57 Read contents of file FILE-NAME and return as a string. (defalias 'flymake-read-file-to-string #[(file-name) "\302\303!rq\210\304\216\305 !\210ed{+\207" [#1=#:temp-buffer file-name generate-new-buffer " *temp*" ((byte-code "\301!\203\n \302!\210\301\207" [#1# buffer-name kill-buffer] 2)) insert-file-contents] 2 (#$ . 15728)]) #@70 Parse OUTPUT and highlight error lines. It's flymake process filter. (defalias 'flymake-process-filter #[(process output) "\303!\304\305\306\nG\307!$\210\310 !\205 r q\210\311\n!))\207" [process source-buffer output process-buffer flymake-log 3 "received %d byte(s) of output from process %d" process-id buffer-live-p flymake-parse-output-and-residual] 6 (#$ . 16066)]) #@36 Sentinel for syntax check buffers. (defalias 'flymake-process-sentinel #[(process _event) "\305!\306>\205( \307!\310!\311!\312\313 !! \314\315\316\317! $\210\320\321\322\217,\207" [process exit-status command source-buffer cleanup-f process-status (signal exit) process-exit-status process-command process-buffer flymake-get-cleanup-function buffer-file-name flymake-log 2 "process %d exited with code %d" process-id err (byte-code "\306\307\310#\210\311 !\203 r q\210 \210)\312\n!\210\313\n \"\311 !\2054 r q\210\314 \210\315\f \"\210\316\211)\207" [cleanup-f source-buffer process flymake-processes exit-status command flymake-log 3 "cleaning up using %s" buffer-live-p delete-process delq flymake-parse-residual flymake-post-syntax-check nil flymake-is-running] 4) ((error (byte-code "\304\305\306 !#\307\310\n\"\210rq\210\311\211*\207" [source-buffer err err-str flymake-is-running format "Error in process sentinel for buffer %s: %s" error-message-string flymake-log 0 nil] 5)))] 5 (#$ . 16446)]) (defalias 'flymake-post-syntax-check #[(exit-status command) "\306\307 \310\311 #\312 \210\313 !\210\306\211\314 \315\"\314 \316\"\317\320\321\322 \n\323 \fZ&\210\306 \324\232\203` \n\324\232\203` \324\232\203I \325\326\211\"\202h \204Y \327\330\331\332 \"\"\202h \325\306\326\"\202h \325\331\333 \n#\326\"*\207" [flymake-new-err-info flymake-err-info warn-count err-count flymake-check-start-time exit-status nil flymake-fix-line-numbers 1 flymake-count-lines flymake-delete-own-overlays flymake-highlight-err-lines flymake-get-err-count "e" "w" flymake-log 2 "%s: %d error(s), %d warning(s) in %.2f second(s)" buffer-name flymake-float-time 0 flymake-report-status "" flymake-report-fatal-status "CFGERR" format "Configuration error has occurred while running %s" "%d/%d" flymake-check-was-interrupted command] 8]) #@58 Split OUTPUT into lines, merge in residual if necessary. (defalias 'flymake-parse-output-and-residual #[(output) "\211\203\f \nP\202 \n\306 !\211 @ \fA@\211 \307 \"\211 -\207" [flymake-output-residual buffer-residual output total-output lines-and-residual lines flymake-split-output flymake-parse-err-lines new-residual flymake-new-err-info] 4 (#$ . 18304)]) #@35 Parse residual if it's non empty. (defalias 'flymake-parse-residual #[nil "\205 \302 C\"\303\211\207" [flymake-output-residual flymake-new-err-info flymake-parse-err-lines nil] 3 (#$ . 18679)]) (defalias 'flymake-er-make-er #[(line-no line-err-info-list) " D\207" [line-no line-err-info-list] 2]) (defalias 'flymake-er-get-line #[(err-info) "@\207" [err-info] 1]) (defalias 'flymake-er-get-line-err-info-list #[(err-info) "A@\207" [err-info] 1]) (byte-code "\301\302\303\304#\210\305\301\302\306\307\310!!#\210)\301\207" [file put flymake-ler-file compiler-macro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block flymake-ler-file (or (and (memq (aref cl-x 0) cl-struct-flymake-ler-tags)) (error "%s accessing a non-%s" 'flymake-ler-file 'flymake-ler)) (aref cl-x 1)) nil] 7] "/builddir/build/BUILD/emacs-24.3/lisp/progmodes/flymake.el" compiler-macro-file purecopy file-name-nondirectory] 6) (defalias 'flymake-ler-file #[(cl-x) "\302H >\204 \303\304\305\306#\210\307H\207" [cl-x cl-struct-flymake-ler-tags 0 error "%s accessing a non-%s" flymake-ler-file flymake-ler 1] 4]) (byte-code "\301\302\303\304#\210\305\301\302\306\307\310!!#\210)\301\207" [file put flymake-ler-line compiler-macro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block flymake-ler-line (or (and (memq (aref cl-x 0) cl-struct-flymake-ler-tags)) (error "%s accessing a non-%s" 'flymake-ler-line 'flymake-ler)) (aref cl-x 2)) nil] 7] "/builddir/build/BUILD/emacs-24.3/lisp/progmodes/flymake.el" compiler-macro-file purecopy file-name-nondirectory] 6) (defalias 'flymake-ler-line #[(cl-x) "\302H >\204 \303\304\305\306#\210\307H\207" [cl-x cl-struct-flymake-ler-tags 0 error "%s accessing a non-%s" flymake-ler-line flymake-ler 2] 4]) (byte-code "\301\302\303\304#\210\305\301\302\306\307\310!!#\210)\301\207" [file put flymake-ler-type compiler-macro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block flymake-ler-type (or (and (memq (aref cl-x 0) cl-struct-flymake-ler-tags)) (error "%s accessing a non-%s" 'flymake-ler-type 'flymake-ler)) (aref cl-x 3)) nil] 7] "/builddir/build/BUILD/emacs-24.3/lisp/progmodes/flymake.el" compiler-macro-file purecopy file-name-nondirectory] 6) (defalias 'flymake-ler-type #[(cl-x) "\302H >\204 \303\304\305\306#\210\307H\207" [cl-x cl-struct-flymake-ler-tags 0 error "%s accessing a non-%s" flymake-ler-type flymake-ler 3] 4]) (byte-code "\301\302\303\304#\210\305\301\302\306\307\310!!#\210)\301\207" [file put flymake-ler-text compiler-macro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block flymake-ler-text (or (and (memq (aref cl-x 0) cl-struct-flymake-ler-tags)) (error "%s accessing a non-%s" 'flymake-ler-text 'flymake-ler)) (aref cl-x 4)) nil] 7] "/builddir/build/BUILD/emacs-24.3/lisp/progmodes/flymake.el" compiler-macro-file purecopy file-name-nondirectory] 6) (defalias 'flymake-ler-text #[(cl-x) "\302H >\204 \303\304\305\306#\210\307H\207" [cl-x cl-struct-flymake-ler-tags 0 error "%s accessing a non-%s" flymake-ler-text flymake-ler 4] 4]) (byte-code "\301\302\303\304#\210\305\301\302\306\307\310!!#\210)\301\207" [file put flymake-ler-full-file compiler-macro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block flymake-ler-full-file (or (and (memq (aref cl-x 0) cl-struct-flymake-ler-tags)) (error "%s accessing a non-%s" 'flymake-ler-full-file 'flymake-ler)) (aref cl-x 5)) nil] 7] "/builddir/build/BUILD/emacs-24.3/lisp/progmodes/flymake.el" compiler-macro-file purecopy file-name-nondirectory] 6) (defalias 'flymake-ler-full-file #[(cl-x) "\302H >\204 \303\304\305\306#\210\307H\207" [cl-x cl-struct-flymake-ler-tags 0 error "%s accessing a non-%s" flymake-ler-full-file flymake-ler 5] 4]) (byte-code "\301\302\303\304#\210\305\301\302\306\307\310!!#\210)\301\207" [file put flymake-ler-p compiler-macro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block flymake-ler-p (and (vectorp cl-x) (>= (length cl-x) 6) (memq (aref cl-x 0) cl-struct-flymake-ler-tags) t)) nil] 7] "/builddir/build/BUILD/emacs-24.3/lisp/progmodes/flymake.el" compiler-macro-file purecopy file-name-nondirectory] 6) (defalias 'flymake-ler-p #[(cl-x) "\302!\205 G\303Y\205 \304H >\205 \305\207" [cl-x cl-struct-flymake-ler-tags vectorp 6 0 t] 2]) (defalias 'copy-flymake-ler #[(x) "\301!\207" [x copy-sequence] 2]) (byte-code "\301\302\303\304#\210\305\301\302\306\307\310!!#\210)\301\207" [file put flymake-ler-make-ler compiler-macro #[(_cl-whole-arg file line type text &rest #1=#:--cl-rest--) "\211A@\203 \306\307\310\311G\\D\"\210\312\313\314\310\211\211\n \f &\n)\207" [#1# full-file file line type text signal wrong-number-of-arguments nil 6 cl--defsubst-expand (file line type text full-file) (cl-block flymake-ler-make-ler (vector 'cl-struct-flymake-ler file line type text full-file))] 11 "\n\n(fn CL-WHOLE-ARG &cl-quote FILE LINE TYPE TEXT &optional FULL-FILE)"] "/builddir/build/BUILD/emacs-24.3/lisp/progmodes/flymake.el" compiler-macro-file purecopy file-name-nondirectory] 6) #@48 (fn FILE LINE TYPE TEXT &optional FULL-FILE) (defalias 'flymake-ler-make-ler #[(file line type text &rest #1=#:--cl-rest--) "\211A@\203 \306\307\310\311G\\D\"\210\312\313\n \f &)\207" [#1# full-file file line type text signal wrong-number-of-arguments flymake-ler-make-ler 5 vector cl-struct-flymake-ler] 7 (#$ . 23922)]) (byte-code "\301C\302\303\304\305#\210\302\303\306\307#\210\302\303\310\311#\210\302\303\312\313#\210\302\314\315\313#\210\302\316\315\313#\210\302\317\315\320#\210\302\321\315\313#\210\302\322\315\313#\210\302\323\315\313#\210\302\324\315\313#\210\302\325\315\313#\207" [cl-struct-flymake-ler-tags cl-struct-flymake-ler put flymake-ler cl-struct-slots ((cl-tag-slot) (file) (line) (type) (text) (full-file)) cl-struct-type (vector nil) cl-struct-include nil cl-struct-print t flymake-ler-make-ler side-effect-free copy-flymake-ler flymake-ler-p error-free flymake-ler-full-file flymake-ler-text flymake-ler-type flymake-ler-line flymake-ler-file] 4) (defalias 'flymake-ler-set-file #[(line-err-info file) "\303\304 \305H\n>\204 \306\307\310\311#\210 \312H \305H\n>\204\" \306\307\313\311#\210 \314H \305H\n>\2043 \306\307\315\311#\210 \316H \305H\n>\204D \306\307\317\311#\210 \320H&\207" [file line-err-info cl-struct-flymake-ler-tags vector cl-struct-flymake-ler 0 error "%s accessing a non-%s" flymake-ler-line flymake-ler 2 flymake-ler-type 3 flymake-ler-text 4 flymake-ler-full-file 5] 10]) (defalias 'flymake-ler-set-full-file #[(line-err-info full-file) "\303\304\305H >\204 \306\307\310\311#\210\312H\305H >\204! \306\307\313\311#\210\314H\305H >\2042 \306\307\315\311#\210\316H\305H >\204C \306\307\317\311#\210\320H\n&\207" [line-err-info cl-struct-flymake-ler-tags full-file vector cl-struct-flymake-ler 0 error "%s accessing a non-%s" flymake-ler-file flymake-ler 1 flymake-ler-line 2 flymake-ler-type 3 flymake-ler-text 4] 9]) (defalias 'flymake-ler-set-line #[(line-err-info line) "\303\304\305H >\204 \306\307\310\311#\210\312H\n\305H >\204\" \306\307\313\311#\210\314H\305H >\2043 \306\307\315\311#\210\316H\305H >\204D \306\307\317\311#\210\320H&\207" [line-err-info cl-struct-flymake-ler-tags line vector cl-struct-flymake-ler 0 error "%s accessing a non-%s" flymake-ler-file flymake-ler 1 flymake-ler-type 3 flymake-ler-text 4 flymake-ler-full-file 5] 10]) #@80 Return number of errors of specified TYPE. Value of TYPE is either "e" or "w". (defalias 'flymake-get-line-err-count #[(line-err-info-list type) "\306 G\306\nW\2031 \f 8\306H >\204 \307\310\311\312#\210 8\313H\232\203* TT\211\202 +\207" [idx line-err-info-list count err-count type cl-struct-flymake-ler-tags 0 error "%s accessing a non-%s" flymake-ler-type flymake-ler 3] 6 (#$ . 26261)]) #@62 Return number of errors of specified TYPE for ERR-INFO-LIST. (defalias 'flymake-get-err-count #[(err-info-list type) "\305 G\305\nW\203 \306 8A@\f\"\\T\211\202 +\207" [idx err-info-list count err-count type 0 flymake-get-line-err-count] 5 (#$ . 26670)]) #@289 Replace line numbers with fixed value. If line-numbers is less than MIN-LINE, set line numbers to MIN-LINE. If line numbers is greater than MAX-LINE, set line numbers to MAX-LINE. The reason for this fix is because some compilers might report line number outside the file being compiled. (defalias 'flymake-fix-line-numbers #[(err-info-list min-line max-line) "G\306\307 \307V\203A S8\310\n!\211\fW\204\" V\203: \fW\203, \f\202- \311 S\312 \313\n!\"# S\211\202 +\207" [err-info-list count err-info line min-line max-line nil 0 flymake-er-get-line flymake-set-at flymake-er-make-er flymake-er-get-line-err-info-list] 8 (#$ . 26943)]) #@64 Highlight error lines in BUFFER using info from ERR-INFO-LIST. (defalias 'flymake-highlight-err-lines #[(err-info-list) "\212\303\211\205 \n@\304 @ A@\"\210\nA\211\204 \303+\207" [err-info-list err --dolist-tail-- nil flymake-highlight-line] 4 (#$ . 27600)]) #@54 Determine whether overlay OV was created by flymake. (defalias 'flymake-overlay-p #[(ov) "\301!\205\n \302\303\"\207" [ov overlayp overlay-get flymake-overlay] 3 (#$ . 27872)]) (byte-code "\300\301\302\303\304\305\306\307\310\311& \210\300\312\313\314\304\305\306\307\310\315& \210\300\316\317\320\304\305\306\307\310\321& \207" [custom-declare-variable flymake-error-bitmap '(exclamation-mark error) "Bitmap (a symbol) used in the fringe for indicating errors.\nThe value may also be a list of two elements where the second\nelement specifies the face for the bitmap. For possible bitmap\nsymbols, see `fringe-bitmaps'. See also `flymake-warning-bitmap'.\n\nThe option `flymake-fringe-indicator-position' controls how and where\nthis is used." :group flymake :version "24.3" :type (choice (symbol :tag "Bitmap") (list :tag "Bitmap and face" (symbol :tag "Bitmap") (face :tag "Face"))) flymake-warning-bitmap 'question-mark "Bitmap (a symbol) used in the fringe for indicating warnings.\nThe value may also be a list of two elements where the second\nelement specifies the face for the bitmap. For possible bitmap\nsymbols, see `fringe-bitmaps'. See also `flymake-error-bitmap'.\n\nThe option `flymake-fringe-indicator-position' controls how and where\nthis is used." (choice (symbol :tag "Bitmap") (list :tag "Bitmap and face" (symbol :tag "Bitmap") (face :tag "Face"))) flymake-fringe-indicator-position 'left-fringe "The position to put flymake fringe indicator.\nThe value can be nil (do not use indicators), `left-fringe' or `right-fringe'.\nSee `flymake-error-bitmap' and `flymake-warning-bitmap'." (choice (const left-fringe) (const right-fringe) (const :tag "No fringe indicators" nil))] 10) #@50 Allocate a flymake overlay in range BEG and END. (defalias 'flymake-make-overlay #[(beg end tooltip-text face bitmap mouse-face) "\306 \"?\205\\ \307 \310\311\211%\n\205$ \312\313\314\n <\203 \202\" CB# \315 \316#\210\315 \317#\210\315 \320#\210\315 \321\311#\210\315 \322\323#\210\315 \324\311#\210\315 \325\f#\210 \210*\326\327\330 $\207" [beg end flymake-fringe-indicator-position bitmap fringe ov flymake-region-has-flymake-overlays make-overlay nil t propertize "!" display overlay-put face mouse-face help-echo flymake-overlay priority 100 evaporate before-string flymake-log 3 "created an overlay at (%d-%d)" tooltip-text] 6 (#$ . 29584)]) #@40 Delete all flymake overlays in BUFFER. (defalias 'flymake-delete-own-overlays #[nil "\302ed\"\303\211\205 @\304!\203 \305!\210 A\211\204 \303*\207" [ol --dolist-tail-- overlays-in nil flymake-overlay-p delete-overlay] 4 (#$ . 30250)]) #@123 Check if region specified by BEG and END has overlay. Return t if it has at least one flymake overlay, nil if no overlay. (defalias 'flymake-region-has-flymake-overlays #[(beg end) "\304 \"\305\211:\203 \306 @!\203 \307 A\211\202 \n*\207" [beg end has-flymake-overlays ov overlays-in nil flymake-overlay-p t] 4 (#$ . 30502)]) (byte-code "\300\301\302\303\304\305%\210\300\306\307\310\304\305%\207" [custom-declare-face flymake-errline ((t :inherit error)) "Face used for marking error lines." :group flymake flymake-warnline ((t :inherit warning)) "Face used for marking warning lines."] 6) #@109 Highlight line LINE-NO in current buffer. Perhaps use text from LINE-ERR-INFO-LIST to enhance highlighting. (defalias 'flymake-highlight-line #[(line-no line-err-info-list) "eb\210Sy\210\306 \307 \n @\310H>\204! \311\312\313\314#\210 @\315H \316\211 b\210\317\320!\203< \316u\210\2020 `\nb\210\317\321!\203S `\322V\203S \323u\210\202A `T\211 X\203` \n\f U\203n \fb\210\316y\210`\324 \325\"\310V\203\201 \326 \202\210 \327 \330 \f \316&.\207" [line-no line-beg line-end beg end line-err-info-list point-at-bol point-at-eol 0 error "%s accessing a non-%s" flymake-ler-text flymake-ler 4 nil looking-at "[ ]" "[ \n]" 1 -1 flymake-get-line-err-count "e" flymake-errline flymake-warnline flymake-make-overlay cl-struct-flymake-ler-tags tooltip-text face bitmap flymake-error-bitmap flymake-warning-bitmap] 8 (#$ . 31108)]) #@47 Parse err LINES, store info in ERR-INFO-LIST. (defalias 'flymake-parse-err-lines #[(err-info-list lines) "G\306\307\211 \310! \n W\203i \311\n8!\211\203Q \306H>\2043 \312\313\314\315#\210 \316H!\317 \f\"\320\f\"\203Q \321 \307\"\322 \"\323\324\325\n8 \203_ \326\202` \327$\210\nT\211\202 .\207" [lines count idx line-err-info real-file-name buffer-file-name 0 nil flymake-get-real-file-name-function flymake-parse-line error "%s accessing a non-%s" flymake-ler-file flymake-ler 1 flymake-ler-set-full-file flymake-same-files flymake-ler-set-file flymake-add-err-info flymake-log 3 "parsed '%s', %s line-err-info" "got" "no" source-file-name get-real-file-name-f cl-struct-flymake-ler-tags err-info-list] 6 (#$ . 31971)]) #@120 Split OUTPUT into lines. Return last one as residual if it does not end with newline char. Returns ((LINES) RESIDUAL). (defalias 'flymake-split-output #[(output) "\205- G\304V\205- \305\306\"\307\211GSH!\310\232\311\n\204) \312 !@\313 ! +D\207" [output lines complete residual 0 flymake-split-string "[\n ]+" char-to-string "\n" nil last butlast] 3 (#$ . 32731)]) #@106 Grab error line patterns from ORIGINAL-LIST in compile.el format. Convert it to flymake internal format. (defalias 'flymake-reformat-err-line-patterns-from-compile-el #[(original-list) "\306 \306\211\203T @\211A\211@\nA@\307\n8\310\n8 \n \n:\203, \n@\n :\2034 @\f:\203< \f@\311 !\204L \n \fFB, A\211\204\n *)\207" [converted-list original-list item --dolist-tail-- col line nil 2 3 functionp file regexp] 6 (#$ . 33112)]) (require 'compile) #@209 Patterns for matching error/warning lines. Each pattern has the form (REGEXP FILE-IDX LINE-IDX COL-IDX ERR-TEXT-IDX). Use `flymake-reformat-err-line-patterns-from-compile-el' to add patterns from compile.el (defvar flymake-err-line-patterns (byte-code "\301\302\303!\"\207" [compilation-error-regexp-alist-alist append (("\\(\\([a-zA-Z]:\\)?[^:( \n]+\\)(\\([0-9]+\\)) : \\(\\(error\\|warning\\|fatal error\\) \\(C[0-9]+\\):[ \n]*\\(.+\\)\\)" 1 3 nil 4) ("\\(\\([a-zA-Z]:\\)?[^:( \n]+\\):\\([0-9]+\\):[0-9]+:[0-9]+:[0-9]+: \\(\\(Error\\|Warning\\|Caution\\|Semantic Error\\):[ \n]*\\(.+\\)\\)" 1 3 nil 4) ("midl[ ]*:[ ]*\\(command line error .*\\)" nil nil nil 1) ("\\(\\([a-zA-Z]:\\)?[^:( \n]+\\)(\\([0-9]+\\),[0-9]+): \\(\\(error\\|warning\\|fatal error\\) \\(CS[0-9]+\\):[ \n]*\\(.+\\)\\)" 1 3 nil 4) ("\\(.*\\) at \\([^ \n]+\\) line \\([0-9]+\\)[,.\n]" 2 3 nil 1) ("\\(?:Parse\\|Fatal\\) error: \\(.*\\) in \\(.*\\) on line \\([0-9]+\\)" 2 3 nil 1) (" *\\(\\[javac\\] *\\)?\\(\\([a-zA-Z]:\\)?[^:( \n]+\\):\\([0-9]+\\)\\(?::[0-9]+\\)?:[ \n]*\\(.+\\)" 2 4 nil 5)) flymake-reformat-err-line-patterns-from-compile-el] 4) (#$ . 33582)) #@55 Regexp matching against err-text to detect a warning. (defvar flymake-warning-re "^[wW]arning" (#$ . 34728)) #@93 Parse LINE to see if it is an error or warning. Return its components if so, nil otherwise. (defalias 'flymake-parse-line #[(line) "\306\307\310\306\306 \n\203\222 \204\222 \311\n@@\"\203\213 \n@A@ \312\n@8 \2056 \313\"\203H \314\313\"!\202I \307\n@G\315V\203] \313\315\n@8\"\202e \316\307\225\306O!\211\204l \317 \203z \311 \"\203z \320\321\322\323 &\210\324*\nA\211\204 \205\240 \325\326 \f \306&.\207" [flymake-err-line-patterns matched patterns err-text err-type line-no nil 0 "e" string-match 2 match-string string-to-number 4 flymake-patch-err-text "<no error text>" "w" flymake-log 3 "parse line: file-idx=%s line-idx=%s file=%s line=%s text=%s" t vector cl-struct-flymake-ler raw-file-name line file-idx line-idx flymake-warning-re] 9 (#$ . 34843)]) #@54 Find (line-err-info-list pos) for specified LINE-NO. (defalias 'flymake-find-err-info #[(err-info-list line-no) "\203; \305\306G\n W\203! \n8@\fW\203! \nT\211\202\f \n W\2036 \n8@\f\232\2036 \307\n8! \n+D\207\310\207" [err-info-list line-err-info-list pos count line-no nil 0 flymake-er-get-line-err-info-list (nil 0)] 4 (#$ . 35659)]) (defalias 'flymake-line-err-info-is-less-or-equal #[(line-one line-two) "\303H >\204 \304\305\306\307#\210\310H\n\303H >\204 \304\305\306\307#\210\n\310H\231\206\351 \303H >\2044 \304\305\306\307#\210\310H\n\303H >\204E \304\305\306\307#\210\n\310H\230\203t \303H >\204Z \304\305\311\307#\210\312H\204t \n\303H >\204n \304\305\311\307#\210\n\312H\206\351 \303H >\204\202 \304\305\306\307#\210\310H\n\303H >\204\223 \304\305\306\307#\210\n\310H\230\205\351 \303H >\204\250 \304\305\311\307#\210\312H\203\302 \n\303H >\204\274 \304\305\311\307#\210\n\312H\206\351 \303H >\204\320 \304\305\311\307#\210\312H?\205\351 \n\303H >\204\345 \304\305\311\307#\210\n\312H?\207" [line-one cl-struct-flymake-ler-tags line-two 0 error "%s accessing a non-%s" flymake-ler-type flymake-ler 3 flymake-ler-file 1] 5]) #@292 Update LINE-ERR-INFO-LIST with the error LINE-ERR-INFO. For the format of LINE-ERR-INFO, see `flymake-ler-make-ler'. The new element is inserted in the proper position, according to the predicate `flymake-line-err-info-is-less-or-equal'. The updated value of LINE-ERR-INFO-LIST is returned. (defalias 'flymake-add-line-err-info #[(line-err-info-list line-err-info) "\204 C\207G\304\211\nW\203\" \305 8 \"\203\" T\211\202 \304\232\203/ B\2026 \306 S #*\207" [line-err-info-list line-err-info count idx 0 flymake-line-err-info-is-less-or-equal flymake-ins-after] 5 (#$ . 36826)]) #@237 Update ERR-INFO-LIST with the error LINE-ERR-INFO, preserving sort order. Returns the updated value of ERR-INFO-LIST. For the format of ERR-INFO-LIST, see `flymake-err-info'. For the format of LINE-ERR-INFO, see `flymake-ler-make-ler'. (defalias 'flymake-add-err-info #[(err-info-list line-err-info) "\306H >\204 \307\310\311\312#\210\313H\203 \313\202) \306H >\204& \307\310\314\312#\210\315H\316 \n\"\211 @ \fA@ \317\211 \203J \320 \233@!\321\"\322\n\" \203g \323 #\202 \306\232\203v B\202 \324 S# .\207" [line-err-info cl-struct-flymake-ler-tags line-no err-info-list info-and-pos exists 0 error "%s accessing a non-%s" flymake-ler-file flymake-ler 1 flymake-ler-line 2 flymake-find-err-info nil flymake-er-get-line-err-info-list flymake-add-line-err-info flymake-er-make-er flymake-set-at flymake-ins-after pos line-err-info-list err-info] 5 (#$ . 37428)]) #@55 Include dirs for the project current file belongs to. (defalias 'flymake-get-project-include-dirs-imp #[(basedir) "\306!\203\n \306!\207\307\310!\311Q\312 !\313\n\314\"\211G \315 \316 \fW\2038 \317\320 8\"\2048 T\211\202# \fW\203u \313 8\321\"\211 G\211 \315V\203t \317\320S8\"\204k \322\323\324S8#BS\211\202K *\325\"\210.\207" [basedir command-line output lines count idx flymake-get-project-include-dirs-from-cache "make -C " shell-quote-argument " DUMPVARS=INCLUDE_DIRS dumpvars" shell-command-to-string flymake-split-string "\n" 0 nil string-match "^INCLUDE_DIRS=.*" " *-I" flymake-replace-regexp-in-string "\"" "" flymake-add-project-include-dirs-to-cache inc-dirs inc-lines inc-count] 6 (#$ . 38339)]) #@73 Function used to get project include dirs, one parameter: basedir name. (custom-declare-variable 'flymake-get-project-include-dirs-function ''flymake-get-project-include-dirs-imp '(#$ . 39090) :group 'flymake :type 'function) (defalias 'flymake-get-project-include-dirs #[(basedir) " !\207" [flymake-get-project-include-dirs-function basedir] 2]) #@55 System include dirs - from the 'INCLUDE' env setting. (defalias 'flymake-get-system-include-dirs #[nil "\302\303!\211\205\f \304 \")\207" [includes path-separator getenv "INCLUDE" flymake-split-string] 4 (#$ . 39444)]) (defvar flymake-project-include-dirs-cache (byte-code "\301\302\303!\203 \203 \303\304\"\202 \303 \202 \305!)\207" [test equal fboundp make-hash-table :test makehash] 3)) (defalias 'flymake-get-project-include-dirs-from-cache #[(base-dir) "\302 \"\207" [base-dir flymake-project-include-dirs-cache gethash] 3]) (defalias 'flymake-add-project-include-dirs-to-cache #[(base-dir include-dirs) "\303 \n#\207" [base-dir include-dirs flymake-project-include-dirs-cache puthash] 4]) (defalias 'flymake-clear-project-include-dirs-cache #[nil "\301!\207" [flymake-project-include-dirs-cache clrhash] 2]) #@50 Get dirs to use when resolving local file names. (defalias 'flymake-get-include-dirs #[(base-dir) "\301\302\303!\304 #\207" [base-dir append (".") flymake-get-project-include-dirs flymake-get-system-include-dirs] 5 (#$ . 40277)]) (defalias 'flymake-safe-delete-file #[(file-name) "\205 \301!\205 \302!\210\303\304\305#\207" [file-name file-exists-p delete-file flymake-log 1 "deleted file %s"] 4]) (defalias 'flymake-safe-delete-directory #[(dir-name) "\300\301\302\217\207" [nil (byte-code "\301!\210\302\303\304#\207" [dir-name delete-directory flymake-log 1 "deleted dir %s"] 4) ((error (flymake-log 1 "Failed to delete dir %s, error ignored" dir-name)))] 3]) #@65 If non-nil, don't start syntax check if compilation is running. (custom-declare-variable 'flymake-compilation-prevents-syntax-check t '(#$ . 40955) :group 'flymake :type 'boolean) #@43 Start syntax checking for current buffer. (defalias 'flymake-start-syntax-check #[nil "\306\307\310#\210?\205a \311 !\205a \n\203 \312 ?\205a \313 \210\314 \210\315 \316\f! \317\f! \211 @ A@ \3208 \204T \306\321\322 \f$\210 \202_ \315\323#.\207" [flymake-is-running buffer-file-name flymake-compilation-prevents-syntax-check flymake-check-was-interrupted source-file-name init-f flymake-log 3 "flymake is running: %s" flymake-can-syntax-check-file flymake-compilation-is-running flymake-clear-buildfile-cache flymake-clear-project-include-dirs-cache nil flymake-get-init-function flymake-get-cleanup-function 2 0 "init function %s for %s failed, cleaning up" flymake-start-syntax-check-process cleanup-f cmd-and-args cmd args dir flymake-last-change-time] 6 (#$ . 41141) nil]) #@29 Start syntax check process. (defalias 'flymake-start-syntax-check-process #[(cmd args dir) "\300\301\302\217\207" [err (byte-code "\206 \203 \306\307\310#\210\311\312\313p\n %) \314\f\315\"\210\316\f\317\"\210\f B\320\321\322 \323\321\324\"\210\306\325\326\327\f!\330\f! %\210\f)\207" [dir default-directory cmd args process flymake-processes flymake-log 3 "starting process on dir %s" apply start-file-process "flymake-proc" set-process-sentinel flymake-process-sentinel set-process-filter flymake-process-filter t nil flymake-float-time flymake-report-status "*" 2 "started process %d, command=%s, dir=%s" process-id process-command flymake-is-running flymake-last-change-time flymake-check-start-time] 6) ((error (byte-code "\306\307 \310\n!$\f \311 ! \312\313 \"\210 \210\314\315 \"+\207" [cmd args err err-str buffer-file-name source-file-name format "Failed to launch syntax check process '%s' with args %s: %s" error-message-string flymake-get-cleanup-function flymake-log 0 flymake-report-fatal-status "PROCERR" cleanup-f] 6)))] 3 (#$ . 41953)]) #@20 Kill process PROC. (defalias 'flymake-kill-process #[(proc) "\303!\210\304!\305 !\203 r q\210\306))\307\310\311\312!#\207" [proc buf flymake-check-was-interrupted kill-process process-buffer buffer-live-p t flymake-log 1 "killed process %d" process-id] 5 (#$ . 43032)]) #@34 Kill all syntax check processes. (defalias 'flymake-stop-all-syntax-checks #[nil "\205 \301\211A@!\210\202 \207" [flymake-processes flymake-kill-process] 3 (#$ . 43314) nil]) (defalias 'flymake-compilation-is-running #[nil "\301\300!\205 \207" [compilation-in-progress boundp] 2]) #@52 Kill all flymake syntax checks, start compilation. (defalias 'flymake-compile #[nil "\300 \210\301\302!\207" [flymake-stop-all-syntax-checks call-interactively compile] 2 (#$ . 43608) nil]) #@61 Time to wait after last change before starting compilation. (custom-declare-variable 'flymake-no-changes-timeout 0.5 '(#$ . 43804) :group 'flymake :type 'number) #@54 Start a syntax check for buffer BUFFER if necessary. (defalias 'flymake-on-timer-event #[(buffer) "\304!\205& rq\210 ?\205% \n\205% \305 \nZ V\205% \306\307\310\311\"\210\312 )\207" [buffer flymake-is-running flymake-last-change-time flymake-no-changes-timeout buffer-live-p flymake-float-time nil flymake-log 3 "starting syntax check as more than 1 second passed since last change" flymake-start-syntax-check] 3 (#$ . 43972)]) #@50 Return number of current line in current buffer. (defalias 'flymake-current-line-no #[nil "\300em\203\n `\202\f `T\"\207" [count-lines] 3 (#$ . 44409)]) #@42 Return number of lines in buffer BUFFER. (defalias 'flymake-count-lines #[nil "\300ed\"\207" [count-lines] 3 (#$ . 44568)]) #@88 Display a menu with errors/warnings for current line if it has errors and/or warnings. (defalias 'flymake-display-err-menu-for-current-line #[nil "\305 \306 \"@\307\n\"\310 \203( \311 !\312\313\314\f#\210\f\205- \315\f!\202- \312\316\317#,\207" [line-no flymake-err-info line-err-info-list menu-data choice flymake-current-line-no flymake-find-err-info flymake-make-err-menu-data nil flymake-popup-menu flymake-log 3 "choice=%s" eval 1 "no errors for line %d"] 4 (#$ . 44698) nil]) #@98 Make a (menu-title (item-title item-action)*) list with errors/warnings from LINE-ERR-INFO-LIST. (defalias 'flymake-make-err-menu-data #[(line-no line-err-info-list) "\306 \203\243 G\306\n\307V\203\233 \nS 8\307H\f>\204\" \310\311\312\313#\210\nS 8\314H\nS 8\307H\f>\204: \310\311\315\313#\210\nS 8\316H \nS 8\307H\f>\204R \310\311\317\313#\210\nS 8\320H \nS 8\307H\f>\204k \310\311\321\313#\210\nS 8\322H ! \203\204 \323 \324\325\326!\"\327\260 \205\217 \330 !EDB+\nS\211\202\f \331\332\333G#\210*\205\272 \325\334\"\335 \336\"\335 \337\"$\211 #)D)\207" [menu-items line-err-info-list count menu-item-text cl-struct-flymake-ler-tags file nil 0 error "%s accessing a non-%s" flymake-ler-text flymake-ler 4 flymake-ler-file 1 flymake-ler-full-file 5 flymake-ler-line 2 " - " "(" format "%d" ")" flymake-goto-file-and-line flymake-log 3 "created menu-items with %d item(s)" "Line %d: %d error(s), %d warning(s)" flymake-get-line-err-count "e" "w" full-file line line-no menu-title] 8 (#$ . 45194)]) #@54 Try to get buffer for FILE and goto line LINE in it. (defalias 'flymake-goto-file-and-line #[(file line) "\302!\204\f \303\304\305#\207\306!\210eb\210 Sy\207" [file line file-exists-p flymake-log 1 "File %s does not exist" find-file] 4 (#$ . 46217)]) (defvar flymake-mode-line nil) (make-variable-buffer-local 'flymake-mode-line) (defvar flymake-mode-line-e-w nil) (make-variable-buffer-local 'flymake-mode-line-e-w) (defvar flymake-mode-line-status nil) (make-variable-buffer-local 'flymake-mode-line-status) #@27 Show status in mode line. (defalias 'flymake-report-status #[(e-w &optional status) "\203 \n\203\f \n\306 G\307V\203 \f\310 Q\f P\211\311 )\207" [e-w flymake-mode-line-e-w status flymake-mode-line-status mode-line flymake-mode-line " Flymake" 0 ":" force-mode-line-update] 4 (#$ . 46736)]) #@28 Display a warning to user. (defalias 'flymake-display-warning #[(warning) "\301!\207" [warning message-box] 2 (#$ . 47042)]) #@32 Enables/disables GUI warnings. (custom-declare-variable 'flymake-gui-warnings-enabled t '(#$ . 47174) :group 'flymake :type 'boolean) #@48 Display a warning and switch flymake mode off. (defalias 'flymake-report-fatal-status #[(status warning) "\203 \303\304\305 \"!\210\306\307!\210\310\307\311\312 \n %\207" [flymake-gui-warnings-enabled warning status flymake-display-warning format "Flymake: %s. Flymake will be switched OFF" flymake-mode 0 flymake-log "switched OFF Flymake mode for buffer %s due to fatal status %s, warning %s" buffer-name] 6 (#$ . 47314)]) #@34 Start syntax check on find file. (custom-declare-variable 'flymake-start-syntax-check-on-find-file t '(#$ . 47747) :group 'flymake :type 'boolean) #@93 Non-nil if Flymake mode is enabled. Use the command `flymake-mode' to change this variable. (defvar flymake-mode nil (#$ . 47900)) (make-variable-buffer-local 'flymake-mode) #@190 Toggle on-the-fly syntax checking. With a prefix argument ARG, enable the mode if ARG is positive, and disable it otherwise. If called from Lisp, enable the mode if ARG is omitted or nil. (defalias 'flymake-mode #[(&optional arg) "\306 \307=\203 \n?\202 \310 !\311V\211\203x \204# \312\313!\210\202\232 \314 !\2043 \315\316\317\320 #\210\202\232 \321\322\323\324\325$\210\321\326\327\324\325$\210\321\330\331\324\325$\210\332\333\211\"\210\334\324\335\336p$ \203\232 \337\340 !!\203\232 \341 23\203o 2 \210\202t \342\343\344\217\210)\202\232 \345\322\323\325#\210\345\326\327\325#\210\345\330\331\325#\210\346 \210\f\203\227 \347\f!\210\324\3244\350\351\n\203\244 \352\202\245 \353\"\210\354\355!\203\306 \306 \203\271 \306 \232\203\306 \312\356\n\203\303 \357\202\304 \360\"\210)\361 \210\n\207" [#1=#:last-message arg flymake-mode buffer-file-name flymake-timer flymake-start-syntax-check-on-find-file current-message toggle prefix-numeric-value 0 message "Flymake unable to run without a buffer file name" flymake-can-syntax-check-file flymake-log 2 "flymake cannot check syntax in buffer %s" buffer-name add-hook after-change-functions flymake-after-change-function nil t after-save-hook flymake-after-save-hook kill-buffer-hook flymake-kill-buffer-hook flymake-report-status "" run-at-time 1 flymake-on-timer-event file-writable-p file-name-directory #[nil "\300 \207" [flymake-start-syntax-check] 1] #2=#:err (funcall #3=#:body) ((error (message "Error: %S" #2#))) remove-hook flymake-delete-own-overlays cancel-timer run-hooks flymake-mode-hook flymake-mode-on-hook flymake-mode-off-hook called-interactively-p any "Flymake mode %sabled" "en" "dis" force-mode-line-update #3# debug-on-error flymake-is-running] 6 (#$ . 48081) (list (or current-prefix-arg 'toggle))]) (byte-code "\301\302\303\304\300!\205\n \305\211%\207" [flymake-mode-map add-minor-mode flymake-mode flymake-mode-line boundp nil] 6) #@23 Turn flymake mode on. (defalias 'flymake-mode-on #[nil "\300\301!\210\302\301\303\304 #\207" [flymake-mode 1 flymake-log "flymake mode turned ON for buffer %s" buffer-name] 4 (#$ . 50009)]) #@24 Turn flymake mode off. (defalias 'flymake-mode-off #[nil "\300\301!\210\302\303\304\305 #\207" [flymake-mode 0 flymake-log 1 "flymake mode turned OFF for buffer %s" buffer-name] 4 (#$ . 50205)]) #@71 Start syntax check if newline char was added/removed from the buffer. (custom-declare-variable 'flymake-start-syntax-check-on-newline t '(#$ . 50406) :group 'flymake :type 'boolean) #@68 Start syntax check for current buffer if it isn't already running. (defalias 'flymake-after-change-function #[(start stop _len) " { \203 \n\305\232\203 \306\307\310\"\210\311 \210\312 \211)\207" [start stop new-text flymake-start-syntax-check-on-newline flymake-last-change-time "\n" flymake-log 3 "starting syntax check as new-line has been seen" flymake-start-syntax-check flymake-float-time] 3 (#$ . 50594)]) (defalias 'flymake-after-save-hook #[nil "\300\301p\"\205 \302\303\304\"\210\305 \207" [local-variable-p flymake-mode flymake-log 3 "starting syntax check as buffer was saved" flymake-start-syntax-check] 3]) (defalias 'flymake-kill-buffer-hook #[nil "\205 \301!\210\302\211\207" [flymake-timer cancel-timer nil] 2]) (defalias 'flymake-find-file-hook #[nil "\301\302p\"?\205 \303!\205 \302 \210\304\305\306\"\207" [buffer-file-name local-variable-p flymake-mode flymake-can-syntax-check-file flymake-log 3 "automatically turned ON flymake mode"] 3]) #@31 Return first line with error. (defalias 'flymake-get-first-err-line-no #[(err-info-list) "\205 \301@!\207" [err-info-list flymake-er-get-line] 2 (#$ . 51574)]) #@30 Return last line with error. (defalias 'flymake-get-last-err-line-no #[(err-info-list) "\205 \301GS8!\207" [err-info-list flymake-er-get-line] 3 (#$ . 51743)]) #@30 Return next line with error. (defalias 'flymake-get-next-err-line-no #[(err-info-list line-no) "\205, G\304\211 W\203 \305\n8!Y\203 \nT\211\202\n \n W\205+ \305\n8!*\207" [err-info-list count idx line-no 0 flymake-er-get-line] 5 (#$ . 51913)]) #@34 Return previous line with error. (defalias 'flymake-get-prev-err-line-no #[(err-info-list line-no) "\205, G\211\303V\203 \n\304 S8!X\203 S\211\202 \303V\205+ \304 S8!)\207" [err-info-list count line-no 0 flymake-er-get-line] 5 (#$ . 52173)]) #@47 Move forward until non-whitespace is reached. (defalias 'flymake-skip-whitespace #[nil "\300\301!\205\f \302u\210\202 \207" [looking-at "[ ]" nil] 2 (#$ . 52432)]) #@43 Go to line LINE-NO, then skip whitespace. (defalias 'flymake-goto-line #[(line-no) "eb\210Sy\210\301 \207" [line-no flymake-skip-whitespace] 1 (#$ . 52604)]) #@31 Go to next error in err ring. (defalias 'flymake-goto-next-error #[nil "\302\303 \"\211\204 \304!\305\306\307\"\210 \203 \310 !\202! \305\306\311\")\207" [flymake-err-info line-no flymake-get-next-err-line-no flymake-current-line-no flymake-get-first-err-line-no flymake-log 1 "passed end of file" flymake-goto-line "no errors in current buffer"] 4 (#$ . 52769) nil]) #@35 Go to previous error in err ring. (defalias 'flymake-goto-prev-error #[nil "\302\303 \"\211\204 \304!\305\306\307\"\210 \203 \310 !\202! \305\306\311\")\207" [flymake-err-info line-no flymake-get-prev-err-line-no flymake-current-line-no flymake-get-last-err-line-no flymake-log 1 "passed beginning of file" flymake-goto-line "no errors in current buffer"] 4 (#$ . 53149) nil]) (defalias 'flymake-patch-err-text #[(string) "\301\302\"\203\f \303\304\"\207\207" [string string-match "^[\n :0-9]*\\(.*\\)$" match-string 1] 3]) (defalias 'flymake-create-temp-inplace #[(file-name prefix) ";\204 \304\305!\210 \204 \306\307!\310\311!\312 \n\205 \313\nPR!\314\315\316 $\210 *\207" [file-name prefix ext temp-name error "Invalid file-name" "flymake" file-name-extension file-truename file-name-sans-extension "_" "." flymake-log 3 "create-temp-inplace: file=%s temp=%s"] 6]) (defalias 'flymake-create-temp-with-folder-structure #[(file-name _prefix) ";\204 \304\305!\210\306!\307\310 \"\311 \nT\312O\313 \"\314\311\315! \"!+\207" [file-name dir slash-pos temp-dir error "Invalid file-name" file-name-directory string-match "/" expand-file-name nil flymake-get-temp-dir file-truename file-name-nondirectory] 4]) #@106 Attempt to delete temp dir created by `flymake-create-temp-with-folder-structure', do not fail on error. (defalias 'flymake-delete-temp-directory #[(dir-name) "\303 GT\304O\211G\305V\205& \306\n!\307\310\311\n\"!!\210\312\n!\211\202 *\207" [temp-dir dir-name suffix flymake-get-temp-dir nil 0 directory-file-name flymake-safe-delete-directory file-truename expand-file-name file-name-directory] 6 (#$ . 54387)]) (defvar flymake-temp-source-file-name nil) (make-variable-buffer-local 'flymake-temp-source-file-name) (defvar flymake-master-file-name nil) (make-variable-buffer-local 'flymake-master-file-name) (defvar flymake-temp-master-file-name nil) (make-variable-buffer-local 'flymake-temp-master-file-name) (defvar flymake-base-dir nil) (make-variable-buffer-local 'flymake-base-dir) #@96 Make a temporary copy of the current buffer, save its name in buffer data and return the name. (defalias 'flymake-init-create-temp-buffer-copy #[(create-temp-f) "\n \305\"\306 !\210 *\207" [buffer-file-name source-file-name create-temp-f temp-source-file-name flymake-temp-source-file-name "flymake" flymake-save-buffer-in-file] 3 (#$ . 55189)]) #@76 Do cleanup after `flymake-init-create-temp-buffer-copy'. Delete temp file. (defalias 'flymake-simple-cleanup #[nil "\302!\210\303\211\207" [flymake-temp-source-file-name flymake-last-change-time flymake-safe-delete-file nil] 2 (#$ . 55546)]) #@109 Translate file name from error message to "real" file name. Return full-name. Names are real, not patched. (defalias 'flymake-get-real-file-name #[(file-name-from-err-msg) "\306 \307\n!\f\205 \307\f!E \n\211D\nD\f\211D\fDF G\310\232\2038 \n\311#\211\204L \312\"\204S \313!\314\315\316$\210.\207" [real-name buffer-file-name source-file-name flymake-master-file-name master-file-name flymake-temp-source-file-name nil file-name-directory 0 flymake-get-full-patched-file-name flymake-get-full-nonpatched-file-name flymake-fix-file-name flymake-log 3 "get-real-file-name: file-name=%s real-name=%s" temp-source-file-name flymake-temp-master-file-name temp-master-file-name flymake-base-dir base-dirs files file-name-from-err-msg] 6 (#$ . 55797)]) (defalias 'flymake-get-full-patched-file-name #[(file-name-from-err-msg base-dirs files) "G\nG\306 \f\204X \307V\203X \nG\f\204R \307V\203R S8 S\n8@ \n S\n8A@ \203K \n\203K \310\311\f \"\n\"\203K + S\202 S\202 \f+\207" [base-dirs base-dirs-count files file-count real-name this-dir nil 0 flymake-same-files expand-file-name this-file this-real-name file-name-from-err-msg] 4]) (defalias 'flymake-get-full-nonpatched-file-name #[(file-name-from-err-msg base-dirs) "\305\306 !\203 \2022 \nG\2041 \307V\2031 \310 S\n8\" \311\f!\203* \f S)\202 ))\207" [real-name file-name-from-err-msg base-dirs base-dirs-count full-name nil file-name-absolute-p 0 expand-file-name file-exists-p] 4]) #@76 Find buildfile, store its dir in buffer data and return its dir, if found. (defalias 'flymake-init-find-buildfile-dir #[(source-file-name buildfile-name) "\304\305 !\"\211\203 \n\211\202 \306\307\310 $\210\311\312\313\314 #\")\207" [buildfile-name source-file-name buildfile-dir flymake-base-dir flymake-find-buildfile file-name-directory flymake-log 1 "no buildfile (%s) for %s" flymake-report-fatal-status "NOMK" format "No buildfile (%s) found for %s"] 7 (#$ . 57310)]) #@85 Find master file (or buffer), create its copy along with a copy of the source file. (defalias 'flymake-init-create-temp-source-and-master-buffer-copy #[(get-incl-dirs-f create-temp-f master-file-masks include-regexp) "\306\n!\307 \f\n &\211 \204% \310\311\312 #\210\313\314\315\"\210\316\2021 @A@\211+\207" [buffer-file-name source-file-name create-temp-f temp-source-file-name get-incl-dirs-f master-file-masks flymake-init-create-temp-buffer-copy flymake-create-master-file flymake-log 1 "cannot find master file for %s" flymake-report-status "!" "" nil include-regexp master-and-temp-master flymake-master-file-name flymake-temp-master-file-name] 8 (#$ . 57796)]) (defalias 'flymake-master-cleanup #[nil "\301 \210\302!\207" [flymake-temp-master-file-name flymake-simple-cleanup flymake-safe-delete-file] 2]) #@62 Create a command line for syntax check using GET-CMD-LINE-F. (defalias 'flymake-get-syntax-check-program-args #[(source-file-name base-dir use-relative-base-dir use-relative-source get-cmd-line-f) " \203\f \305\n \"\202 \n\f\203 \305 \306\n!\"\202 \"\207" [get-cmd-line-f use-relative-source source-file-name base-dir use-relative-base-dir file-relative-name file-name-directory] 6 (#$ . 58631)]) (defalias 'flymake-get-make-cmdline #[(source base-dir) "\302\303\304\305 P\306\307\257D\207" [base-dir source "make" "-s" "-C" "CHK_SOURCES=" "SYNTAX_CHECK_MODE=1" "check-syntax"] 7]) (defalias 'flymake-get-ant-cmdline #[(source base-dir) "\302\303\304\305Q\306 P\307FD\207" [base-dir source "ant" "-buildfile" "/" "build.xml" "-DCHK_SOURCES=" "check-syntax"] 5]) #@112 Create syntax check command line for a directly checked source file. Use CREATE-TEMP-F for creating temp copy. (defalias 'flymake-simple-make-init-impl #[(create-temp-f use-relative-base-dir use-relative-source build-file-name get-cmdline-f) "\306 \307\n \"\211 \203 \310 ! \n\311\n\f \f %)+\207" [args buffer-file-name source-file-name build-file-name buildfile-dir create-temp-f nil flymake-init-find-buildfile-dir flymake-init-create-temp-buffer-copy flymake-get-syntax-check-program-args temp-source-file-name use-relative-base-dir use-relative-source get-cmdline-f] 7 (#$ . 59408)]) (defalias 'flymake-simple-make-init #[nil "\300\301\302\211\303\304%\207" [flymake-simple-make-init-impl flymake-create-temp-inplace t "Makefile" flymake-get-make-cmdline] 6]) #@81 Create make command line for a source file checked via master file compilation. (defalias 'flymake-master-make-init #[(get-incl-dirs-f master-file-masks include-regexp) "\306\307 \310\n $\211 \203 \311\f\312\"\211 \203 \313\f \306\211\314%)*\207" [make-args get-incl-dirs-f master-file-masks include-regexp temp-master-file-name buildfile-dir nil flymake-init-create-temp-source-and-master-buffer-copy flymake-create-temp-inplace flymake-init-find-buildfile-dir "Makefile" flymake-get-syntax-check-program-args flymake-get-make-cmdline] 7 (#$ . 60187)]) (defalias 'flymake-find-make-buildfile #[(source-dir) "\301\302\"\207" [source-dir flymake-find-buildfile "Makefile"] 3]) (defalias 'flymake-master-make-header-init #[nil "\300\301\302\303#\207" [flymake-master-make-init flymake-get-include-dirs ("\\.\\(?:c\\(?:pp\\|xx\\|\\+\\+\\)?\\|CC\\)\\'") "[ ]*#[ ]*include[ ]*\"\\([[:word:]0-9/\\_.]*%s\\)\""] 4]) (defalias 'flymake-simple-make-java-init #[nil "\300\301\302\211\303\304%\207" [flymake-simple-make-init-impl flymake-create-temp-with-folder-structure nil "Makefile" flymake-get-make-cmdline] 6]) (defalias 'flymake-simple-ant-java-init #[nil "\300\301\302\211\303\304%\207" [flymake-simple-make-init-impl flymake-create-temp-with-folder-structure nil "build.xml" flymake-get-ant-cmdline] 6]) #@77 Cleanup after `flymake-simple-make-java-init' -- delete temp file and dirs. (defalias 'flymake-simple-java-cleanup #[nil "\301!\210\205 \302\303!!\207" [flymake-temp-source-file-name flymake-safe-delete-file flymake-delete-temp-directory file-name-directory] 3 (#$ . 61504)]) (defalias 'flymake-perl-init #[nil "\303\304!\305\306 !\"\307\310\n*DD\207" [temp-file buffer-file-name local-file flymake-init-create-temp-buffer-copy flymake-create-temp-inplace file-relative-name file-name-directory "perl" "-wc "] 4]) (defalias 'flymake-php-init #[nil "\303\304!\305\306 !\"\307\310\n\311E*D\207" [temp-file buffer-file-name local-file flymake-init-create-temp-buffer-copy flymake-create-temp-inplace file-relative-name file-name-directory "php" "-f" "-l"] 4]) (defalias 'flymake-get-tex-args #[(file-name) "\301\302\303ED\207" [file-name "texify" "--pdf" "--tex-option=-c-style-errors"] 4]) (defalias 'flymake-simple-tex-init #[nil "\300\301\302!!\207" [flymake-get-tex-args flymake-init-create-temp-buffer-copy flymake-create-temp-inplace] 3]) (defalias 'flymake-master-tex-init #[nil "\301\302\303\304\305$\211\205 \306!)\207" [temp-master-file-name flymake-init-create-temp-source-and-master-buffer-copy flymake-get-include-dirs-dot flymake-create-temp-inplace ("\\.tex\\'") "[ ]*\\in\\(?:put\\|clude\\)[ ]*{\\(.*%s\\)}" flymake-get-tex-args] 6]) (defalias 'flymake-get-include-dirs-dot #[(_base-dir) "\300\207" [(".")] 1]) (defalias 'flymake-xml-init #[nil "\300\301\302\303!DD\207" ["xml" "val" flymake-init-create-temp-buffer-copy flymake-create-temp-inplace] 4]) (provide 'flymake)