| commit | author | age | ||
| 5cb5f7 | 1 | ;ELC |
| C | 2 | ;;; Compiled |
| 3 | ;;; in Emacs version 26.1 | |
| 4 | ;;; with all optimizations. | |
| 5 | ||
| 6 | ;;; This file uses dynamic docstrings, first added in Emacs 19.29. | |
| 7 | ||
| 8 | ;;; This file does not contain utf-8 non-ASCII characters, | |
| 9 | ;;; and so can be loaded in Emacs versions earlier than 23. | |
| 10 | ||
| 11 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | |
| 12 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | |
| 13 | ||
| 14 | ||
| 15 | (byte-code "\300\301!\210\300\302!\210\300\303!\207" [require error-tip flymake cl-lib] 2) | |
| 16 | (defvar flymake-tip--err-info-function (byte-code "\301\302\303!\"\203 \304\207\305\306!\205 \307\207" [emacs-major-version version<= "26" number-to-string (lambda nil (cl-loop for diag in (flymake-diagnostics (point-at-bol) (point-at-eol)) collect (flymake-diagnostic-text diag))) fboundp flymake-find-err-info (lambda nil (cl-loop with errors = (flymake-find-err-info flyamke-err-info (line-number-at-pos)) for err in (car errors) if (vectorp err) collect (elt err 4)))] 4)) | |
| 17 | #@16 | |
| 18 | ||
| 19 | (fn REVERSE) | |
| 20 | (defalias 'flymake-tip-cycle #[257 "\301\302 !\210\211\302 =\203 \203 \303 \202 \304 b\210!\210\266\305 !\207" [flymake-tip--err-info-function #[257 "\211\203 \300 \207\301 \207" [flymake-goto-prev-error flymake-goto-next-error] 2 "\n\n(fn REVERSE)"] line-number-at-pos point-at-bol point-at-eol error-tip-popup-error-message] 5 (#$ . 979) nil]) | |
| 21 | (defalias 'flymake-tip-cycle-reverse #[0 "\300\301!\207" [flymake-tip-cycle t] 2 nil nil]) | |
| 22 | (provide 'flymake-tip) | |
