Lines Matching defs:cr
14 (defcustom cr-flymake-ninja-build-file "out/Debug/build.ninja"
18 (defcustom cr-flymake-ninja-executable "ninja"
21 (defun cr-flymake-absbufferpath ()
27 (defun cr-flymake-chromium-src ()
30 (cr-flymake-absbufferpath) cr-flymake-ninja-build-file)))
33 (defun cr-flymake-string-prefix-p (prefix str)
38 (defun cr-flymake-current-file-name ()
42 (when (and (cr-flymake-chromium-src)
43 (cr-flymake-string-prefix-p
44 (cr-flymake-chromium-src) (cr-flymake-absbufferpath)))
45 (substring (cr-flymake-absbufferpath) (length (cr-flymake-chromium-src)))))
47 (defun cr-flymake-from-build-to-src-root ()
53 (file-truename (or (and (cr-flymake-string-prefix-p
54 "/" cr-flymake-ninja-build-file)
55 cr-flymake-ninja-build-file)
56 (concat (cr-flymake-chromium-src)
57 cr-flymake-ninja-build-file))))
58 (length (cr-flymake-chromium-src)))))
60 (defun cr-flymake-getfname (file-name-from-error-message)
64 (defun cr-flymake-ninja-command-line ()
68 (list cr-flymake-ninja-executable
70 (concat (cr-flymake-chromium-src)
71 (file-name-directory cr-flymake-ninja-build-file))
72 (concat (cr-flymake-from-build-to-src-root)
73 (cr-flymake-current-file-name) "^")))))
75 (defun cr-flymake-kick-off-check-after-save ()
79 (defadvice next-error (around cr-flymake-next-error activate)
96 (defun cr-flymake-find-file ()
101 (cr-flymake-current-file-name))
103 ;; against, can't use cr-flymake-chromium-src here. Instead we add a
107 'cr-flymake-ninja-command-line
109 'cr-flymake-getfname)))
115 (add-hook 'find-file-hook 'cr-flymake-find-file 'append)
116 (add-hook 'after-save-hook 'cr-flymake-kick-off-check-after-save)