From 01401d210feebece12d804fcab311063a1ea4c54 Mon Sep 17 00:00:00 2001 From: Joel Klinghed Date: Tue, 10 Jan 2017 08:43:23 +0100 Subject: Initial commit --- flycheck-android-experimental.el | 44 ++++++++++++++++++++++++++++++++++++++++ 1 file changed, 44 insertions(+) create mode 100644 flycheck-android-experimental.el (limited to 'flycheck-android-experimental.el') diff --git a/flycheck-android-experimental.el b/flycheck-android-experimental.el new file mode 100644 index 0000000..96374c7 --- /dev/null +++ b/flycheck-android-experimental.el @@ -0,0 +1,44 @@ +;;; flycheck-android-experimental.el --- Flycheck for Android using experimental +;;; gradle plugin + +;; Copyright (C) 2017 by Joel Klinghed + +;; Author: Joel Klinghed + +;;; Commentary: + +;;; Code: + +(require 'flycheck) + +(flycheck-define-checker android-java + "Java syntax checker using javac." + :command ("python" + (eval (flycheck-android-find-tool "java")) + (eval buffer-file-name) + source) + :error-patterns + ((warning line-start (file-name) ":" line ": warning:" + (message (one-or-more (not (any "^"))) + (any "^")) + line-end) + (error line-start (file-name) ":" line ": error:" + (message (one-or-more (not (any "^"))) + (any "^")) + line-end)) + :modes java-mode) + +(defun flycheck-android-find-tool (tool) + "Find flycheck-android-TOOL.py. +TOOL=name of tool" + (let ((filename (concat "flycheck-android-" tool ".py"))) + (expand-file-name + filename + (concat (file-name-as-directory "bin") + (file-name-directory (symbol-file 'flycheck-android-find-tool)))))) + +(add-to-list 'flycheck-checkers 'android-java) + +(provide 'flycheck-android-experimental) + +;;; flycheck-android-experimental.el ends here -- cgit v1.2.3-70-g09d2