diff options
Diffstat (limited to 'test/flycheck-test.el')
| -rw-r--r-- | test/flycheck-test.el | 3202 |
1 files changed, 1601 insertions, 1601 deletions
diff --git a/test/flycheck-test.el b/test/flycheck-test.el index 64e68a85..0a84a64d 100644 --- a/test/flycheck-test.el +++ b/test/flycheck-test.el @@ -2687,1135 +2687,1135 @@ evaluating BODY." (defvar js3-mode-show-parse-errors) (defvar python-indent-guess-indent-offset) -(flycheck-ert-def-checker-test ada-gnat ada syntax-error - (flycheck-ert-should-syntax-check - "language/ada/syntaxerror.adb" 'ada-mode - '(7 32 error "missing \";\"" :checker ada-gnat) - '(8 5 error "misspelling of \"SYNTAXERROR\"" :checker ada-gnat))) - -(flycheck-ert-def-checker-test ada-gnat ada warnings - (flycheck-ert-should-syntax-check - "language/ada/hello.adb" 'ada-mode - '( 6 4 warning "variable \"Name\" is not referenced" :checker ada-gnat) - '(8 11 warning "unrecognized pragma \"Foo\"" :checker ada-gnat))) - -(flycheck-ert-def-checker-test asciidoc asciidoc nil - (let ((flycheck-disabled-checkers '(asciidoctor))) - (flycheck-ert-should-syntax-check - "language/asciidoc.adoc" 'adoc-mode - '(1 nil warning "missing style: [paradef-default]: paragraph" :checker asciidoc) - '(3 nil info "old tables syntax" :checker asciidoc) - '(11 nil error "[tabledef-default] illegal width=%60%" :checker asciidoc)))) - -(flycheck-ert-def-checker-test asciidoctor asciidoc nil - (flycheck-ert-should-syntax-check - "language/asciidoctor.adoc" 'adoc-mode - '(4 nil warning "section title out of sequence: expected level 1, got level 2" :checker asciidoctor) - '(6 nil error "unmatched macro: endif::[]" :checker asciidoctor))) - -(flycheck-ert-def-checker-test c/c++-clang (c c++) error - (let ((flycheck-disabled-checkers '(c/c++-gcc))) - (flycheck-ert-should-syntax-check - "language/c_c++/error.cpp" 'c++-mode - '(2 20 error "no member named 'bar' in 'A'" - :checker c/c++-clang) - '(6 19 info "in instantiation of function template specialization 'foo<A>' requested here" - :checker c/c++-clang)))) - -(flycheck-ert-def-checker-test c/c++-clang (c c++) fatal-error - (let ((flycheck-disabled-checkers '(c/c++-gcc))) - (flycheck-ert-should-syntax-check - "language/c_c++/includes.c" 'c-mode - '(2 10 error "'library.h' file not found" - :checker c/c++-clang)))) +;; (flycheck-ert-def-checker-test ada-gnat ada syntax-error +;; (flycheck-ert-should-syntax-check +;; "language/ada/syntaxerror.adb" 'ada-mode +;; '(7 32 error "missing \";\"" :checker ada-gnat) +;; '(8 5 error "misspelling of \"SYNTAXERROR\"" :checker ada-gnat))) -(flycheck-ert-def-checker-test c/c++-clang (c c++) warnings - (let ((flycheck-disabled-checkers '(c/c++-gcc c/c++-cppcheck))) - (flycheck-ert-should-syntax-check - "language/c_c++/warning.c" 'c-mode - '(5 10 warning "unused variable 'unused'" :checker c/c++-clang) - '(7 15 warning "comparison of integers of different signs: 'int' and 'unsigned int'" - :checker c/c++-clang) - '(8 7 warning "no message" :checker c/c++-clang)))) - -(flycheck-ert-def-checker-test c/c++-clang (c c++) included-file-error - (let ((flycheck-clang-include-path '("./include")) - (flycheck-disabled-checkers '(c/c++-gcc))) - (flycheck-ert-should-syntax-check - "language/c_c++/in-included-file.cpp" 'c++-mode - `(3 nil warning "In include ./warning.c" :checker c/c++-clang)))) +;; (flycheck-ert-def-checker-test ada-gnat ada warnings +;; (flycheck-ert-should-syntax-check +;; "language/ada/hello.adb" 'ada-mode +;; '( 6 4 warning "variable \"Name\" is not referenced" :checker ada-gnat) +;; '(8 11 warning "unrecognized pragma \"Foo\"" :checker ada-gnat))) + +;; (flycheck-ert-def-checker-test asciidoc asciidoc nil +;; (let ((flycheck-disabled-checkers '(asciidoctor))) +;; (flycheck-ert-should-syntax-check +;; "language/asciidoc.adoc" 'adoc-mode +;; '(1 nil warning "missing style: [paradef-default]: paragraph" :checker asciidoc) +;; '(3 nil info "old tables syntax" :checker asciidoc) +;; '(11 nil error "[tabledef-default] illegal width=%60%" :checker asciidoc)))) + +;; (flycheck-ert-def-checker-test asciidoctor asciidoc nil +;; (flycheck-ert-should-syntax-check +;; "language/asciidoctor.adoc" 'adoc-mode +;; '(4 nil warning "section title out of sequence: expected level 1, got level 2" :checker asciidoctor) +;; '(6 nil error "unmatched macro: endif::[]" :checker asciidoctor))) + +;; (flycheck-ert-def-checker-test c/c++-clang (c c++) error +;; (let ((flycheck-disabled-checkers '(c/c++-gcc))) +;; (flycheck-ert-should-syntax-check +;; "language/c_c++/error.cpp" 'c++-mode +;; '(2 20 error "no member named 'bar' in 'A'" +;; :checker c/c++-clang) +;; '(6 19 info "in instantiation of function template specialization 'foo<A>' requested here" +;; :checker c/c++-clang)))) + +;; (flycheck-ert-def-checker-test c/c++-clang (c c++) fatal-error +;; (let ((flycheck-disabled-checkers '(c/c++-gcc))) +;; (flycheck-ert-should-syntax-check +;; "language/c_c++/includes.c" 'c-mode +;; '(2 10 error "'library.h' file not found" +;; :checker c/c++-clang)))) + +;; (flycheck-ert-def-checker-test c/c++-clang (c c++) warnings +;; (let ((flycheck-disabled-checkers '(c/c++-gcc c/c++-cppcheck))) +;; (flycheck-ert-should-syntax-check +;; "language/c_c++/warning.c" 'c-mode +;; '(5 10 warning "unused variable 'unused'" :checker c/c++-clang) +;; '(7 15 warning "comparison of integers of different signs: 'int' and 'unsigned int'" +;; :checker c/c++-clang) +;; '(8 7 warning "no message" :checker c/c++-clang)))) + +;; (flycheck-ert-def-checker-test c/c++-clang (c c++) included-file-error +;; (let ((flycheck-clang-include-path '("./include")) +;; (flycheck-disabled-checkers '(c/c++-gcc))) +;; (flycheck-ert-should-syntax-check +;; "language/c_c++/in-included-file.cpp" 'c++-mode +;; `(3 nil warning "In include ./warning.c" :checker c/c++-clang)))) + +;; (flycheck-ert-def-checker-test c/c++-gcc (c c++) error +;; (let ((flycheck-disabled-checkers '(c/c++-clang))) +;; (flycheck-ert-should-syntax-check +;; "language/c_c++/error.cpp" 'c++-mode +;; '(2 20 error "'struct A' has no member named 'bar'" +;; :checker c/c++-gcc)))) + +;; (flycheck-ert-def-checker-test c/c++-gcc (c c++) fatal-error +;; (let ((flycheck-disabled-checkers '(c/c++-clang))) +;; (flycheck-ert-should-syntax-check +;; "language/c_c++/includes.c" 'c-mode +;; '(2 21 error "library.h: No such file or directory" +;; :checker c/c++-gcc)))) + +;; (flycheck-ert-def-checker-test c/c++-gcc (c c++) warning +;; (let ((flycheck-disabled-checkers '(c/c++-clang c/c++-cppcheck))) +;; (flycheck-ert-should-syntax-check +;; "language/c_c++/warning.c" 'c-mode +;; '(5 10 warning "unused variable 'unused'" +;; :id "-Wunused-variable" :checker c/c++-gcc) +;; '(7 15 warning "comparison between signed and unsigned integer expressions" +;; :id "-Wsign-compare" :checker c/c++-gcc) +;; '(8 7 warning "#warning" :id "-Wcpp" :checker c/c++-gcc)))) + +;; (flycheck-ert-def-checker-test c/c++-gcc (c c++) included-file-error +;; (let ((flycheck-gcc-include-path '("./include")) +;; (flycheck-disabled-checkers '(c/c++-clang))) +;; (flycheck-ert-should-syntax-check +;; "language/c_c++/in-included-file.cpp" 'c++-mode +;; `(3 nil warning "In include warning.c" :checker c/c++-gcc)))) + +;; (flycheck-ert-def-checker-test c/c++-cppcheck (c c++) nil +;; :tags '(cppcheck-xml) +;; (let ((flycheck-disabled-checkers '(c/c++-clang c/c++-gcc)) +;; (flycheck-cppcheck-inconclusive nil) +;; (flycheck-cppcheck-checks '("style"))) +;; (flycheck-ert-should-syntax-check +;; "language/c_c++/style2.cpp" 'c++-mode +;; '(3 nil info "The scope of the variable 'i' can be reduced. Warning: Be careful when fixing this message, especially when there are inner loops. Here is an example where cppcheck will write that the scope for 'i' can be reduced:\nvoid f(int x)\n{\n int i = 0;\n if (x) {\n // it's safe to move 'int i = 0;' here\n for (int n = 0; n < 10; ++n) {\n // it is possible but not safe to move 'int i = 0;' here\n do_something(&i);\n }\n }\n}\nWhen you see this message it is always safe to reduce the variable scope 1 level." +;; :id "variableScope" :checker c/c++-cppcheck)) + +;; (flycheck-ert-should-syntax-check +;; "language/c_c++/style.cpp" 'c-mode +;; '(5 nil info "Unused variable: unused" :id "unusedVariable" +;; :checker c/c++-cppcheck) +;; '(9 nil error "Division by zero." :id "zerodiv" :checker c/c++-cppcheck)) + +;; (flycheck-ert-should-syntax-check +;; "language/c_c++/style.cpp" 'c++-mode +;; '(5 nil info "Unused variable: unused" :id "unusedVariable" +;; :checker c/c++-cppcheck) +;; '(9 nil error "Division by zero." :id "zerodiv" :checker c/c++-cppcheck) +;; '(12 nil warning "Parameter 'foo' is passed by value. It could be passed as a (const) reference which is usually faster and recommended in C++." +;; :id "passedByValue" :checker c/c++-cppcheck)))) + +;; (flycheck-ert-def-checker-test cfengine cfengine error +;; (skip-unless (fboundp 'cfengine3-mode)) +;; (flycheck-ert-should-syntax-check +;; "language/cfengine/error.cf" 'cfengine3-mode +;; '(8 20 error "Unknown promise type 'nosuchpromisetype'" :checker cfengine))) -(flycheck-ert-def-checker-test c/c++-gcc (c c++) error - (let ((flycheck-disabled-checkers '(c/c++-clang))) - (flycheck-ert-should-syntax-check - "language/c_c++/error.cpp" 'c++-mode - '(2 20 error "'struct A' has no member named 'bar'" - :checker c/c++-gcc)))) +;; (flycheck-ert-def-checker-test cfengine cfengine warning +;; (skip-unless (fboundp 'cfengine3-mode)) +;; (flycheck-ert-should-syntax-check +;; "language/cfengine/warning.cf" 'cfengine3-mode +;; '(3 34 warning "Removed constraint 'host_licenses_paid' in promise type 'common' [-Wremoved]" +;; :checker cfengine))) -(flycheck-ert-def-checker-test c/c++-gcc (c c++) fatal-error - (let ((flycheck-disabled-checkers '(c/c++-clang))) - (flycheck-ert-should-syntax-check - "language/c_c++/includes.c" 'c-mode - '(2 21 error "library.h: No such file or directory" - :checker c/c++-gcc)))) +;; (flycheck-ert-def-checker-test chef-foodcritic chef nil +;; (flycheck-ert-should-syntax-check +;; "language/chef/recipes/error.rb" 'ruby-mode +;; '(3 nil error "FC002: Avoid string interpolation where not required" +;; :checker chef-foodcritic) +;; '(11 nil error "FC004: Use a service resource to start and stop services" +;; :checker chef-foodcritic))) -(flycheck-ert-def-checker-test c/c++-gcc (c c++) warning - (let ((flycheck-disabled-checkers '(c/c++-clang c/c++-cppcheck))) - (flycheck-ert-should-syntax-check - "language/c_c++/warning.c" 'c-mode - '(5 10 warning "unused variable 'unused'" - :id "-Wunused-variable" :checker c/c++-gcc) - '(7 15 warning "comparison between signed and unsigned integer expressions" - :id "-Wsign-compare" :checker c/c++-gcc) - '(8 7 warning "#warning" :id "-Wcpp" :checker c/c++-gcc)))) - -(flycheck-ert-def-checker-test c/c++-gcc (c c++) included-file-error - (let ((flycheck-gcc-include-path '("./include")) - (flycheck-disabled-checkers '(c/c++-clang))) - (flycheck-ert-should-syntax-check - "language/c_c++/in-included-file.cpp" 'c++-mode - `(3 nil warning "In include warning.c" :checker c/c++-gcc)))) - -(flycheck-ert-def-checker-test c/c++-cppcheck (c c++) nil - :tags '(cppcheck-xml) - (let ((flycheck-disabled-checkers '(c/c++-clang c/c++-gcc)) - (flycheck-cppcheck-inconclusive nil) - (flycheck-cppcheck-checks '("style"))) - (flycheck-ert-should-syntax-check - "language/c_c++/style2.cpp" 'c++-mode - '(3 nil info "The scope of the variable 'i' can be reduced. Warning: Be careful when fixing this message, especially when there are inner loops. Here is an example where cppcheck will write that the scope for 'i' can be reduced:\nvoid f(int x)\n{\n int i = 0;\n if (x) {\n // it's safe to move 'int i = 0;' here\n for (int n = 0; n < 10; ++n) {\n // it is possible but not safe to move 'int i = 0;' here\n do_something(&i);\n }\n }\n}\nWhen you see this message it is always safe to reduce the variable scope 1 level." - :id "variableScope" :checker c/c++-cppcheck)) +;; (flycheck-ert-def-checker-test coffee coffee syntax-error +;; (flycheck-ert-should-syntax-check +;; "language/coffee/syntax-error.coffee" 'coffee-mode +;; '(4 7 error "missing \"" :checker coffee))) - (flycheck-ert-should-syntax-check - "language/c_c++/style.cpp" 'c-mode - '(5 nil info "Unused variable: unused" :id "unusedVariable" - :checker c/c++-cppcheck) - '(9 nil error "Division by zero." :id "zerodiv" :checker c/c++-cppcheck)) +;; (flycheck-ert-def-checker-test coffee-coffeelint coffee error +;; :tags '(checkstyle-xml) +;; (flycheck-ert-should-syntax-check +;; "language/coffee/error.coffee" 'coffee-mode +;; '(4 nil error "Throwing strings is forbidden; context:" +;; :checker coffee-coffeelint))) + +;; (flycheck-ert-def-checker-test coffee-coffeelint coffee warning +;; :tags '(checkstyle-xml) +;; (let ((flycheck-coffeelintrc "lint.json")) +;; (flycheck-ert-should-syntax-check +;; "language/coffee/error.coffee" 'coffee-mode +;; '(4 nil warning "Throwing strings is forbidden; context:" +;; :checker coffee-coffeelint)))) + +;; (flycheck-ert-def-checker-test coq coq syntax-error +;; (skip-unless (load "gallina" 'noerror 'nomessage)) +;; (flycheck-ert-should-syntax-check +;; "language/coq/syntax-error.v" 'coq-mode +;; '(6 10 error "\"end\" expected after [branches] (in [match_constr])." +;; :checker coq))) - (flycheck-ert-should-syntax-check - "language/c_c++/style.cpp" 'c++-mode - '(5 nil info "Unused variable: unused" :id "unusedVariable" - :checker c/c++-cppcheck) - '(9 nil error "Division by zero." :id "zerodiv" :checker c/c++-cppcheck) - '(12 nil warning "Parameter 'foo' is passed by value. It could be passed as a (const) reference which is usually faster and recommended in C++." - :id "passedByValue" :checker c/c++-cppcheck)))) - -(flycheck-ert-def-checker-test cfengine cfengine error - (skip-unless (fboundp 'cfengine3-mode)) - (flycheck-ert-should-syntax-check - "language/cfengine/error.cf" 'cfengine3-mode - '(8 20 error "Unknown promise type 'nosuchpromisetype'" :checker cfengine))) - -(flycheck-ert-def-checker-test cfengine cfengine warning - (skip-unless (fboundp 'cfengine3-mode)) - (flycheck-ert-should-syntax-check - "language/cfengine/warning.cf" 'cfengine3-mode - '(3 34 warning "Removed constraint 'host_licenses_paid' in promise type 'common' [-Wremoved]" - :checker cfengine))) - -(flycheck-ert-def-checker-test chef-foodcritic chef nil - (flycheck-ert-should-syntax-check - "language/chef/recipes/error.rb" 'ruby-mode - '(3 nil error "FC002: Avoid string interpolation where not required" - :checker chef-foodcritic) - '(11 nil error "FC004: Use a service resource to start and stop services" - :checker chef-foodcritic))) - -(flycheck-ert-def-checker-test coffee coffee syntax-error - (flycheck-ert-should-syntax-check - "language/coffee/syntax-error.coffee" 'coffee-mode - '(4 7 error "missing \"" :checker coffee))) - -(flycheck-ert-def-checker-test coffee-coffeelint coffee error - :tags '(checkstyle-xml) - (flycheck-ert-should-syntax-check - "language/coffee/error.coffee" 'coffee-mode - '(4 nil error "Throwing strings is forbidden; context:" - :checker coffee-coffeelint))) - -(flycheck-ert-def-checker-test coffee-coffeelint coffee warning - :tags '(checkstyle-xml) - (let ((flycheck-coffeelintrc "lint.json")) - (flycheck-ert-should-syntax-check - "language/coffee/error.coffee" 'coffee-mode - '(4 nil warning "Throwing strings is forbidden; context:" - :checker coffee-coffeelint)))) - -(flycheck-ert-def-checker-test coq coq syntax-error - (skip-unless (load "gallina" 'noerror 'nomessage)) - (flycheck-ert-should-syntax-check - "language/coq/syntax-error.v" 'coq-mode - '(6 10 error "\"end\" expected after [branches] (in [match_constr])." - :checker coq))) - -(flycheck-ert-def-checker-test coq coq error - (skip-unless (load "gallina" 'noerror 'nomessage)) - (flycheck-ert-should-syntax-check - "language/coq/error.v" 'coq-mode - '(7 21 error "In environment -evenb : nat -> bool -n : nat -n0 : nat -n' : nat -The term \"1\" has type \"nat\" while it is expected to have type \"bool\"." :checker coq))) - -(flycheck-ert-def-checker-test css-csslint css nil - :tags '(checkstyle-xml) - (flycheck-ert-should-syntax-check - "language/css/warning.css" 'css-mode - '(3 6 warning "Heading (h1) should not be qualified." - :id "Disallowqualifiedheadings" :checker css-csslint))) - -(flycheck-ert-def-checker-test css-csslint css syntax-error - :tags '(checkstyle-xml) - (flycheck-ert-should-syntax-check - "language/css/syntax-error.css" 'css-mode - '(4 14 error "Expected a `FUNCTION` or `IDENT` after colon at line 4, col 14." - :id "ParsingErrors" :checker css-csslint))) - -(ert-deftest flycheck-d-module-re/matches-module-name () - :tags '(language-d) - (unless (version<= "24.4" emacs-version) - (ert-skip "Skipped because CC Mode is broken on 24.3. -See https://github.com/flycheck/flycheck/issues/531 and Emacs bug #19206")) - (let ((s "module spam.with.eggs ;")) - (should (string-match flycheck-d-module-re s)) - (should (string= "spam.with.eggs" (match-string 1 s))))) - -(ert-deftest flycheck-d-base-directory/no-module-declaration () - :tags '(language-d) - (unless (version<= "24.4" emacs-version) - (ert-skip "Skipped because CC Mode is broken on 24.3. -See https://github.com/flycheck/flycheck/issues/531 and Emacs bug #19206")) - (flycheck-ert-with-resource-buffer "language/d/src/dmd/no_module.d" - (should (flycheck-same-files-p - (flycheck-d-base-directory) - (flycheck-ert-resource-filename "language/d/src/dmd"))))) - -(ert-deftest flycheck-d-base-directory/with-module-declaration () - :tags '(language-d) - (unless (version<= "24.4" emacs-version) - (ert-skip "Skipped because CC Mode is broken on 24.3. -See https://github.com/flycheck/flycheck/issues/531 and Emacs bug #19206")) - (flycheck-ert-with-resource-buffer "language/d/src/dmd/warning.d" - (should (flycheck-same-files-p - (flycheck-d-base-directory) - (flycheck-ert-resource-filename "language/d/src"))))) - -(ert-deftest flycheck-d-base-directory/package-file () - :tags '(language-d) - (unless (version<= "24.4" emacs-version) - (ert-skip "Skipped because CC Mode is broken on 24.3. -See https://github.com/flycheck/flycheck/issues/531 and Emacs bug #19206")) - (flycheck-ert-with-resource-buffer "language/d/src/dmd/package.d" - (should (flycheck-same-files-p - (flycheck-d-base-directory) - (flycheck-ert-resource-filename "language/d/src"))))) - -(flycheck-ert-def-checker-test d-dmd d warning-include-path - (unless (version<= "24.4" emacs-version) - (ert-skip "Skipped because CC Mode is broken on 24.3. -See https://github.com/flycheck/flycheck/issues/531 and Emacs bug #19206")) - (let ((flycheck-dmd-include-path '("../../lib"))) - (flycheck-ert-should-syntax-check - "language/d/src/dmd/warning.d" 'd-mode - '(9 5 warning "statement is not reachable" :checker d-dmd) - '(20 17 warning "function dmd.warning.bar is deprecated" - :checker d-dmd)))) - -(flycheck-ert-def-checker-test d-dmd d missing-import - (unless (version<= "24.4" emacs-version) - (ert-skip "Skipped because CC Mode is broken on 24.3. -See https://github.com/flycheck/flycheck/issues/531 and Emacs bug #19206")) - (flycheck-ert-should-syntax-check - "language/d/src/dmd/warning.d" 'd-mode - '(4 8 error "module external_library is in file 'external_library.d' which cannot be read" - :checker d-dmd))) - -(flycheck-ert-def-checker-test d-dmd d continuation-line - (unless (version<= "24.4" emacs-version) - (ert-skip "Skipped because CC Mode is broken on 24.3. -See https://github.com/flycheck/flycheck/issues/531 and Emacs bug #19206")) - (flycheck-ert-should-syntax-check - "language/d/src/dmd/continuation.d" 'd-mode - '(5 12 error "undefined identifier 'invalid'" - :checker d-dmd) - '(10 12 error "template instance continuation.T!() error instantiating" - :checker d-dmd) - '(13 1 info "instantiated from here: U!()" - :checker d-dmd))) - -(flycheck-ert-def-checker-test dockerfile-hadolint dockerfile error - (flycheck-ert-should-syntax-check - "language/dockerfile/Dockerfile.error" 'dockerfile-mode - '(2 1 error "unexpected 'I' expecting space, \"\\t\", \"ONBUILD\", \"FROM\", \"COPY\", \"RUN\", \"WORKDIR\", \"ENTRYPOINT\", \"VOLUME\", \"EXPOSE\", \"ENV\", \"ARG\", \"USER\", \"LABEL\", \"STOPSIGNAL\", \"CMD\", \"SHELL\", \"MAINTAINER\", \"ADD\", \"#\", \"HEALTHCHECK\" or end of input" - :id nil :checker dockerfile-hadolint))) - -(flycheck-ert-def-checker-test dockerfile-hadolint dockerfile warnings - (flycheck-ert-should-syntax-check - "language/dockerfile/Dockerfile.warning" 'dockerfile-mode - '(1 nil warning "Always tag the version of an image explicitly." - :id "DL3006" :checker dockerfile-hadolint) - '(2 nil warning "Do not use apt-get upgrade or dist-upgrade." - :id "DL3005" :checker dockerfile-hadolint) - '(2 nil warning "Delete the apt-get lists after installing something" - :id "DL3009" :checker dockerfile-hadolint) - '(3 nil warning "Use absolute WORKDIR" - :id "DL3000" :checker dockerfile-hadolint))) - -(flycheck-ert-def-checker-test (emacs-lisp emacs-lisp-checkdoc) emacs-lisp nil - (flycheck-ert-should-syntax-check - "language/emacs-lisp/warnings.el" 'emacs-lisp-mode - '(12 nil warning "First sentence should end with punctuation" - :checker emacs-lisp-checkdoc) - '(16 6 warning "message called with 0 arguments, but requires 1+" - :checker emacs-lisp) - '(21 1 warning "the function `dummy-package-foo' is not known to be defined." - :checker emacs-lisp ))) - -(flycheck-ert-def-checker-test (emacs-lisp emacs-lisp-checkdoc) emacs-lisp - uses-right-major-mode - (flycheck-ert-should-syntax-check - "language/emacs-lisp/checkdoc-elisp-mode-regression.el" 'emacs-lisp-mode - '(11 nil warning "All variables and subroutines might as well have a documentation string" - :checker emacs-lisp-checkdoc))) - -(flycheck-ert-def-checker-test (emacs-lisp-checkdoc) emacs-lisp - inherits-checkdoc-variables - ;; This test doesn't run on 24.3 and earlier because the corresponding - ;; checkdoc variables were only introduced in 24.4. - (skip-unless (version<= "24.4" emacs-version)) - (flycheck-ert-should-syntax-check - "language/emacs-lisp/local-checkdoc-variables.el" 'emacs-lisp-mode)) - -(flycheck-ert-def-checker-test (emacs-lisp emacs-lisp-checkdoc) emacs-lisp - checks-compressed-file - (flycheck-ert-should-syntax-check - "language/emacs-lisp/compressed.el.gz" 'emacs-lisp-mode - '(12 nil warning "First sentence should end with punctuation" - :checker emacs-lisp-checkdoc) - '(16 6 warning "message called with 0 arguments, but requires 1+" - :checker emacs-lisp) - '(21 1 warning "the function `dummy-package-foo' is not known to be defined." - :checker emacs-lisp))) - -(flycheck-ert-def-checker-test emacs-lisp emacs-lisp syntax-error - (let ((flycheck-disabled-checkers '(emacs-lisp-checkdoc))) - (flycheck-ert-should-syntax-check - "language/emacs-lisp/syntax-error.el" 'emacs-lisp-mode - '(3 1 error "End of file during parsing" :checker emacs-lisp)))) - -(flycheck-ert-def-checker-test (emacs-lisp emacs-lisp-checkdoc) emacs-lisp - without-file-name - ;; Regression test for checkdoc in buffers without file names. See - ;; https://github.com/flycheck/flycheck/issues/73 and - ;; https://github.com/bbatsov/prelude/issues/259 - (flycheck-ert-with-resource-buffer "language/emacs-lisp/warnings.el" - (set-visited-file-name nil 'no-query) - (emacs-lisp-mode) - (should-not (buffer-file-name)) - (flycheck-ert-buffer-sync) - ;; TODO: Consider whether checkdoc is really useful in buffers without file - ;; names… - (should flycheck-current-errors))) - -(flycheck-ert-def-checker-test (emacs-lisp emacs-lisp-checkdoc) emacs-lisp - does-not-check-autoloads-buffers - ;; Regression test ensuring that Emacs Lisp won't check autoload buffers. - ;; These buffers are temporary buffers created during package installation to - ;; collect the autoloads of newly installed packages before writing the - ;; autoloads file. See `https://github.com/flycheck/flycheck/issues/45' and - ;; `https://github.com/bbatsov/prelude/issues/253' for details. - (flycheck-ert-with-file-buffer (locate-library "shut-up-autoloads") - (should-not (flycheck-may-use-checker 'emacs-lisp)) - (should-not (flycheck-may-use-checker 'emacs-lisp-checkdoc)))) +;; (flycheck-ert-def-checker-test coq coq error +;; (skip-unless (load "gallina" 'noerror 'nomessage)) +;; (flycheck-ert-should-syntax-check +;; "language/coq/error.v" 'coq-mode +;; '(7 21 error "In environment +;; evenb : nat -> bool +;; n : nat +;; n0 : nat +;; n' : nat +;; The term \"1\" has type \"nat\" while it is expected to have type \"bool\"." :checker coq))) + +;; (flycheck-ert-def-checker-test css-csslint css nil +;; :tags '(checkstyle-xml) +;; (flycheck-ert-should-syntax-check +;; "language/css/warning.css" 'css-mode +;; '(3 6 warning "Heading (h1) should not be qualified." +;; :id "Disallowqualifiedheadings" :checker css-csslint))) -(flycheck-ert-def-checker-test (emacs-lisp emacs-lisp-checkdoc) emacs-lisp - checkdoc-does-not-check-cask-files - (flycheck-ert-with-file-buffer - (expand-file-name "Cask" flycheck-test-source-directory) - (should-not (flycheck-may-use-checker 'emacs-lisp-checkdoc)))) - -(flycheck-ert-def-checker-test (emacs-lisp emacs-lisp-checkdoc) emacs-lisp - does-not-check-with-no-byte-compile - ;; We need to use a hook here, because `no-byte-compile' seems to be - ;; explicitly changed when loading Emacs Lisp files - (let ((disable-byte-comp (lambda () (setq-local no-byte-compile t)))) - (add-hook 'emacs-lisp-mode-hook disable-byte-comp) - (unwind-protect - (flycheck-ert-should-syntax-check - "language/emacs-lisp/warnings.el" 'emacs-lisp-mode - '(12 nil warning "First sentence should end with punctuation" - :checker emacs-lisp-checkdoc)) - (remove-hook 'emacs-lisp-mode-hook disable-byte-comp)))) +;; (flycheck-ert-def-checker-test css-csslint css syntax-error +;; :tags '(checkstyle-xml) +;; (flycheck-ert-should-syntax-check +;; "language/css/syntax-error.css" 'css-mode +;; '(4 14 error "Expected a `FUNCTION` or `IDENT` after colon at line 4, col 14." +;; :id "ParsingErrors" :checker css-csslint))) + +;; (ert-deftest flycheck-d-module-re/matches-module-name () +;; :tags '(language-d) +;; (unless (version<= "24.4" emacs-version) +;; (ert-skip "Skipped because CC Mode is broken on 24.3. +;; See https://github.com/flycheck/flycheck/issues/531 and Emacs bug #19206")) +;; (let ((s "module spam.with.eggs ;")) +;; (should (string-match flycheck-d-module-re s)) +;; (should (string= "spam.with.eggs" (match-string 1 s))))) + +;; (ert-deftest flycheck-d-base-directory/no-module-declaration () +;; :tags '(language-d) +;; (unless (version<= "24.4" emacs-version) +;; (ert-skip "Skipped because CC Mode is broken on 24.3. +;; See https://github.com/flycheck/flycheck/issues/531 and Emacs bug #19206")) +;; (flycheck-ert-with-resource-buffer "language/d/src/dmd/no_module.d" +;; (should (flycheck-same-files-p +;; (flycheck-d-base-directory) +;; (flycheck-ert-resource-filename "language/d/src/dmd"))))) + +;; (ert-deftest flycheck-d-base-directory/with-module-declaration () +;; :tags '(language-d) +;; (unless (version<= "24.4" emacs-version) +;; (ert-skip "Skipped because CC Mode is broken on 24.3. +;; See https://github.com/flycheck/flycheck/issues/531 and Emacs bug #19206")) +;; (flycheck-ert-with-resource-buffer "language/d/src/dmd/warning.d" +;; (should (flycheck-same-files-p +;; (flycheck-d-base-directory) +;; (flycheck-ert-resource-filename "language/d/src"))))) + +;; (ert-deftest flycheck-d-base-directory/package-file () +;; :tags '(language-d) +;; (unless (version<= "24.4" emacs-version) +;; (ert-skip "Skipped because CC Mode is broken on 24.3. +;; See https://github.com/flycheck/flycheck/issues/531 and Emacs bug #19206")) +;; (flycheck-ert-with-resource-buffer "language/d/src/dmd/package.d" +;; (should (flycheck-same-files-p +;; (flycheck-d-base-directory) +;; (flycheck-ert-resource-filename "language/d/src"))))) + +;; (flycheck-ert-def-checker-test d-dmd d warning-include-path +;; (unless (version<= "24.4" emacs-version) +;; (ert-skip "Skipped because CC Mode is broken on 24.3. +;; See https://github.com/flycheck/flycheck/issues/531 and Emacs bug #19206")) +;; (let ((flycheck-dmd-include-path '("../../lib"))) +;; (flycheck-ert-should-syntax-check +;; "language/d/src/dmd/warning.d" 'd-mode +;; '(9 5 warning "statement is not reachable" :checker d-dmd) +;; '(20 17 warning "function dmd.warning.bar is deprecated" +;; :checker d-dmd)))) + +;; (flycheck-ert-def-checker-test d-dmd d missing-import +;; (unless (version<= "24.4" emacs-version) +;; (ert-skip "Skipped because CC Mode is broken on 24.3. +;; See https://github.com/flycheck/flycheck/issues/531 and Emacs bug #19206")) +;; (flycheck-ert-should-syntax-check +;; "language/d/src/dmd/warning.d" 'd-mode +;; '(4 8 error "module external_library is in file 'external_library.d' which cannot be read" +;; :checker d-dmd))) + +;; (flycheck-ert-def-checker-test d-dmd d continuation-line +;; (unless (version<= "24.4" emacs-version) +;; (ert-skip "Skipped because CC Mode is broken on 24.3. +;; See https://github.com/flycheck/flycheck/issues/531 and Emacs bug #19206")) +;; (flycheck-ert-should-syntax-check +;; "language/d/src/dmd/continuation.d" 'd-mode +;; '(5 12 error "undefined identifier 'invalid'" +;; :checker d-dmd) +;; '(10 12 error "template instance continuation.T!() error instantiating" +;; :checker d-dmd) +;; '(13 1 info "instantiated from here: U!()" +;; :checker d-dmd))) + +;; (flycheck-ert-def-checker-test dockerfile-hadolint dockerfile error +;; (flycheck-ert-should-syntax-check +;; "language/dockerfile/Dockerfile.error" 'dockerfile-mode +;; '(2 1 error "unexpected 'I' expecting space, \"\\t\", \"ONBUILD\", \"FROM\", \"COPY\", \"RUN\", \"WORKDIR\", \"ENTRYPOINT\", \"VOLUME\", \"EXPOSE\", \"ENV\", \"ARG\", \"USER\", \"LABEL\", \"STOPSIGNAL\", \"CMD\", \"SHELL\", \"MAINTAINER\", \"ADD\", \"#\", \"HEALTHCHECK\" or end of input" +;; :id nil :checker dockerfile-hadolint))) -(flycheck-ert-def-checker-test emacs-lisp emacs-lisp check-declare-warnings - (let ((flycheck-emacs-lisp-check-declare t)) - (flycheck-ert-should-syntax-check - "language/emacs-lisp/check-declare-warnings.el" 'emacs-lisp-mode - (if (version< emacs-version "25") - '(0 nil warning "`this-function-is-not-declared' was defined in this-file-does-not-exist.el: file not found" - :checker emacs-lisp) - '(9 1 warning "`this-function-is-not-declared' was defined in this-file-does-not-exist.el: file not found" - :checker emacs-lisp))))) - -(flycheck-ert-def-checker-test emacs-lisp emacs-lisp disable-check-declare - (let ((flycheck-emacs-lisp-check-declare nil)) - (flycheck-ert-should-syntax-check - "language/emacs-lisp/check-declare-warnings.el" 'emacs-lisp-mode))) - -(flycheck-ert-def-checker-test erlang erlang error - (flycheck-ert-should-syntax-check - "language/erlang/erlang/error.erl" 'erlang-mode - '(7 nil error "head mismatch" :checker erlang))) - -(flycheck-ert-def-checker-test erlang erlang warning - (flycheck-ert-should-syntax-check - "language/erlang/erlang/warning.erl" 'erlang-mode - '(6 nil warning "wrong number of arguments in format call" :checker erlang))) - -(flycheck-ert-def-checker-test erlang-rebar3 erlang error - (flycheck-ert-should-syntax-check - "language/erlang/rebar3/src/erlang-error.erl" 'erlang-mode - '(7 nil error "head mismatch" :checker erlang-rebar3))) - -(flycheck-ert-def-checker-test erlang-rebar3 erlang warning - (flycheck-ert-should-syntax-check - "language/erlang/rebar3/src/erlang-warning.erl" 'erlang-mode - '(6 nil warning "wrong number of arguments in format call" :checker erlang-rebar3))) - -(flycheck-ert-def-checker-test erlang-rebar3 erlang build - (flycheck-ert-should-syntax-check - "language/erlang/rebar3/_checkouts/dependency/src/dependency.erl" 'erlang-mode) - ;; Ensure that the dependency file wasn't built as standalone - ;; project which would create a separate _build directory - (should (not (file-exists-p - (flycheck-ert-resource-filename - "language/erlang/rebar3/_build/default/lib/dependency/_build"))))) - -(flycheck-ert-def-checker-test eruby-erubis eruby nil - (flycheck-ert-should-syntax-check - "language/eruby.erb" '(html-erb-mode rhtml-mode) - '(5 nil error "syntax error, unexpected keyword_end" :checker eruby-erubis))) - -(flycheck-ert-def-checker-test fortran-gfortran fortran error - (flycheck-ert-should-syntax-check - "language/fortran/error.f" '(fortran-mode f90-mode) - '(1 1 error "Non-numeric character in statement label at (1)" - :checker fortran-gfortran) - '(1 1 error "Unclassifiable statement at (1)" :checker fortran-gfortran) - '(2 1 error "Non-numeric character in statement label at (1)" - :checker fortran-gfortran) - '(2 1 error "Unclassifiable statement at (1)" :checker fortran-gfortran) - '(3 1 error "Non-numeric character in statement label at (1)" - :checker fortran-gfortran) - '(3 1 error "Unclassifiable statement at (1)" :checker fortran-gfortran))) - -(flycheck-ert-def-checker-test fortran-gfortran fortran free-form-error - (let ((flycheck-gfortran-layout 'free)) - (flycheck-ert-should-syntax-check - "language/fortran/error.f" '(fortran-mode f90-mode) - '(3 3 error "Expecting END PROGRAM statement at (1)" - :checker fortran-gfortran)))) - -(flycheck-ert-def-checker-test fortran-gfortran fortran warning - (flycheck-ert-should-syntax-check - "language/fortran/warning.f90" '(fortran-mode f90-mode) - '(1 20 warning "Unused dummy argument 'p' at (1)" - :checker fortran-gfortran) - '(18 9 warning "Same actual argument associated with INTENT(IN) argument 'a' and INTENT(OUT) argument 'b' at (1)" - :checker fortran-gfortran))) - -(flycheck-ert-def-checker-test go-gofmt go syntax-error - (flycheck-ert-should-syntax-check - "language/go/src/syntax/syntax-error.go" 'go-mode - '(5 9 error "expected '(', found 'IDENT' ta" :checker go-gofmt) - '(6 1 error "expected ')', found '}'" :checker go-gofmt))) - -(flycheck-ert-def-checker-test (go-build go-golint go-vet) go complete-chain - (skip-unless (funcall (flycheck-checker-get 'go-vet 'predicate))) - (flycheck-ert-with-env - `(("GOPATH" . ,(flycheck-ert-resource-filename "language/go"))) - (flycheck-ert-should-syntax-check - "language/go/src/warnings.go" 'go-mode - '(4 nil error "imported and not used: \"fmt\"" :checker go-build) - '(4 2 warning "should not use dot imports" :checker go-golint) - '(7 1 warning "exported function Warn should have comment or be unexported" - :checker go-golint) - '(8 nil error "undefined: fmt in fmt.Printf" :checker go-build) - '(11 1 warning "exported function Warnf should have comment or be unexported" - :checker go-golint) - '(12 nil error "undefined: fmt in fmt.Printf" :checker go-build) - '(17 nil error "undefined: fmt in fmt.Printf" :checker go-build) - '(17 nil warning "arg 1 for printf verb %s of wrong type: untyped int" - :checker go-vet) - '(19 nil error "cannot use 1 (type int) as type string in argument to Warnf" - :checker go-build) - '(23 nil warning "unreachable code" :checker go-vet) - '(25 9 warning "if block ends with a return statement, so drop this else and outdent its block" - :checker go-golint)))) - -(flycheck-ert-def-checker-test go-build go handles-packages - (flycheck-ert-with-env - `(("GOPATH" . ,(flycheck-ert-resource-filename "language/go"))) - (flycheck-ert-should-syntax-check "language/go/src/b1/main.go" 'go-mode))) - -(flycheck-ert-def-checker-test go-build go missing-package - (let* ((go-root (or (getenv "GOROOT") "/usr/local/go")) - (go-root-pkg (concat go-root "/src"))) - (flycheck-ert-with-env '(("GOPATH" . nil)) - (flycheck-ert-should-syntax-check - "language/go/src/b1/main.go" 'go-mode - `(4 2 error ,(format "cannot find package \"b2\" in any of:\n\t%s/b2 (from $GOROOT)\n\t($GOPATH not set)" - go-root-pkg) - :checker go-build))))) - -(flycheck-ert-def-checker-test go-build go directory-with-two-packages - (let ((flycheck-disabled-checkers '(go-errcheck go-unconvert go-megacheck))) - (flycheck-ert-with-env - `(("GOPATH" . ,(flycheck-ert-resource-filename "checkers/go"))) - (flycheck-ert-should-syntax-check - "checkers/go/src/multipkg/a.go" 'go-mode - `(1 nil info - ,(concat "can't load package: package multipkg: " - "found packages a (a.go) and b (b.go) in " - (flycheck-ert-resource-filename - "checkers/go/src/multipkg")) - :checker go-build))))) - -(flycheck-ert-def-checker-test go-test go nil - (flycheck-ert-with-env - `(("GOPATH" . ,(flycheck-ert-resource-filename "checkers/go"))) - (flycheck-ert-should-syntax-check - "language/go/src/test/test-error_test.go" 'go-mode - '(8 nil error "undefined: fmt in fmt.Println" :checker go-test)))) +;; (flycheck-ert-def-checker-test dockerfile-hadolint dockerfile warnings +;; (flycheck-ert-should-syntax-check +;; "language/dockerfile/Dockerfile.warning" 'dockerfile-mode +;; '(1 nil warning "Always tag the version of an image explicitly." +;; :id "DL3006" :checker dockerfile-hadolint) +;; '(2 nil warning "Do not use apt-get upgrade or dist-upgrade." +;; :id "DL3005" :checker dockerfile-hadolint) +;; '(2 nil warning "Delete the apt-get lists after installing something" +;; :id "DL3009" :checker dockerfile-hadolint) +;; '(3 nil warning "Use absolute WORKDIR" +;; :id "DL3000" :checker dockerfile-hadolint))) + +;; (flycheck-ert-def-checker-test (emacs-lisp emacs-lisp-checkdoc) emacs-lisp nil +;; (flycheck-ert-should-syntax-check +;; "language/emacs-lisp/warnings.el" 'emacs-lisp-mode +;; '(12 nil warning "First sentence should end with punctuation" +;; :checker emacs-lisp-checkdoc) +;; '(16 6 warning "message called with 0 arguments, but requires 1+" +;; :checker emacs-lisp) +;; '(21 1 warning "the function `dummy-package-foo' is not known to be defined." +;; :checker emacs-lisp ))) + +;; (flycheck-ert-def-checker-test (emacs-lisp emacs-lisp-checkdoc) emacs-lisp +;; uses-right-major-mode +;; (flycheck-ert-should-syntax-check +;; "language/emacs-lisp/checkdoc-elisp-mode-regression.el" 'emacs-lisp-mode +;; '(11 nil warning "All variables and subroutines might as well have a documentation string" +;; :checker emacs-lisp-checkdoc))) + +;; (flycheck-ert-def-checker-test (emacs-lisp-checkdoc) emacs-lisp +;; inherits-checkdoc-variables +;; ;; This test doesn't run on 24.3 and earlier because the corresponding +;; ;; checkdoc variables were only introduced in 24.4. +;; (skip-unless (version<= "24.4" emacs-version)) +;; (flycheck-ert-should-syntax-check +;; "language/emacs-lisp/local-checkdoc-variables.el" 'emacs-lisp-mode)) -(flycheck-ert-def-checker-test go-errcheck go nil - (flycheck-ert-with-env - `(("GOPATH" . ,(flycheck-ert-resource-filename "language/go"))) - (flycheck-ert-should-syntax-check - "language/go/src/errcheck/errcheck.go" 'go-mode - '(7 9 warning "Ignored `error` returned from `f.Close()`" - :checker go-errcheck) - '(9 9 warning "Ignored `error` returned from `os.Stat(\"enoent\")`" - :checker go-errcheck)))) - -(flycheck-ert-def-checker-test go-unconvert go nil - :tags '(language-go external-tool) - (flycheck-ert-with-env - `(("GOPATH" . ,(flycheck-ert-resource-filename "language/go"))) - (flycheck-ert-should-syntax-check - "language/go/src/unconvert/unconvert.go" 'go-mode - '(7 17 warning "unnecessary conversion" - :checker go-unconvert)))) - -(flycheck-ert-def-checker-test go-megacheck go nil - :tags '(language-go external-tool) - (flycheck-ert-with-env - `(("GOPATH" . ,(flycheck-ert-resource-filename "language/go"))) - (flycheck-ert-should-syntax-check - "language/go/src/megacheck/megacheck1.go" 'go-mode - '(8 6 warning "should omit values from range; this loop is equivalent to `for range ...` (S1005)" - :checker go-megacheck) - '(12 21 warning "calling strings.Replace with n == 0 will return no results, did you mean -1? (SA1018)" - :checker go-megacheck) - '(16 6 warning "func unused is unused (U1000)" - :checker go-megacheck)))) - -(flycheck-ert-def-checker-test go-megacheck-disabled-checkers go nil - :tags '(language-go external-tool) - (flycheck-ert-with-env - `(("GOPATH" . ,(flycheck-ert-resource-filename "language/go"))) - ;; Run with simple and unused checkers disabled - (let ((flycheck-go-megacheck-disabled-checkers '("simple" "unused"))) - (flycheck-ert-should-syntax-check - "language/go/src/megacheck/megacheck1.go" 'go-mode - '(12 21 warning "calling strings.Replace with n == 0 will return no results, did you mean -1? (SA1018)" - :checker go-megacheck))))) - -(flycheck-ert-def-checker-test groovy groovy syntax-error - ;; Work around - ;; https://github.com/Groovy-Emacs-Modes/groovy-emacs-modes/issues/11 - (require 'cl) - (flycheck-ert-should-syntax-check - "language/groovy.groovy" 'groovy-mode - '(2 14 error "unexpected token: {" :checker groovy))) - -(flycheck-ert-def-checker-test haml haml nil - (flycheck-ert-should-syntax-check - "language/haml.haml" 'haml-mode - '(5 nil error "Inconsistent indentation: 3 spaces used for indentation, but the rest of the document was indented using 2 spaces." - :checker haml))) - -(flycheck-ert-def-checker-test handlebars handlebars nil - (flycheck-ert-should-syntax-check - "language/handlebars.hbs" '(handlebars-mode web-mode) - '(2 nil error "Expecting 'ID', 'STRING', 'NUMBER', 'BOOLEAN', 'UNDEFINED', 'NULL', 'DATA', got 'INVALID'" - :checker handlebars))) - -(flycheck-ert-def-checker-test haskell-stack-ghc haskell syntax-error - (skip-unless (file-exists-p (getenv "HOME"))) - (let ((flycheck-disabled-checkers '(haskell-ghc))) - (flycheck-ert-should-syntax-check - "language/haskell/SyntaxError.hs" 'haskell-mode - '(3 1 error "parse error on input `module'" :checker haskell-stack-ghc)))) +;; (flycheck-ert-def-checker-test (emacs-lisp emacs-lisp-checkdoc) emacs-lisp +;; checks-compressed-file +;; (flycheck-ert-should-syntax-check +;; "language/emacs-lisp/compressed.el.gz" 'emacs-lisp-mode +;; '(12 nil warning "First sentence should end with punctuation" +;; :checker emacs-lisp-checkdoc) +;; '(16 6 warning "message called with 0 arguments, but requires 1+" +;; :checker emacs-lisp) +;; '(21 1 warning "the function `dummy-package-foo' is not known to be defined." +;; :checker emacs-lisp))) + +;; (flycheck-ert-def-checker-test emacs-lisp emacs-lisp syntax-error +;; (let ((flycheck-disabled-checkers '(emacs-lisp-checkdoc))) +;; (flycheck-ert-should-syntax-check +;; "language/emacs-lisp/syntax-error.el" 'emacs-lisp-mode +;; '(3 1 error "End of file during parsing" :checker emacs-lisp)))) + +;; (flycheck-ert-def-checker-test (emacs-lisp emacs-lisp-checkdoc) emacs-lisp +;; without-file-name +;; ;; Regression test for checkdoc in buffers without file names. See +;; ;; https://github.com/flycheck/flycheck/issues/73 and +;; ;; https://github.com/bbatsov/prelude/issues/259 +;; (flycheck-ert-with-resource-buffer "language/emacs-lisp/warnings.el" +;; (set-visited-file-name nil 'no-query) +;; (emacs-lisp-mode) +;; (should-not (buffer-file-name)) +;; (flycheck-ert-buffer-sync) +;; ;; TODO: Consider whether checkdoc is really useful in buffers without file +;; ;; names… +;; (should flycheck-current-errors))) + +;; (flycheck-ert-def-checker-test (emacs-lisp emacs-lisp-checkdoc) emacs-lisp +;; does-not-check-autoloads-buffers +;; ;; Regression test ensuring that Emacs Lisp won't check autoload buffers. +;; ;; These buffers are temporary buffers created during package installation to +;; ;; collect the autoloads of newly installed packages before writing the +;; ;; autoloads file. See `https://github.com/flycheck/flycheck/issues/45' and +;; ;; `https://github.com/bbatsov/prelude/issues/253' for details. +;; (flycheck-ert-with-file-buffer (locate-library "shut-up-autoloads") +;; (should-not (flycheck-may-use-checker 'emacs-lisp)) +;; (should-not (flycheck-may-use-checker 'emacs-lisp-checkdoc)))) + +;; (flycheck-ert-def-checker-test (emacs-lisp emacs-lisp-checkdoc) emacs-lisp +;; checkdoc-does-not-check-cask-files +;; (flycheck-ert-with-file-buffer +;; (expand-file-name "Cask" flycheck-test-source-directory) +;; (should-not (flycheck-may-use-checker 'emacs-lisp-checkdoc)))) + +;; (flycheck-ert-def-checker-test (emacs-lisp emacs-lisp-checkdoc) emacs-lisp +;; does-not-check-with-no-byte-compile +;; ;; We need to use a hook here, because `no-byte-compile' seems to be +;; ;; explicitly changed when loading Emacs Lisp files +;; (let ((disable-byte-comp (lambda () (setq-local no-byte-compile t)))) +;; (add-hook 'emacs-lisp-mode-hook disable-byte-comp) +;; (unwind-protect +;; (flycheck-ert-should-syntax-check +;; "language/emacs-lisp/warnings.el" 'emacs-lisp-mode +;; '(12 nil warning "First sentence should end with punctuation" +;; :checker emacs-lisp-checkdoc)) +;; (remove-hook 'emacs-lisp-mode-hook disable-byte-comp)))) + +;; (flycheck-ert-def-checker-test emacs-lisp emacs-lisp check-declare-warnings +;; (let ((flycheck-emacs-lisp-check-declare t)) +;; (flycheck-ert-should-syntax-check +;; "language/emacs-lisp/check-declare-warnings.el" 'emacs-lisp-mode +;; (if (version< emacs-version "25") +;; '(0 nil warning "`this-function-is-not-declared' was defined in this-file-does-not-exist.el: file not found" +;; :checker emacs-lisp) +;; '(9 1 warning "`this-function-is-not-declared' was defined in this-file-does-not-exist.el: file not found" +;; :checker emacs-lisp))))) + +;; (flycheck-ert-def-checker-test emacs-lisp emacs-lisp disable-check-declare +;; (let ((flycheck-emacs-lisp-check-declare nil)) +;; (flycheck-ert-should-syntax-check +;; "language/emacs-lisp/check-declare-warnings.el" 'emacs-lisp-mode))) + +;; (flycheck-ert-def-checker-test erlang erlang error +;; (flycheck-ert-should-syntax-check +;; "language/erlang/erlang/error.erl" 'erlang-mode +;; '(7 nil error "head mismatch" :checker erlang))) -(flycheck-ert-def-checker-test haskell-stack-ghc haskell type-error - (skip-unless (file-exists-p (getenv "HOME"))) - (let ((flycheck-disabled-checkers '(haskell-ghc))) - (flycheck-ert-should-syntax-check - "language/haskell/Error.hs" 'haskell-mode - '(4 16 error "* Couldn't match type `Bool' with `[Char]' - Expected type: String - Actual type: Bool -* In the first argument of `putStrLn', namely `True' - In the expression: putStrLn True - In an equation for `foo': foo = putStrLn True" :checker haskell-stack-ghc)))) - -(flycheck-ert-def-checker-test (haskell-stack-ghc haskell-hlint) haskell literate - (skip-unless (file-exists-p (getenv "HOME"))) - (let ((flycheck-disabled-checkers '(haskell-ghc))) - (flycheck-ert-should-syntax-check - "language/haskell/Literate.lhs" 'literate-haskell-mode - '(6 1 warning "Top-level binding with no type signature: foo :: a" - :id "-Wmissing-signatures" - :checker haskell-stack-ghc)))) - -(flycheck-ert-def-checker-test (haskell-stack-ghc haskell-hlint) haskell - complete-chain - (skip-unless (file-exists-p (getenv "HOME"))) - (let ((flycheck-disabled-checkers '(haskell-ghc))) - (flycheck-ert-should-syntax-check - "language/haskell/Warnings.hs" 'haskell-mode - '(4 1 warning "Eta reduce -Found: - spam eggs = map lines eggs -Why not: - spam = map lines" :checker haskell-hlint) - '(4 1 warning "Top-level binding with no type signature: - spam :: [String] -> [[String]]" - :id "-Wmissing-signatures" - :checker haskell-stack-ghc) - '(7 8 info "Redundant bracket -Found: - (putStrLn \"hello world\") -Why not: - putStrLn \"hello world\"" :checker haskell-hlint)))) - -(flycheck-ert-def-checker-test haskell-ghc haskell syntax-error - (let ((flycheck-disabled-checkers '(haskell-stack-ghc))) - (flycheck-ert-should-syntax-check - "language/haskell/SyntaxError.hs" 'haskell-mode - '(3 1 error "parse error on input `module'" :checker haskell-ghc)))) +;; (flycheck-ert-def-checker-test erlang erlang warning +;; (flycheck-ert-should-syntax-check +;; "language/erlang/erlang/warning.erl" 'erlang-mode +;; '(6 nil warning "wrong number of arguments in format call" :checker erlang))) -(flycheck-ert-def-checker-test haskell-ghc haskell type-error - (let ((flycheck-disabled-checkers '(haskell-stack-ghc))) - (flycheck-ert-should-syntax-check - "language/haskell/Error.hs" 'haskell-mode - '(4 16 error "* Couldn't match type `Bool' with `[Char]' - Expected type: String - Actual type: Bool -* In the first argument of `putStrLn', namely `True' - In the expression: putStrLn True - In an equation for `foo': foo = putStrLn True" :checker haskell-ghc)))) - -(flycheck-ert-def-checker-test (haskell-ghc haskell-hlint) haskell literate - (let ((flycheck-disabled-checkers '(haskell-stack-ghc))) - (flycheck-ert-should-syntax-check - "language/haskell/Literate.lhs" 'literate-haskell-mode - '(6 1 warning "Top-level binding with no type signature: foo :: forall a. a" - :id "-Wmissing-signatures" - :checker haskell-ghc)))) - -(flycheck-ert-def-checker-test (haskell-ghc haskell-hlint) haskell - complete-chain - (let ((flycheck-disabled-checkers '(haskell-stack-ghc))) - (flycheck-ert-should-syntax-check - "language/haskell/Warnings.hs" 'haskell-mode - '(4 1 warning "Eta reduce -Found: - spam eggs = map lines eggs -Why not: - spam = map lines" :checker haskell-hlint) - '(4 1 warning "Top-level binding with no type signature: - spam :: [String] -> [[String]]" - :id "-Wmissing-signatures" - :checker haskell-ghc) - '(7 8 info "Redundant bracket -Found: - (putStrLn \"hello world\") -Why not: - putStrLn \"hello world\"" :checker haskell-hlint)))) - -(flycheck-ert-def-checker-test html-tidy html nil - (flycheck-ert-should-syntax-check - "language/html.html" '(html-mode) - '(3 1 warning "missing <!DOCTYPE> declaration" - :checker html-tidy) - '(8 5 error "<spam> is not recognized!" - :checker html-tidy) - '(8 5 warning "discarding unexpected <spam>" - :checker html-tidy))) - - -(defconst flycheck-test-javascript-modes '(js-mode - js2-mode - js3-mode - js2-jsx-mode - rjsx-mode)) - -(when (version<= "25" emacs-version) - (add-to-list 'flycheck-test-javascript-modes 'js-jsx-mode)) - -(flycheck-ert-def-checker-test javascript-jshint javascript syntax-error - :tags '(checkstyle-xml) - ;; Silence JS2 and JS3 parsers - (let ((js2-mode-show-parse-errors nil) - (js2-mode-show-strict-warnings nil) - (js3-mode-show-parse-errors nil) - (flycheck-disabled-checkers - '(javascript-jscs javascript-eslint javascript-gjslint))) - (flycheck-ert-should-syntax-check - "language/javascript/syntax-error.js" '(js-mode js2-mode js3-mode rjsx-mode) - '(3 4 error "Unmatched '('." :checker javascript-jshint :id "E019") - '(3 25 error "Expected an identifier and instead saw ')'." - :checker javascript-jshint :id "E030") - '(4 1 error "Unrecoverable syntax error. (100% scanned)." - :checker javascript-jshint :id "E041")))) - -(flycheck-ert-def-checker-test javascript-jshint javascript nil - :tags '(checkstyle-xml) - (let ((flycheck-jshintrc "jshintrc") - (flycheck-disabled-checkers - '(javascript-jscs javascript-eslint javascript-gjslint))) - (flycheck-ert-should-syntax-check - "language/javascript/warnings.js" '(js-mode js2-mode js3-mode rjsx-mode) - '(4 9 warning "'foo' is defined but never used." :id "W098" - :checker javascript-jshint)))) +;; (flycheck-ert-def-checker-test erlang-rebar3 erlang error +;; (flycheck-ert-should-syntax-check +;; "language/erlang/rebar3/src/erlang-error.erl" 'erlang-mode +;; '(7 nil error "head mismatch" :checker erlang-rebar3))) -(flycheck-ert-def-checker-test javascript-eslint javascript error - :tags '(checkstyle-xml) - (let ((flycheck-disabled-checkers '(javascript-jshint))) - (flycheck-ert-should-syntax-check - "language/javascript/syntax-error.js" flycheck-test-javascript-modes - '(3 25 error "Parsing error: Unexpected token )" :checker javascript-eslint)))) +;; (flycheck-ert-def-checker-test erlang-rebar3 erlang warning +;; (flycheck-ert-should-syntax-check +;; "language/erlang/rebar3/src/erlang-warning.erl" 'erlang-mode +;; '(6 nil warning "wrong number of arguments in format call" :checker erlang-rebar3))) -(flycheck-ert-def-checker-test javascript-eslint javascript warning - :tags '(checkstyle-xml) - (let ((flycheck-disabled-checkers '(javascript-jshint javascript-jscs))) - (flycheck-ert-should-syntax-check - "language/javascript/warnings.js" flycheck-test-javascript-modes - '(3 2 warning "Use the function form of 'use strict'." :id "strict" - :checker javascript-eslint) - '(4 9 warning "'foo' is assigned a value but never used." - :id "no-unused-vars" :checker javascript-eslint)))) - -(flycheck-ert-def-checker-test javascript-jscs javascript nil - :tags '(checkstyle-xml) - (let ((flycheck-jscsrc "jscsrc") - (flycheck-disabled-checkers - '(javascript-jshint javascript-eslint))) - (flycheck-ert-should-syntax-check - "language/javascript/style.js" flycheck-test-javascript-modes - '(4 1 error "validateIndentation: Invalid indentation character:" - :checker javascript-jscs) - '(4 1 error "validateIndentation: Expected indentation of 0 characters" - :checker javascript-jscs)))) - -(flycheck-ert-def-checker-test javascript-jscs javascript no-config - :tags '(checkstyle-xml) - (let ((flycheck-disabled-checkers - '(javascript-jshint javascript-eslint))) - (flycheck-ert-should-syntax-check - "language/javascript/style.js" flycheck-test-javascript-modes - '(1 nil warning "No JSCS configuration found. Set `flycheck-jscsrc' for JSCS" - :checker javascript-jscs)))) - -(flycheck-ert-def-checker-test (javascript-jshint javascript-jscs) - javascript complete-chain - :tags '(checkstyle-xml) - (let ((flycheck-jshintrc "jshintrc") - (flycheck-jscsrc "jscsrc") - (flycheck-disabled-checkers '(javascript-eslint javascript-gjslint))) - (flycheck-ert-should-syntax-check - "language/javascript/warnings.js" '(js-mode js2-mode js3-mode rjsx-mode) - '(4 1 error "validateIndentation: Expected indentation of 0 characters" - :checker javascript-jscs) - '(4 9 warning "'foo' is defined but never used." :id "W098" - :checker javascript-jshint)))) - -(flycheck-ert-def-checker-test (javascript-eslint javascript-jscs) - javascript complete-chain - :tags '(checkstyle-xml) - (let ((flycheck-jscsrc "jscsrc") - (flycheck-disabled-checkers '(javascript-jshint))) - (flycheck-ert-should-syntax-check - "language/javascript/warnings.js" flycheck-test-javascript-modes - '(3 2 warning "Use the function form of 'use strict'." :id "strict" - :checker javascript-eslint) - '(4 1 error "validateIndentation: Expected indentation of 0 characters" - :checker javascript-jscs) - '(4 9 warning "'foo' is assigned a value but never used." :id "no-unused-vars" - :checker javascript-eslint)))) - -(flycheck-ert-def-checker-test javascript-standard javascript error - (let ((flycheck-checker 'javascript-standard)) - (flycheck-ert-should-syntax-check - "language/javascript/style.js" flycheck-test-javascript-modes - '(3 10 error "Missing space before function parentheses." - :checker javascript-standard) - '(4 2 error "Unexpected tab character." - :checker javascript-standard) - '(4 2 error "Expected indentation of 2 spaces but found 1 tab." - :checker javascript-standard) - '(4 6 error "'foo' is assigned a value but never used." - :checker javascript-standard) - '(4 13 error "Strings must use singlequote." - :checker javascript-standard) - '(4 27 error "Extra semicolon." - :checker javascript-standard) - '(5 5 error "Extra semicolon." - :checker javascript-standard)))) - -(flycheck-ert-def-checker-test javascript-standard javascript semistandard - (let ((flycheck-checker 'javascript-standard) - (flycheck-javascript-standard-executable "semistandard")) - (flycheck-ert-should-syntax-check - "language/javascript/style.js" flycheck-test-javascript-modes - '(3 10 error "Missing space before function parentheses." - :checker javascript-standard) - '(4 2 error "Unexpected tab character." - :checker javascript-standard) - '(4 2 error "Expected indentation of 2 spaces but found 1 tab." - :checker javascript-standard) - '(4 6 error "'foo' is assigned a value but never used." - :checker javascript-standard) - '(4 13 error "Strings must use singlequote." - :checker javascript-standard)))) - -(flycheck-ert-def-checker-test json-jsonlint json nil - (flycheck-ert-should-syntax-check - "language/json.json" 'json-mode - '(1 44 error "found: ',' - expected: 'EOF'." :checker json-jsonlint))) - -(flycheck-ert-def-checker-test json-python-json json nil - (let ((flycheck-disabled-checkers '(json-jsonlint))) - (flycheck-ert-should-syntax-check - "language/json.json" 'json-mode - '(1 44 error "Extra data" :checker json-python-json)))) +;; (flycheck-ert-def-checker-test erlang-rebar3 erlang build +;; (flycheck-ert-should-syntax-check +;; "language/erlang/rebar3/_checkouts/dependency/src/dependency.erl" 'erlang-mode) +;; ;; Ensure that the dependency file wasn't built as standalone +;; ;; project which would create a separate _build directory +;; (should (not (file-exists-p +;; (flycheck-ert-resource-filename +;; "language/erlang/rebar3/_build/default/lib/dependency/_build"))))) + +;; (flycheck-ert-def-checker-test eruby-erubis eruby nil +;; (flycheck-ert-should-syntax-check +;; "language/eruby.erb" '(html-erb-mode rhtml-mode) +;; '(5 nil error "syntax error, unexpected keyword_end" :checker eruby-erubis))) -(flycheck-ert-def-checker-test less less file-error - (let* ((candidates (list "no-such-file.less" - "no-such-file.less")) - (message (string-join candidates ","))) - (flycheck-ert-should-syntax-check - "language/less/file-error.less" 'less-css-mode - `(3 1 error ,(concat "'no-such-file.less' wasn't found. Tried - " - message) - :checker less)))) - -(flycheck-ert-def-checker-test less less syntax-error - (flycheck-ert-should-syntax-check - "language/less/syntax-error.less" 'less-css-mode - '(1 1 error "Unrecognised input" :checker less))) - -(flycheck-ert-def-checker-test llvm-llc llvm nil - (flycheck-ert-should-syntax-check - "language/llvm.ll" 'llvm-mode - '(4 19 error "'%tmp' defined with type 'i32'" :checker llvm-llc))) - -(flycheck-ert-def-checker-test lua-luacheck lua syntax-error - (flycheck-ert-should-syntax-check - "language/lua/syntax-error.lua" 'lua-mode - '(5 7 error "unfinished string" :id "E011" :checker lua-luacheck))) - -(flycheck-ert-def-checker-test lua-luacheck lua warnings - (flycheck-ert-should-syntax-check - "language/lua/warnings.lua" 'lua-mode - '(1 1 warning "setting non-standard global variable 'global_var'" - :id "W111" :checker lua-luacheck) - '(3 16 warning "unused function 'test'" - :id "W211" :checker lua-luacheck) - '(3 21 warning "unused argument 'arg'" - :id "W212" :checker lua-luacheck) - '(4 11 warning "variable 'var2' is never set" - :id "W221" :checker lua-luacheck))) - -(flycheck-ert-def-checker-test lua-luacheck lua custom-luacheckrc - (let ((flycheck-luacheckrc "custom.luacheckrc")) - (flycheck-ert-should-syntax-check - "language/lua/warnings.lua" 'lua-mode - '(1 1 warning "setting non-standard global variable 'global_var'" - :id "W111" :checker lua-luacheck) - '(3 16 warning "unused function 'test'" - :id "W211" :checker lua-luacheck) - '(4 11 warning "variable 'var2' is never set" - :id "W221" :checker lua-luacheck)))) - -(flycheck-ert-def-checker-test lua-luacheck lua custom-standards - (let ((flycheck-luacheck-standards '("ngx_lua"))) - (flycheck-ert-should-syntax-check - "language/lua/ngx_lua.warnings.lua" 'lua-mode - '(3 16 warning "unused function 'test'" - :id "W211" :checker lua-luacheck) - '(3 21 warning "unused argument 'arg'" - :id "W212" :checker lua-luacheck) - '(4 11 warning "variable 'var2' is never set" - :id "W221" :checker lua-luacheck)))) - -(flycheck-ert-def-checker-test lua lua nil - (let ((flycheck-disabled-checkers '(lua-luacheck))) - (flycheck-ert-should-syntax-check - "language/lua/syntax-error.lua" 'lua-mode - '(5 nil error "unfinished string near '\"oh no'" - :checker lua)))) - -(flycheck-ert-def-checker-test (perl perl-perlcritic) perl nil - (flycheck-ert-should-syntax-check - "language/perl.pl" '(perl-mode cperl-mode) - '(6 nil error "Global symbol \"$x\" requires explicit package name (did you forget to declare \"my $x\"?)" - :checker perl) - '(6 nil error "BEGIN not safe after errors--compilation aborted" - :checker perl) - '(6 6 error "Glob written as <...> (See page 167 of PBP)" - :id "BuiltinFunctions::RequireGlobFunction" :checker perl-perlcritic))) - -(flycheck-ert-def-checker-test php php syntax-error - (flycheck-ert-should-syntax-check - "language/php/syntax-error.php" 'php-mode - '(8 nil error "Assignments can only happen to writable values" :checker php))) - -(flycheck-ert-def-checker-test (php php-phpcs php-phpmd) php nil - :tags '(phpmd-xml checkstyle-xml) - (flycheck-ert-should-syntax-check - "language/php/warnings.php" 'php-mode - '(1 1 error "Missing file doc comment" - :id "PEAR.Commenting.FileComment.Missing" :checker php-phpcs) - '(21 nil warning "Avoid unused private fields such as '$FOO'." - :id "UnusedPrivateField" :checker php-phpmd) - '(21 20 error "Private member variable \"FOO\" must be prefixed with an underscore" - :id "PEAR.NamingConventions.ValidVariableName.PrivateNoUnderscore" - :checker php-phpcs) - '(23 5 error "The open comment tag must be the only content on the line" - :id "Generic.Commenting.DocComment.ContentAfterOpen" - :checker php-phpcs) - '(23 5 error "Doc comment for parameter \"$baz\" missing" - :id "PEAR.Commenting.FunctionComment.MissingParamTag" - :checker php-phpcs) - '(23 9 error "Doc comment short description must be on the first line" - :id "Generic.Commenting.DocComment.SpacingBeforeShort" - :checker php-phpcs) - '(23 29 error "The close comment tag must be the only content on the line" - :id "Generic.Commenting.DocComment.ContentBeforeClose" - :checker php-phpcs) - '(23 29 error "Missing @return tag in function comment" - :id "PEAR.Commenting.FunctionComment.MissingReturn" - :checker php-phpcs) - '(24 nil warning "Avoid unused private methods such as 'bar'." - :id "UnusedPrivateMethod" :checker php-phpmd) - '(24 nil warning "Avoid unused parameters such as '$baz'." - :id "UnusedFormalParameter" :checker php-phpmd) - '(24 13 error "Private method name \"A::bar\" must be prefixed with an underscore" - :id "PEAR.NamingConventions.ValidFunctionName.PrivateNoUnderscore" - :checker php-phpcs) - '(26 nil warning "Avoid variables with short names like $i. Configured minimum length is 3." - :id "ShortVariable" :checker php-phpmd) - '(26 nil warning "Avoid unused local variables such as '$i'." - :id "UnusedLocalVariable" :checker php-phpmd) - '(26 12 error "TRUE, FALSE and NULL must be lowercase; expected \"false\" but found \"FALSE\"" - :id "Generic.PHP.LowerCaseConstant.Found" :checker php-phpcs))) - -(flycheck-ert-def-checker-test proselint (text markdown) nil - ;; Unset LC_ALL which is set to LC_ALL=C for other checkers in ./run.el, - ;; because Click, used by ProseLint, when running with python 3 will refuse to - ;; work unless an Unicode locale is exported. See: - ;; http://click.pocoo.org/5/python3/#python-3-surrogate-handling - (flycheck-ert-with-env '(("LC_ALL" . nil)) - (flycheck-ert-should-syntax-check - "language/text.txt" 'text-mode - '(1 7 warning "Substitute 'damn' every time you're inclined to write 'very;' your editor will delete it and the writing will be just as it should be." - :id "weasel_words.very" - :checker proselint) - '(2 4 warning "Redundancy. Use 'associate' instead of 'associate together'." - :id "redundancy.garner" - :checker proselint) - '(3 5 warning "Gender bias. Use 'lawyer' instead of 'lady lawyer'." - :id "sexism.misc" - :checker proselint)))) - -(flycheck-ert-def-checker-test processing processing syntax-error - (flycheck-ert-should-syntax-check - "language/processing/syntax_error/syntax_error.pde" 'processing-mode - '(4 2 error "Syntax error, maybe a missing semicolon?" - :checker processing))) - -(flycheck-ert-def-checker-test protobuf-protoc protobuf syntax-error - (flycheck-ert-should-syntax-check - "language/protobuf.proto" 'protobuf-mode - '(2 23 error "Missing field number." - :checker protobuf-protoc))) - -(flycheck-ert-def-checker-test pug pug syntax-error - (flycheck-ert-should-syntax-check - "language/pug/pug.pug" 'pug-mode - '(2 1 error "unexpected token \"indent\"" :checker pug))) - -(flycheck-ert-def-checker-test pug pug include-extends-error - (flycheck-ert-should-syntax-check - "language/pug/pug-extends.pug" 'pug-mode - '(1 nil error "the \"basedir\" option is required to use includes and extends with \"absolute\" paths" - :checker pug))) - -(flycheck-ert-def-checker-test pug pug type-error - (flycheck-ert-should-syntax-check - "language/pug/pug-runtime-error.pug" 'pug-mode - '(5 nil error "Cannot read property 'bar' of undefined" :checker pug))) - -;; N.B. the puppet 4 and 3 tests are mutually exclusive -;; due to one having column and the other not -(flycheck-ert-def-checker-test puppet-parser puppet parser-error-puppet-4 - (skip-unless (version<= "4" (shell-command-to-string - "printf %s \"$(puppet --version)\""))) - (flycheck-ert-should-syntax-check - "language/puppet/parser-error.pp" 'puppet-mode - '(3 9 error "Syntax error at '>'" :checker puppet-parser))) - -(flycheck-ert-def-checker-test puppet-parser puppet parser-error-puppet-3 - (skip-unless (version<= (shell-command-to-string - "printf %s \"$(puppet --version)\"") "4")) - (flycheck-ert-should-syntax-check - "language/puppet/puppet3-parser-error.pp" 'puppet-mode - '(4 nil error "Syntax error at 'helloagain'; expected '}'" - :checker puppet-parser)) - (flycheck-ert-should-syntax-check - "language/puppet/puppet3-parser-multiline-error.pp" 'puppet-mode - '(4 nil error "Unclosed quote after '' in '\n}\n'" - :checker puppet-parser))) - -(flycheck-ert-def-checker-test puppet-lint puppet nil - (flycheck-ert-should-syntax-check - "language/puppet/warnings.pp" 'puppet-mode - '(2 nil error "foo::bar not in autoload module layout (autoloader_layout)" - :checker puppet-lint) - '(3 nil warning "case statement without a default case (case_without_default)" - :checker puppet-lint))) - -(flycheck-ert-def-checker-test python-flake8 python syntax-error - (let ((python-indent-guess-indent-offset nil)) ; Silence Python Mode! - (flycheck-ert-should-syntax-check - "language/python/syntax-error.py" 'python-mode - '(3 12 error "SyntaxError: invalid syntax" :id "E999" - :checker python-flake8)))) - -(flycheck-ert-def-checker-test python-flake8 python nil - (flycheck-ert-should-syntax-check - "language/python/test.py" 'python-mode - '(5 1 warning "'.antigravit' imported but unused" :id "F401" - :checker python-flake8) - '(7 1 warning "expected 2 blank lines, found 1" :id "E302" - :checker python-flake8) - '(12 29 warning "unexpected spaces around keyword / parameter equals" - :id "E251" :checker python-flake8) - '(12 31 warning "unexpected spaces around keyword / parameter equals" - :id "E251" :checker python-flake8) - '(21 1 warning "expected 2 blank lines after class or function definition, found 1" - :id "E305" :checker python-flake8) - '(22 1 error "undefined name 'antigravity'" :id "F821" - :checker python-flake8))) - -(flycheck-ert-def-checker-test python-pylint python syntax-error - (let ((flycheck-disabled-checkers '(python-flake8)) - (python-indent-guess-indent-offset nil)) ; Silence Python Mode - (flycheck-ert-should-syntax-check - "language/python/syntax-error.py" 'python-mode - '(3 1 error "invalid syntax (<string>, line 3)" - :id "syntax-error" :checker python-pylint)))) +;; (flycheck-ert-def-checker-test fortran-gfortran fortran error +;; (flycheck-ert-should-syntax-check +;; "language/fortran/error.f" '(fortran-mode f90-mode) +;; '(1 1 error "Non-numeric character in statement label at (1)" +;; :checker fortran-gfortran) +;; '(1 1 error "Unclassifiable statement at (1)" :checker fortran-gfortran) +;; '(2 1 error "Non-numeric character in statement label at (1)" +;; :checker fortran-gfortran) +;; '(2 1 error "Unclassifiable statement at (1)" :checker fortran-gfortran) +;; '(3 1 error "Non-numeric character in statement label at (1)" +;; :checker fortran-gfortran) +;; '(3 1 error "Unclassifiable statement at (1)" :checker fortran-gfortran))) + +;; (flycheck-ert-def-checker-test fortran-gfortran fortran free-form-error +;; (let ((flycheck-gfortran-layout 'free)) +;; (flycheck-ert-should-syntax-check +;; "language/fortran/error.f" '(fortran-mode f90-mode) +;; '(3 3 error "Expecting END PROGRAM statement at (1)" +;; :checker fortran-gfortran)))) + +;; (flycheck-ert-def-checker-test fortran-gfortran fortran warning +;; (flycheck-ert-should-syntax-check +;; "language/fortran/warning.f90" '(fortran-mode f90-mode) +;; '(1 20 warning "Unused dummy argument 'p' at (1)" +;; :checker fortran-gfortran) +;; '(18 9 warning "Same actual argument associated with INTENT(IN) argument 'a' and INTENT(OUT) argument 'b' at (1)" +;; :checker fortran-gfortran))) -(flycheck-ert-def-checker-test python-pylint python nil - (let ((flycheck-disabled-checkers '(python-flake8))) - (flycheck-ert-should-syntax-check - "language/python/test.py" 'python-mode - '(1 1 info "Missing module docstring" :id "missing-docstring" :checker python-pylint) - '(4 1 error "Unable to import 'spam'" :id "import-error" :checker python-pylint) - '(5 1 error "No name 'antigravit' in module 'python'" :id "no-name-in-module" - :checker python-pylint) - '(5 1 warning "Unused import antigravit" :id "unused-import" - :checker python-pylint) - '(7 1 info "Missing class docstring" :id "missing-docstring" :checker python-pylint) - '(9 5 info "Invalid method name \"withEggs\"" :id "invalid-name" - :checker python-pylint) - '(9 5 info "Missing method docstring" :id "missing-docstring" :checker python-pylint) - '(9 5 warning "Method could be a function" :id "no-self-use" - :checker python-pylint) - '(12 1 info "No space allowed around keyword argument assignment" - :id "bad-whitespace" :checker python-pylint) - '(12 5 info "Missing method docstring" :id "missing-docstring" :checker python-pylint) - '(12 5 warning "Method could be a function" :id "no-self-use" - :checker python-pylint) - '(14 16 error "Module 'sys' has no 'python_version' member" :id "no-member" - :checker python-pylint) - '(22 1 error "Undefined variable 'antigravity'" :id "undefined-variable" - :checker python-pylint)))) - -(flycheck-ert-def-checker-test python-pylint python no-symbolic-id - (let ((flycheck-disabled-checkers '(python-flake8)) - (flycheck-pylint-use-symbolic-id nil)) - (flycheck-ert-should-syntax-check - "language/python/test.py" 'python-mode - '(1 1 info "Missing module docstring" :id "C0111" :checker python-pylint) - '(4 1 error "Unable to import 'spam'" :id "E0401" :checker python-pylint) - '(5 1 error "No name 'antigravit' in module 'python'" :id "E0611" - :checker python-pylint) - '(5 1 warning "Unused import antigravit" :id "W0611" - :checker python-pylint) - '(7 1 info "Missing class docstring" :id "C0111" :checker python-pylint) - '(9 5 info "Invalid method name \"withEggs\"" :id "C0103" - :checker python-pylint) - '(9 5 info "Missing method docstring" :id "C0111" :checker python-pylint) - '(9 5 warning "Method could be a function" :id "R0201" - :checker python-pylint) - '(12 1 info "No space allowed around keyword argument assignment" - :id "C0326" :checker python-pylint) - '(12 5 info "Missing method docstring" :id "C0111" :checker python-pylint) - '(12 5 warning "Method could be a function" :id "R0201" - :checker python-pylint) - '(14 16 error "Module 'sys' has no 'python_version' member" :id "E1101" - :checker python-pylint) - '(22 1 error "Undefined variable 'antigravity'" :id "E0602" - :checker python-pylint)))) - -(flycheck-ert-def-checker-test python-pycompile python python27 - (skip-unless (executable-find "python2")) - (let ((flycheck-disabled-checkers '(python-flake8 python-pylint)) - (flycheck-python-pycompile-executable "python2") - (python-indent-guess-indent-offset nil)) - (flycheck-ert-should-syntax-check - "language/python/syntax-error.py" 'python-mode - `(3 nil error "invalid syntax" :checker python-pycompile)))) +;; (flycheck-ert-def-checker-test go-gofmt go syntax-error +;; (flycheck-ert-should-syntax-check +;; "language/go/src/syntax/syntax-error.go" 'go-mode +;; '(5 9 error "expected '(', found 'IDENT' ta" :checker go-gofmt) +;; '(6 1 error "expected ')', found '}'" :checker go-gofmt))) + +;; (flycheck-ert-def-checker-test (go-build go-golint go-vet) go complete-chain +;; (skip-unless (funcall (flycheck-checker-get 'go-vet 'predicate))) +;; (flycheck-ert-with-env +;; `(("GOPATH" . ,(flycheck-ert-resource-filename "language/go"))) +;; (flycheck-ert-should-syntax-check +;; "language/go/src/warnings.go" 'go-mode +;; '(4 nil error "imported and not used: \"fmt\"" :checker go-build) +;; '(4 2 warning "should not use dot imports" :checker go-golint) +;; '(7 1 warning "exported function Warn should have comment or be unexported" +;; :checker go-golint) +;; '(8 nil error "undefined: fmt in fmt.Printf" :checker go-build) +;; '(11 1 warning "exported function Warnf should have comment or be unexported" +;; :checker go-golint) +;; '(12 nil error "undefined: fmt in fmt.Printf" :checker go-build) +;; '(17 nil error "undefined: fmt in fmt.Printf" :checker go-build) +;; '(17 nil warning "arg 1 for printf verb %s of wrong type: untyped int" +;; :checker go-vet) +;; '(19 nil error "cannot use 1 (type int) as type string in argument to Warnf" +;; :checker go-build) +;; '(23 nil warning "unreachable code" :checker go-vet) +;; '(25 9 warning "if block ends with a return statement, so drop this else and outdent its block" +;; :checker go-golint)))) + +;; (flycheck-ert-def-checker-test go-build go handles-packages +;; (flycheck-ert-with-env +;; `(("GOPATH" . ,(flycheck-ert-resource-filename "language/go"))) +;; (flycheck-ert-should-syntax-check "language/go/src/b1/main.go" 'go-mode))) + +;; (flycheck-ert-def-checker-test go-build go missing-package +;; (let* ((go-root (or (getenv "GOROOT") "/usr/local/go")) +;; (go-root-pkg (concat go-root "/src"))) +;; (flycheck-ert-with-env '(("GOPATH" . nil)) +;; (flycheck-ert-should-syntax-check +;; "language/go/src/b1/main.go" 'go-mode +;; `(4 2 error ,(format "cannot find package \"b2\" in any of:\n\t%s/b2 (from $GOROOT)\n\t($GOPATH not set)" +;; go-root-pkg) +;; :checker go-build))))) + +;; (flycheck-ert-def-checker-test go-build go directory-with-two-packages +;; (let ((flycheck-disabled-checkers '(go-errcheck go-unconvert go-megacheck))) +;; (flycheck-ert-with-env +;; `(("GOPATH" . ,(flycheck-ert-resource-filename "checkers/go"))) +;; (flycheck-ert-should-syntax-check +;; "checkers/go/src/multipkg/a.go" 'go-mode +;; `(1 nil info +;; ,(concat "can't load package: package multipkg: " +;; "found packages a (a.go) and b (b.go) in " +;; (flycheck-ert-resource-filename +;; "checkers/go/src/multipkg")) +;; :checker go-build))))) + +;; (flycheck-ert-def-checker-test go-test go nil +;; (flycheck-ert-with-env +;; `(("GOPATH" . ,(flycheck-ert-resource-filename "checkers/go"))) +;; (flycheck-ert-should-syntax-check +;; "language/go/src/test/test-error_test.go" 'go-mode +;; '(8 nil error "undefined: fmt in fmt.Println" :checker go-test)))) + +;; (flycheck-ert-def-checker-test go-errcheck go nil +;; (flycheck-ert-with-env +;; `(("GOPATH" . ,(flycheck-ert-resource-filename "language/go"))) +;; (flycheck-ert-should-syntax-check +;; "language/go/src/errcheck/errcheck.go" 'go-mode +;; '(7 9 warning "Ignored `error` returned from `f.Close()`" +;; :checker go-errcheck) +;; '(9 9 warning "Ignored `error` returned from `os.Stat(\"enoent\")`" +;; :checker go-errcheck)))) + +;; (flycheck-ert-def-checker-test go-unconvert go nil +;; :tags '(language-go external-tool) +;; (flycheck-ert-with-env +;; `(("GOPATH" . ,(flycheck-ert-resource-filename "language/go"))) +;; (flycheck-ert-should-syntax-check +;; "language/go/src/unconvert/unconvert.go" 'go-mode +;; '(7 17 warning "unnecessary conversion" +;; :checker go-unconvert)))) + +;; (flycheck-ert-def-checker-test go-megacheck go nil +;; :tags '(language-go external-tool) +;; (flycheck-ert-with-env +;; `(("GOPATH" . ,(flycheck-ert-resource-filename "language/go"))) +;; (flycheck-ert-should-syntax-check +;; "language/go/src/megacheck/megacheck1.go" 'go-mode +;; '(8 6 warning "should omit values from range; this loop is equivalent to `for range ...` (S1005)" +;; :checker go-megacheck) +;; '(12 21 warning "calling strings.Replace with n == 0 will return no results, did you mean -1? (SA1018)" +;; :checker go-megacheck) +;; '(16 6 warning "func unused is unused (U1000)" +;; :checker go-megacheck)))) + +;; (flycheck-ert-def-checker-test go-megacheck-disabled-checkers go nil +;; :tags '(language-go external-tool) +;; (flycheck-ert-with-env +;; `(("GOPATH" . ,(flycheck-ert-resource-filename "language/go"))) +;; ;; Run with simple and unused checkers disabled +;; (let ((flycheck-go-megacheck-disabled-checkers '("simple" "unused"))) +;; (flycheck-ert-should-syntax-check +;; "language/go/src/megacheck/megacheck1.go" 'go-mode +;; '(12 21 warning "calling strings.Replace with n == 0 will return no results, did you mean -1? (SA1018)" +;; :checker go-megacheck))))) + +;; (flycheck-ert-def-checker-test groovy groovy syntax-error +;; ;; Work around +;; ;; https://github.com/Groovy-Emacs-Modes/groovy-emacs-modes/issues/11 +;; (require 'cl) +;; (flycheck-ert-should-syntax-check +;; "language/groovy.groovy" 'groovy-mode +;; '(2 14 error "unexpected token: {" :checker groovy))) -(flycheck-ert-def-checker-test python-pycompile python has-no-warnings - (let ((flycheck-disabled-checkers '(python-flake8 python-pylint))) - (flycheck-ert-should-syntax-check - "language/python/test.py" 'python-mode))) +;; (flycheck-ert-def-checker-test haml haml nil +;; (flycheck-ert-should-syntax-check +;; "language/haml.haml" 'haml-mode +;; '(5 nil error "Inconsistent indentation: 3 spaces used for indentation, but the rest of the document was indented using 2 spaces." +;; :checker haml))) -(flycheck-ert-def-checker-test r-lintr r nil - ;; Disable caching in lintr tests to make sure that the file is re-checked - ;; every time - (skip-unless (flycheck-r-has-lintr (flycheck-checker-executable 'r-lintr))) - (let ((flycheck-lintr-caching nil)) - (flycheck-ert-should-syntax-check - "language/r.R" 'R-mode - '(1 28 info "Opening curly braces should never go on their own line and should always be followed by a new line." - :checker r-lintr) - '(1 56 info "Put spaces around all infix operators." :checker r-lintr) - '(4 6 warning "Do not use absolute paths." :checker r-lintr) - '(7 5 error "unexpected end of input" :checker r-lintr)))) - -(flycheck-ert-def-checker-test racket racket nil - (skip-unless (funcall (flycheck-checker-get 'racket 'predicate))) - (flycheck-ert-should-syntax-check - "language/racket.rkt" 'racket-mode - '(4 3 error "read: expected a `)' to close `('" :checker racket))) +;; (flycheck-ert-def-checker-test handlebars handlebars nil +;; (flycheck-ert-should-syntax-check +;; "language/handlebars.hbs" '(handlebars-mode web-mode) +;; '(2 nil error "Expecting 'ID', 'STRING', 'NUMBER', 'BOOLEAN', 'UNDEFINED', 'NULL', 'DATA', got 'INVALID'" +;; :checker handlebars))) + +;; (flycheck-ert-def-checker-test haskell-stack-ghc haskell syntax-error +;; (skip-unless (file-exists-p (getenv "HOME"))) +;; (let ((flycheck-disabled-checkers '(haskell-ghc))) +;; (flycheck-ert-should-syntax-check +;; "language/haskell/SyntaxError.hs" 'haskell-mode +;; '(3 1 error "parse error on input `module'" :checker haskell-stack-ghc)))) + +;; (flycheck-ert-def-checker-test haskell-stack-ghc haskell type-error +;; (skip-unless (file-exists-p (getenv "HOME"))) +;; (let ((flycheck-disabled-checkers '(haskell-ghc))) +;; (flycheck-ert-should-syntax-check +;; "language/haskell/Error.hs" 'haskell-mode +;; '(4 16 error "* Couldn't match type `Bool' with `[Char]' +;; Expected type: String +;; Actual type: Bool +;; * In the first argument of `putStrLn', namely `True' +;; In the expression: putStrLn True +;; In an equation for `foo': foo = putStrLn True" :checker haskell-stack-ghc)))) + +;; (flycheck-ert-def-checker-test (haskell-stack-ghc haskell-hlint) haskell literate +;; (skip-unless (file-exists-p (getenv "HOME"))) +;; (let ((flycheck-disabled-checkers '(haskell-ghc))) +;; (flycheck-ert-should-syntax-check +;; "language/haskell/Literate.lhs" 'literate-haskell-mode +;; '(6 1 warning "Top-level binding with no type signature: foo :: a" +;; :id "-Wmissing-signatures" +;; :checker haskell-stack-ghc)))) + +;; (flycheck-ert-def-checker-test (haskell-stack-ghc haskell-hlint) haskell +;; complete-chain +;; (skip-unless (file-exists-p (getenv "HOME"))) +;; (let ((flycheck-disabled-checkers '(haskell-ghc))) +;; (flycheck-ert-should-syntax-check +;; "language/haskell/Warnings.hs" 'haskell-mode +;; '(4 1 warning "Eta reduce +;; Found: +;; spam eggs = map lines eggs +;; Why not: +;; spam = map lines" :checker haskell-hlint) +;; '(4 1 warning "Top-level binding with no type signature: +;; spam :: [String] -> [[String]]" +;; :id "-Wmissing-signatures" +;; :checker haskell-stack-ghc) +;; '(7 8 info "Redundant bracket +;; Found: +;; (putStrLn \"hello world\") +;; Why not: +;; putStrLn \"hello world\"" :checker haskell-hlint)))) + +;; (flycheck-ert-def-checker-test haskell-ghc haskell syntax-error +;; (let ((flycheck-disabled-checkers '(haskell-stack-ghc))) +;; (flycheck-ert-should-syntax-check +;; "language/haskell/SyntaxError.hs" 'haskell-mode +;; '(3 1 error "parse error on input `module'" :checker haskell-ghc)))) + +;; (flycheck-ert-def-checker-test haskell-ghc haskell type-error +;; (let ((flycheck-disabled-checkers '(haskell-stack-ghc))) +;; (flycheck-ert-should-syntax-check +;; "language/haskell/Error.hs" 'haskell-mode +;; '(4 16 error "* Couldn't match type `Bool' with `[Char]' +;; Expected type: String +;; Actual type: Bool +;; * In the first argument of `putStrLn', namely `True' +;; In the expression: putStrLn True +;; In an equation for `foo': foo = putStrLn True" :checker haskell-ghc)))) + +;; (flycheck-ert-def-checker-test (haskell-ghc haskell-hlint) haskell literate +;; (let ((flycheck-disabled-checkers '(haskell-stack-ghc))) +;; (flycheck-ert-should-syntax-check +;; "language/haskell/Literate.lhs" 'literate-haskell-mode +;; '(6 1 warning "Top-level binding with no type signature: foo :: forall a. a" +;; :id "-Wmissing-signatures" +;; :checker haskell-ghc)))) + +;; (flycheck-ert-def-checker-test (haskell-ghc haskell-hlint) haskell +;; complete-chain +;; (let ((flycheck-disabled-checkers '(haskell-stack-ghc))) +;; (flycheck-ert-should-syntax-check +;; "language/haskell/Warnings.hs" 'haskell-mode +;; '(4 1 warning "Eta reduce +;; Found: +;; spam eggs = map lines eggs +;; Why not: +;; spam = map lines" :checker haskell-hlint) +;; '(4 1 warning "Top-level binding with no type signature: +;; spam :: [String] -> [[String]]" +;; :id "-Wmissing-signatures" +;; :checker haskell-ghc) +;; '(7 8 info "Redundant bracket +;; Found: +;; (putStrLn \"hello world\") +;; Why not: +;; putStrLn \"hello world\"" :checker haskell-hlint)))) + +;; (flycheck-ert-def-checker-test html-tidy html nil +;; (flycheck-ert-should-syntax-check +;; "language/html.html" '(html-mode) +;; '(3 1 warning "missing <!DOCTYPE> declaration" +;; :checker html-tidy) +;; '(8 5 error "<spam> is not recognized!" +;; :checker html-tidy) +;; '(8 5 warning "discarding unexpected <spam>" +;; :checker html-tidy))) + + +;; (defconst flycheck-test-javascript-modes '(js-mode +;; js2-mode +;; js3-mode +;; js2-jsx-mode +;; rjsx-mode)) + +;; (when (version<= "25" emacs-version) +;; (add-to-list 'flycheck-test-javascript-modes 'js-jsx-mode)) + +;; (flycheck-ert-def-checker-test javascript-jshint javascript syntax-error +;; :tags '(checkstyle-xml) +;; ;; Silence JS2 and JS3 parsers +;; (let ((js2-mode-show-parse-errors nil) +;; (js2-mode-show-strict-warnings nil) +;; (js3-mode-show-parse-errors nil) +;; (flycheck-disabled-checkers +;; '(javascript-jscs javascript-eslint javascript-gjslint))) +;; (flycheck-ert-should-syntax-check +;; "language/javascript/syntax-error.js" '(js-mode js2-mode js3-mode rjsx-mode) +;; '(3 4 error "Unmatched '('." :checker javascript-jshint :id "E019") +;; '(3 25 error "Expected an identifier and instead saw ')'." +;; :checker javascript-jshint :id "E030") +;; '(4 1 error "Unrecoverable syntax error. (100% scanned)." +;; :checker javascript-jshint :id "E041")))) + +;; (flycheck-ert-def-checker-test javascript-jshint javascript nil +;; :tags '(checkstyle-xml) +;; (let ((flycheck-jshintrc "jshintrc") +;; (flycheck-disabled-checkers +;; '(javascript-jscs javascript-eslint javascript-gjslint))) +;; (flycheck-ert-should-syntax-check +;; "language/javascript/warnings.js" '(js-mode js2-mode js3-mode rjsx-mode) +;; '(4 9 warning "'foo' is defined but never used." :id "W098" +;; :checker javascript-jshint)))) + +;; (flycheck-ert-def-checker-test javascript-eslint javascript error +;; :tags '(checkstyle-xml) +;; (let ((flycheck-disabled-checkers '(javascript-jshint))) +;; (flycheck-ert-should-syntax-check +;; "language/javascript/syntax-error.js" flycheck-test-javascript-modes +;; '(3 25 error "Parsing error: Unexpected token )" :checker javascript-eslint)))) + +;; (flycheck-ert-def-checker-test javascript-eslint javascript warning +;; :tags '(checkstyle-xml) +;; (let ((flycheck-disabled-checkers '(javascript-jshint javascript-jscs))) +;; (flycheck-ert-should-syntax-check +;; "language/javascript/warnings.js" flycheck-test-javascript-modes +;; '(3 2 warning "Use the function form of 'use strict'." :id "strict" +;; :checker javascript-eslint) +;; '(4 9 warning "'foo' is assigned a value but never used." +;; :id "no-unused-vars" :checker javascript-eslint)))) + +;; (flycheck-ert-def-checker-test javascript-jscs javascript nil +;; :tags '(checkstyle-xml) +;; (let ((flycheck-jscsrc "jscsrc") +;; (flycheck-disabled-checkers +;; '(javascript-jshint javascript-eslint))) +;; (flycheck-ert-should-syntax-check +;; "language/javascript/style.js" flycheck-test-javascript-modes +;; '(4 1 error "validateIndentation: Invalid indentation character:" +;; :checker javascript-jscs) +;; '(4 1 error "validateIndentation: Expected indentation of 0 characters" +;; :checker javascript-jscs)))) + +;; (flycheck-ert-def-checker-test javascript-jscs javascript no-config +;; :tags '(checkstyle-xml) +;; (let ((flycheck-disabled-checkers +;; '(javascript-jshint javascript-eslint))) +;; (flycheck-ert-should-syntax-check +;; "language/javascript/style.js" flycheck-test-javascript-modes +;; '(1 nil warning "No JSCS configuration found. Set `flycheck-jscsrc' for JSCS" +;; :checker javascript-jscs)))) + +;; (flycheck-ert-def-checker-test (javascript-jshint javascript-jscs) +;; javascript complete-chain +;; :tags '(checkstyle-xml) +;; (let ((flycheck-jshintrc "jshintrc") +;; (flycheck-jscsrc "jscsrc") +;; (flycheck-disabled-checkers '(javascript-eslint javascript-gjslint))) +;; (flycheck-ert-should-syntax-check +;; "language/javascript/warnings.js" '(js-mode js2-mode js3-mode rjsx-mode) +;; '(4 1 error "validateIndentation: Expected indentation of 0 characters" +;; :checker javascript-jscs) +;; '(4 9 warning "'foo' is defined but never used." :id "W098" +;; :checker javascript-jshint)))) + +;; (flycheck-ert-def-checker-test (javascript-eslint javascript-jscs) +;; javascript complete-chain +;; :tags '(checkstyle-xml) +;; (let ((flycheck-jscsrc "jscsrc") +;; (flycheck-disabled-checkers '(javascript-jshint))) +;; (flycheck-ert-should-syntax-check +;; "language/javascript/warnings.js" flycheck-test-javascript-modes +;; '(3 2 warning "Use the function form of 'use strict'." :id "strict" +;; :checker javascript-eslint) +;; '(4 1 error "validateIndentation: Expected indentation of 0 characters" +;; :checker javascript-jscs) +;; '(4 9 warning "'foo' is assigned a value but never used." :id "no-unused-vars" +;; :checker javascript-eslint)))) + +;; (flycheck-ert-def-checker-test javascript-standard javascript error +;; (let ((flycheck-checker 'javascript-standard)) +;; (flycheck-ert-should-syntax-check +;; "language/javascript/style.js" flycheck-test-javascript-modes +;; '(3 10 error "Missing space before function parentheses." +;; :checker javascript-standard) +;; '(4 2 error "Unexpected tab character." +;; :checker javascript-standard) +;; '(4 2 error "Expected indentation of 2 spaces but found 1 tab." +;; :checker javascript-standard) +;; '(4 6 error "'foo' is assigned a value but never used." +;; :checker javascript-standard) +;; '(4 13 error "Strings must use singlequote." +;; :checker javascript-standard) +;; '(4 27 error "Extra semicolon." +;; :checker javascript-standard) +;; '(5 5 error "Extra semicolon." +;; :checker javascript-standard)))) + +;; (flycheck-ert-def-checker-test javascript-standard javascript semistandard +;; (let ((flycheck-checker 'javascript-standard) +;; (flycheck-javascript-standard-executable "semistandard")) +;; (flycheck-ert-should-syntax-check +;; "language/javascript/style.js" flycheck-test-javascript-modes +;; '(3 10 error "Missing space before function parentheses." +;; :checker javascript-standard) +;; '(4 2 error "Unexpected tab character." +;; :checker javascript-standard) +;; '(4 2 error "Expected indentation of 2 spaces but found 1 tab." +;; :checker javascript-standard) +;; '(4 6 error "'foo' is assigned a value but never used." +;; :checker javascript-standard) +;; '(4 13 error "Strings must use singlequote." +;; :checker javascript-standard)))) + +;; (flycheck-ert-def-checker-test json-jsonlint json nil +;; (flycheck-ert-should-syntax-check +;; "language/json.json" 'json-mode +;; '(1 44 error "found: ',' - expected: 'EOF'." :checker json-jsonlint))) + +;; (flycheck-ert-def-checker-test json-python-json json nil +;; (let ((flycheck-disabled-checkers '(json-jsonlint))) +;; (flycheck-ert-should-syntax-check +;; "language/json.json" 'json-mode +;; '(1 44 error "Extra data" :checker json-python-json)))) + +;; (flycheck-ert-def-checker-test less less file-error +;; (let* ((candidates (list "no-such-file.less" +;; "no-such-file.less")) +;; (message (string-join candidates ","))) +;; (flycheck-ert-should-syntax-check +;; "language/less/file-error.less" 'less-css-mode +;; `(3 1 error ,(concat "'no-such-file.less' wasn't found. Tried - " +;; message) +;; :checker less)))) + +;; (flycheck-ert-def-checker-test less less syntax-error +;; (flycheck-ert-should-syntax-check +;; "language/less/syntax-error.less" 'less-css-mode +;; '(1 1 error "Unrecognised input" :checker less))) + +;; (flycheck-ert-def-checker-test llvm-llc llvm nil +;; (flycheck-ert-should-syntax-check +;; "language/llvm.ll" 'llvm-mode +;; '(4 19 error "'%tmp' defined with type 'i32'" :checker llvm-llc))) + +;; (flycheck-ert-def-checker-test lua-luacheck lua syntax-error +;; (flycheck-ert-should-syntax-check +;; "language/lua/syntax-error.lua" 'lua-mode +;; '(5 7 error "unfinished string" :id "E011" :checker lua-luacheck))) + +;; (flycheck-ert-def-checker-test lua-luacheck lua warnings +;; (flycheck-ert-should-syntax-check +;; "language/lua/warnings.lua" 'lua-mode +;; '(1 1 warning "setting non-standard global variable 'global_var'" +;; :id "W111" :checker lua-luacheck) +;; '(3 16 warning "unused function 'test'" +;; :id "W211" :checker lua-luacheck) +;; '(3 21 warning "unused argument 'arg'" +;; :id "W212" :checker lua-luacheck) +;; '(4 11 warning "variable 'var2' is never set" +;; :id "W221" :checker lua-luacheck))) + +;; (flycheck-ert-def-checker-test lua-luacheck lua custom-luacheckrc +;; (let ((flycheck-luacheckrc "custom.luacheckrc")) +;; (flycheck-ert-should-syntax-check +;; "language/lua/warnings.lua" 'lua-mode +;; '(1 1 warning "setting non-standard global variable 'global_var'" +;; :id "W111" :checker lua-luacheck) +;; '(3 16 warning "unused function 'test'" +;; :id "W211" :checker lua-luacheck) +;; '(4 11 warning "variable 'var2' is never set" +;; :id "W221" :checker lua-luacheck)))) + +;; (flycheck-ert-def-checker-test lua-luacheck lua custom-standards +;; (let ((flycheck-luacheck-standards '("ngx_lua"))) +;; (flycheck-ert-should-syntax-check +;; "language/lua/ngx_lua.warnings.lua" 'lua-mode +;; '(3 16 warning "unused function 'test'" +;; :id "W211" :checker lua-luacheck) +;; '(3 21 warning "unused argument 'arg'" +;; :id "W212" :checker lua-luacheck) +;; '(4 11 warning "variable 'var2' is never set" +;; :id "W221" :checker lua-luacheck)))) + +;; (flycheck-ert-def-checker-test lua lua nil +;; (let ((flycheck-disabled-checkers '(lua-luacheck))) +;; (flycheck-ert-should-syntax-check +;; "language/lua/syntax-error.lua" 'lua-mode +;; '(5 nil error "unfinished string near '\"oh no'" +;; :checker lua)))) + +;; (flycheck-ert-def-checker-test (perl perl-perlcritic) perl nil +;; (flycheck-ert-should-syntax-check +;; "language/perl.pl" '(perl-mode cperl-mode) +;; '(6 nil error "Global symbol \"$x\" requires explicit package name (did you forget to declare \"my $x\"?)" +;; :checker perl) +;; '(6 nil error "BEGIN not safe after errors--compilation aborted" +;; :checker perl) +;; '(6 6 error "Glob written as <...> (See page 167 of PBP)" +;; :id "BuiltinFunctions::RequireGlobFunction" :checker perl-perlcritic))) + +;; (flycheck-ert-def-checker-test php php syntax-error +;; (flycheck-ert-should-syntax-check +;; "language/php/syntax-error.php" 'php-mode +;; '(8 nil error "Assignments can only happen to writable values" :checker php))) + +;; (flycheck-ert-def-checker-test (php php-phpcs php-phpmd) php nil +;; :tags '(phpmd-xml checkstyle-xml) +;; (flycheck-ert-should-syntax-check +;; "language/php/warnings.php" 'php-mode +;; '(1 1 error "Missing file doc comment" +;; :id "PEAR.Commenting.FileComment.Missing" :checker php-phpcs) +;; '(21 nil warning "Avoid unused private fields such as '$FOO'." +;; :id "UnusedPrivateField" :checker php-phpmd) +;; '(21 20 error "Private member variable \"FOO\" must be prefixed with an underscore" +;; :id "PEAR.NamingConventions.ValidVariableName.PrivateNoUnderscore" +;; :checker php-phpcs) +;; '(23 5 error "The open comment tag must be the only content on the line" +;; :id "Generic.Commenting.DocComment.ContentAfterOpen" +;; :checker php-phpcs) +;; '(23 5 error "Doc comment for parameter \"$baz\" missing" +;; :id "PEAR.Commenting.FunctionComment.MissingParamTag" +;; :checker php-phpcs) +;; '(23 9 error "Doc comment short description must be on the first line" +;; :id "Generic.Commenting.DocComment.SpacingBeforeShort" +;; :checker php-phpcs) +;; '(23 29 error "The close comment tag must be the only content on the line" +;; :id "Generic.Commenting.DocComment.ContentBeforeClose" +;; :checker php-phpcs) +;; '(23 29 error "Missing @return tag in function comment" +;; :id "PEAR.Commenting.FunctionComment.MissingReturn" +;; :checker php-phpcs) +;; '(24 nil warning "Avoid unused private methods such as 'bar'." +;; :id "UnusedPrivateMethod" :checker php-phpmd) +;; '(24 nil warning "Avoid unused parameters such as '$baz'." +;; :id "UnusedFormalParameter" :checker php-phpmd) +;; '(24 13 error "Private method name \"A::bar\" must be prefixed with an underscore" +;; :id "PEAR.NamingConventions.ValidFunctionName.PrivateNoUnderscore" +;; :checker php-phpcs) +;; '(26 nil warning "Avoid variables with short names like $i. Configured minimum length is 3." +;; :id "ShortVariable" :checker php-phpmd) +;; '(26 nil warning "Avoid unused local variables such as '$i'." +;; :id "UnusedLocalVariable" :checker php-phpmd) +;; '(26 12 error "TRUE, FALSE and NULL must be lowercase; expected \"false\" but found \"FALSE\"" +;; :id "Generic.PHP.LowerCaseConstant.Found" :checker php-phpcs))) + +;; (flycheck-ert-def-checker-test proselint (text markdown) nil +;; ;; Unset LC_ALL which is set to LC_ALL=C for other checkers in ./run.el, +;; ;; because Click, used by ProseLint, when running with python 3 will refuse to +;; ;; work unless an Unicode locale is exported. See: +;; ;; http://click.pocoo.org/5/python3/#python-3-surrogate-handling +;; (flycheck-ert-with-env '(("LC_ALL" . nil)) +;; (flycheck-ert-should-syntax-check +;; "language/text.txt" 'text-mode +;; '(1 7 warning "Substitute 'damn' every time you're inclined to write 'very;' your editor will delete it and the writing will be just as it should be." +;; :id "weasel_words.very" +;; :checker proselint) +;; '(2 4 warning "Redundancy. Use 'associate' instead of 'associate together'." +;; :id "redundancy.garner" +;; :checker proselint) +;; '(3 5 warning "Gender bias. Use 'lawyer' instead of 'lady lawyer'." +;; :id "sexism.misc" +;; :checker proselint)))) + +;; (flycheck-ert-def-checker-test processing processing syntax-error +;; (flycheck-ert-should-syntax-check +;; "language/processing/syntax_error/syntax_error.pde" 'processing-mode +;; '(4 2 error "Syntax error, maybe a missing semicolon?" +;; :checker processing))) + +;; (flycheck-ert-def-checker-test protobuf-protoc protobuf syntax-error +;; (flycheck-ert-should-syntax-check +;; "language/protobuf.proto" 'protobuf-mode +;; '(2 23 error "Missing field number." +;; :checker protobuf-protoc))) + +;; (flycheck-ert-def-checker-test pug pug syntax-error +;; (flycheck-ert-should-syntax-check +;; "language/pug/pug.pug" 'pug-mode +;; '(2 1 error "unexpected token \"indent\"" :checker pug))) + +;; (flycheck-ert-def-checker-test pug pug include-extends-error +;; (flycheck-ert-should-syntax-check +;; "language/pug/pug-extends.pug" 'pug-mode +;; '(1 nil error "the \"basedir\" option is required to use includes and extends with \"absolute\" paths" +;; :checker pug))) + +;; (flycheck-ert-def-checker-test pug pug type-error +;; (flycheck-ert-should-syntax-check +;; "language/pug/pug-runtime-error.pug" 'pug-mode +;; '(5 nil error "Cannot read property 'bar' of undefined" :checker pug))) + +;; ;; N.B. the puppet 4 and 3 tests are mutually exclusive +;; ;; due to one having column and the other not +;; (flycheck-ert-def-checker-test puppet-parser puppet parser-error-puppet-4 +;; (skip-unless (version<= "4" (shell-command-to-string +;; "printf %s \"$(puppet --version)\""))) +;; (flycheck-ert-should-syntax-check +;; "language/puppet/parser-error.pp" 'puppet-mode +;; '(3 9 error "Syntax error at '>'" :checker puppet-parser))) + +;; (flycheck-ert-def-checker-test puppet-parser puppet parser-error-puppet-3 +;; (skip-unless (version<= (shell-command-to-string +;; "printf %s \"$(puppet --version)\"") "4")) +;; (flycheck-ert-should-syntax-check +;; "language/puppet/puppet3-parser-error.pp" 'puppet-mode +;; '(4 nil error "Syntax error at 'helloagain'; expected '}'" +;; :checker puppet-parser)) +;; (flycheck-ert-should-syntax-check +;; "language/puppet/puppet3-parser-multiline-error.pp" 'puppet-mode +;; '(4 nil error "Unclosed quote after '' in '\n}\n'" +;; :checker puppet-parser))) + +;; (flycheck-ert-def-checker-test puppet-lint puppet nil +;; (flycheck-ert-should-syntax-check +;; "language/puppet/warnings.pp" 'puppet-mode +;; '(2 nil error "foo::bar not in autoload module layout (autoloader_layout)" +;; :checker puppet-lint) +;; '(3 nil warning "case statement without a default case (case_without_default)" +;; :checker puppet-lint))) + +;; (flycheck-ert-def-checker-test python-flake8 python syntax-error +;; (let ((python-indent-guess-indent-offset nil)) ; Silence Python Mode! +;; (flycheck-ert-should-syntax-check +;; "language/python/syntax-error.py" 'python-mode +;; '(3 12 error "SyntaxError: invalid syntax" :id "E999" +;; :checker python-flake8)))) + +;; (flycheck-ert-def-checker-test python-flake8 python nil +;; (flycheck-ert-should-syntax-check +;; "language/python/test.py" 'python-mode +;; '(5 1 warning "'.antigravit' imported but unused" :id "F401" +;; :checker python-flake8) +;; '(7 1 warning "expected 2 blank lines, found 1" :id "E302" +;; :checker python-flake8) +;; '(12 29 warning "unexpected spaces around keyword / parameter equals" +;; :id "E251" :checker python-flake8) +;; '(12 31 warning "unexpected spaces around keyword / parameter equals" +;; :id "E251" :checker python-flake8) +;; '(21 1 warning "expected 2 blank lines after class or function definition, found 1" +;; :id "E305" :checker python-flake8) +;; '(22 1 error "undefined name 'antigravity'" :id "F821" +;; :checker python-flake8))) + +;; (flycheck-ert-def-checker-test python-pylint python syntax-error +;; (let ((flycheck-disabled-checkers '(python-flake8)) +;; (python-indent-guess-indent-offset nil)) ; Silence Python Mode +;; (flycheck-ert-should-syntax-check +;; "language/python/syntax-error.py" 'python-mode +;; '(3 1 error "invalid syntax (<string>, line 3)" +;; :id "syntax-error" :checker python-pylint)))) + +;; (flycheck-ert-def-checker-test python-pylint python nil +;; (let ((flycheck-disabled-checkers '(python-flake8))) +;; (flycheck-ert-should-syntax-check +;; "language/python/test.py" 'python-mode +;; '(1 1 info "Missing module docstring" :id "missing-docstring" :checker python-pylint) +;; '(4 1 error "Unable to import 'spam'" :id "import-error" :checker python-pylint) +;; '(5 1 error "No name 'antigravit' in module 'python'" :id "no-name-in-module" +;; :checker python-pylint) +;; '(5 1 warning "Unused import antigravit" :id "unused-import" +;; :checker python-pylint) +;; '(7 1 info "Missing class docstring" :id "missing-docstring" :checker python-pylint) +;; '(9 5 info "Invalid method name \"withEggs\"" :id "invalid-name" +;; :checker python-pylint) +;; '(9 5 info "Missing method docstring" :id "missing-docstring" :checker python-pylint) +;; '(9 5 warning "Method could be a function" :id "no-self-use" +;; :checker python-pylint) +;; '(12 1 info "No space allowed around keyword argument assignment" +;; :id "bad-whitespace" :checker python-pylint) +;; '(12 5 info "Missing method docstring" :id "missing-docstring" :checker python-pylint) +;; '(12 5 warning "Method could be a function" :id "no-self-use" +;; :checker python-pylint) +;; '(14 16 error "Module 'sys' has no 'python_version' member" :id "no-member" +;; :checker python-pylint) +;; '(22 1 error "Undefined variable 'antigravity'" :id "undefined-variable" +;; :checker python-pylint)))) + +;; (flycheck-ert-def-checker-test python-pylint python no-symbolic-id +;; (let ((flycheck-disabled-checkers '(python-flake8)) +;; (flycheck-pylint-use-symbolic-id nil)) +;; (flycheck-ert-should-syntax-check +;; "language/python/test.py" 'python-mode +;; '(1 1 info "Missing module docstring" :id "C0111" :checker python-pylint) +;; '(4 1 error "Unable to import 'spam'" :id "E0401" :checker python-pylint) +;; '(5 1 error "No name 'antigravit' in module 'python'" :id "E0611" +;; :checker python-pylint) +;; '(5 1 warning "Unused import antigravit" :id "W0611" +;; :checker python-pylint) +;; '(7 1 info "Missing class docstring" :id "C0111" :checker python-pylint) +;; '(9 5 info "Invalid method name \"withEggs\"" :id "C0103" +;; :checker python-pylint) +;; '(9 5 info "Missing method docstring" :id "C0111" :checker python-pylint) +;; '(9 5 warning "Method could be a function" :id "R0201" +;; :checker python-pylint) +;; '(12 1 info "No space allowed around keyword argument assignment" +;; :id "C0326" :checker python-pylint) +;; '(12 5 info "Missing method docstring" :id "C0111" :checker python-pylint) +;; '(12 5 warning "Method could be a function" :id "R0201" +;; :checker python-pylint) +;; '(14 16 error "Module 'sys' has no 'python_version' member" :id "E1101" +;; :checker python-pylint) +;; '(22 1 error "Undefined variable 'antigravity'" :id "E0602" +;; :checker python-pylint)))) + +;; (flycheck-ert-def-checker-test python-pycompile python python27 +;; (skip-unless (executable-find "python2")) +;; (let ((flycheck-disabled-checkers '(python-flake8 python-pylint)) +;; (flycheck-python-pycompile-executable "python2") +;; (python-indent-guess-indent-offset nil)) +;; (flycheck-ert-should-syntax-check +;; "language/python/syntax-error.py" 'python-mode +;; `(3 nil error "invalid syntax" :checker python-pycompile)))) + +;; (flycheck-ert-def-checker-test python-pycompile python has-no-warnings +;; (let ((flycheck-disabled-checkers '(python-flake8 python-pylint))) +;; (flycheck-ert-should-syntax-check +;; "language/python/test.py" 'python-mode))) + +;; (flycheck-ert-def-checker-test r-lintr r nil +;; ;; Disable caching in lintr tests to make sure that the file is re-checked +;; ;; every time +;; (skip-unless (flycheck-r-has-lintr (flycheck-checker-executable 'r-lintr))) +;; (let ((flycheck-lintr-caching nil)) +;; (flycheck-ert-should-syntax-check +;; "language/r.R" 'R-mode +;; '(1 28 info "Opening curly braces should never go on their own line and should always be followed by a new line." +;; :checker r-lintr) +;; '(1 56 info "Put spaces around all infix operators." :checker r-lintr) +;; '(4 6 warning "Do not use absolute paths." :checker r-lintr) +;; '(7 5 error "unexpected end of input" :checker r-lintr)))) + +;; (flycheck-ert-def-checker-test racket racket nil +;; (skip-unless (funcall (flycheck-checker-get 'racket 'predicate))) +;; (flycheck-ert-should-syntax-check +;; "language/racket.rkt" 'racket-mode +;; '(4 3 error "read: expected a `)' to close `('" :checker racket))) ;; (flycheck-ert-def-checker-test rpm-rpmlint rpm nil ;; (flycheck-ert-should-syntax-check @@ -3827,507 +3827,507 @@ Why not: ;; :checker rpm-rpmlint) ;; '(22 nil warning "macro-in-%changelog %{_bindir}" :checker rpm-rpmlint))) -(flycheck-ert-def-checker-test markdown-mdl markdown nil - (flycheck-ert-should-syntax-check - "language/markdown.md" 'markdown-mode - '(1 nil error "First header should be a top level header" - :id "MD002" :checker markdown-mdl))) - -(flycheck-ert-def-checker-test nix nix nil - (flycheck-ert-should-syntax-check - "language/nix.nix" 'nix-mode - '(3 1 error "syntax error, unexpected IN, expecting ';'," :checker nix))) - -(ert-deftest flycheck-locate-sphinx-source-directory/not-in-a-sphinx-project () - :tags '(language-rst) - (flycheck-ert-with-resource-buffer "language/rst/errors.rst" - (should-not (flycheck-locate-sphinx-source-directory)))) - -(ert-deftest flycheck-locate-sphinx-source-directory/in-a-sphinx-project () - :tags '(language-rst) - (flycheck-ert-with-resource-buffer "language/rst/sphinx/index.rst" - (should (string= (flycheck-locate-sphinx-source-directory) - (flycheck-ert-resource-filename "language/rst/sphinx/"))))) - -(flycheck-ert-def-checker-test rst rst nil - (flycheck-ert-should-syntax-check - "language/rst/errors.rst" 'rst-mode - '(8 nil warning "Title underline too short." :checker rst) - '(14 nil error "Unexpected section title." :checker rst) - '(16 nil error "Unknown target name: \"restructuredtext\"." :checker rst) - '(19 nil warning "Title underline too short." :checker rst) - '(21 nil error "Unknown target name: \"cool\"." :checker rst) - '(26 nil error "Unexpected section title." :checker rst))) - -(flycheck-ert-def-checker-test rst-sphinx rst nil - (flycheck-ert-should-syntax-check - "language/rst/sphinx/index.rst" 'rst-mode - '(2 nil warning "Title underline too short." :checker rst-sphinx) - '(9 nil error "Unknown target name: \"cool\"." :checker rst-sphinx) - '(9 nil warning "'envvar' reference target not found: FOO" - :checker rst-sphinx))) - -(flycheck-ert-def-checker-test rst-sphinx rst not-outside-of-a-sphinx-project - (flycheck-ert-with-resource-buffer "language/rst/errors.rst" - (rst-mode) - (should-not (flycheck-may-use-checker 'rst-sphinx)))) - -(flycheck-ert-def-checker-test ruby-rubocop ruby syntax-error - (flycheck-ert-should-syntax-check - "language/ruby/syntax-error.rb" 'ruby-mode - '(5 7 error "unexpected token tCONSTANT (Using Ruby 2.1 parser; configure using `TargetRubyVersion` parameter, under `AllCops`)" - :checker ruby-rubocop) - '(5 24 error "unterminated string meets end of file (Using Ruby 2.1 parser; configure using `TargetRubyVersion` parameter, under `AllCops`)" - :checker ruby-rubocop))) - -(flycheck-ert-def-checker-test ruby-rubylint ruby syntax-error - (ert-skip "Pending: https://github.com/YorickPeterse/ruby-lint/issues/202") - (let ((flycheck-disabled-checkers '(ruby-rubocop ruby-reek))) - (flycheck-ert-should-syntax-check - "language/ruby/syntax-error.rb" 'ruby-mode - '(5 7 error "unexpected token tCONSTANT" :checker ruby-rubylint)))) +;; (flycheck-ert-def-checker-test markdown-mdl markdown nil +;; (flycheck-ert-should-syntax-check +;; "language/markdown.md" 'markdown-mode +;; '(1 nil error "First header should be a top level header" +;; :id "MD002" :checker markdown-mdl))) -(flycheck-ert-def-checker-test ruby ruby syntax-error - (let ((flycheck-disabled-checkers '(ruby-rubocop ruby-reek ruby-rubylint))) - (flycheck-ert-should-syntax-check - "language/ruby/syntax-error.rb" 'ruby-mode - '(4 nil warning "assigned but unused variable - days" :checker ruby) - '(5 nil error "syntax error, unexpected tCONSTANT, expecting end-of-input" - :checker ruby)))) +;; (flycheck-ert-def-checker-test nix nix nil +;; (flycheck-ert-should-syntax-check +;; "language/nix.nix" 'nix-mode +;; '(3 1 error "syntax error, unexpected IN, expecting ';'," :checker nix))) -(flycheck-ert-def-checker-test ruby-jruby ruby syntax-error - (let ((flycheck-disabled-checkers '(ruby-rubocop ruby-reek ruby-rubylint ruby))) - (flycheck-ert-should-syntax-check - "language/ruby/syntax-error.rb" 'ruby-mode - '(5 nil error "syntax error, unexpected tCONSTANT" :checker ruby-jruby)))) - -(flycheck-ert-def-checker-test (ruby-rubocop ruby-reek ruby-rubylint) ruby with-rubylint - (flycheck-ert-should-syntax-check - "language/ruby/warnings.rb" 'ruby-mode - '(3 nil warning "Person assumes too much for instance variable '@name'" - :id "InstanceVariableAssumption" :checker ruby-reek) - '(3 1 info "Missing top-level class documentation comment." - :id "Style/Documentation" :checker ruby-rubocop) - '(5 5 warning "unused local variable arr" :checker ruby-rubylint) - '(5 5 warning "Useless assignment to variable - `arr`." - :id "Lint/UselessAssignment" :checker ruby-rubocop) - '(5 11 info "Use `%i` or `%I` for an array of symbols." - :id "Style/SymbolArray" :checker ruby-rubocop) - '(6 10 info "Prefer single-quoted strings when you don't need string interpolation or special symbols." - :id "Style/StringLiterals" :checker ruby-rubocop) - '(10 5 info "the use of then/do is not needed here" :checker ruby-rubylint) - '(10 5 info "Use a guard clause instead of wrapping the code inside a conditional expression." - :id "Style/GuardClause":checker ruby-rubocop) - '(10 5 info "Favor modifier `if` usage when having a single-line body. Another good alternative is the usage of control flow `&&`/`||`." - :id "Style/IfUnlessModifier" :checker ruby-rubocop) - '(10 8 warning "Literal `true` appeared in a condition." - :id "Lint/LiteralInCondition" :checker ruby-rubocop) - '(10 13 info "Do not use `then` for multi-line `if`." - :id "Style/MultilineIfThen" :checker ruby-rubocop) - '(11 7 info "Redundant `return` detected." - :id "Style/RedundantReturn" :checker ruby-rubocop) - '(11 24 error "undefined instance variable @name" :checker ruby-rubylint) - '(16 1 error "wrong number of arguments for 'test' (expected 2..3 but got 0)" - :checker ruby-rubylint))) - -(flycheck-ert-def-checker-test ruby-reek ruby warnings - (let ((flycheck-disabled-checkers '(ruby-rubocop ruby-rubylint))) - (flycheck-ert-should-syntax-check - "language/ruby/warnings.rb" 'ruby-mode - '(3 nil warning "Person assumes too much for instance variable '@name'" - :id "InstanceVariableAssumption" :checker ruby-reek)))) +;; (ert-deftest flycheck-locate-sphinx-source-directory/not-in-a-sphinx-project () +;; :tags '(language-rst) +;; (flycheck-ert-with-resource-buffer "language/rst/errors.rst" +;; (should-not (flycheck-locate-sphinx-source-directory)))) -(flycheck-ert-def-checker-test ruby ruby warnings - (let ((flycheck-disabled-checkers '(ruby-rubocop ruby-reek ruby-rubylint))) - (flycheck-ert-should-syntax-check - "language/ruby/warnings.rb" 'ruby-mode - '(5 nil warning "assigned but unused variable - arr" :checker ruby) - '(16 nil warning "possibly useless use of == in void context" - :checker ruby)))) +;; (ert-deftest flycheck-locate-sphinx-source-directory/in-a-sphinx-project () +;; :tags '(language-rst) +;; (flycheck-ert-with-resource-buffer "language/rst/sphinx/index.rst" +;; (should (string= (flycheck-locate-sphinx-source-directory) +;; (flycheck-ert-resource-filename "language/rst/sphinx/"))))) -(flycheck-ert-def-checker-test ruby-jruby ruby () - (let ((flycheck-disabled-checkers '(ruby-rubocop ruby-reek ruby-rubylint ruby))) - (flycheck-ert-should-syntax-check - "language/ruby/warnings.rb" 'ruby-mode - '(16 nil warning "Useless use of == in void context." - :checker ruby-jruby)))) - -(flycheck-ert-def-checker-test rust-cargo rust warning - (let ((flycheck-disabled-checkers '(rust)) - (flycheck-rust-crate-type "bin") - (flycheck-rust-binary-name "flycheck-test")) - (flycheck-ert-should-syntax-check - "language/rust/flycheck-test/src/warnings.rs" 'rust-mode - '(3 1 warning "function is never used: `main`" :checker rust-cargo) - '(3 1 info "#[warn(dead_code)] on by default" :checker rust-cargo) - '(4 9 warning "unused variable: `x`" :checker rust-cargo) - '(4 9 info "#[warn(unused_variables)] on by default" :checker rust-cargo)))) - -(flycheck-ert-def-checker-test rust-cargo rust default-target - (let ((flycheck-disabled-checkers '(rust)) - (flycheck-rust-crate-type nil) - (flycheck-rust-binary-name nil)) - (flycheck-ert-should-syntax-check - "language/rust/flycheck-test/src/warnings.rs" 'rust-mode - '(3 1 warning "function is never used: `main`" :checker rust-cargo) - '(3 1 info "#[warn(dead_code)] on by default" :checker rust-cargo) - '(4 9 warning "unused variable: `x`" :checker rust-cargo) - '(4 9 info "#[warn(unused_variables)] on by default" :checker rust-cargo)))) - -(flycheck-ert-def-checker-test rust-cargo rust lib-main - (let ((flycheck-disabled-checkers '(rust)) - (flycheck-rust-crate-type "bin") - (flycheck-rust-binary-name "lib-main")) - (flycheck-ert-should-syntax-check - "language/rust/lib-main/src/main.rs" 'rust-mode))) - -(flycheck-ert-def-checker-test rust-cargo rust notes - ;; We only get notes on the first build. Ensure we start from a - ;; clean directory each time. - (call-process "cargo" nil nil nil "clean" "--manifest-path" - (expand-file-name - "language/rust/note-test/Cargo.toml" - flycheck-test-resources-directory)) - - (let ((flycheck-disabled-checkers '(rust)) - (flycheck-rust-check-tests)) - (flycheck-ert-should-syntax-check - "language/rust/note-test/src/lib.rs" 'rust-mode - '(1 1 info "library: util" :checker rust-cargo) - '(1 1 info "library: rt" :checker rust-cargo) - '(1 1 info "library: m" :checker rust-cargo) - '(1 1 info "library: c" :checker rust-cargo) - '(1 1 info "library: gcc_s" :checker rust-cargo) - '(1 1 info "library: pthread" :checker rust-cargo) - '(1 1 info "library: rt" :checker rust-cargo) - '(1 1 info "library: dl" :checker rust-cargo) - '(1 1 info - "the order and any duplication can be significant on some platforms, and so may need to be preserved" - :checker rust-cargo) - '(1 1 info - "link against the following native artifacts when linking against this static library" - :checker rust-cargo)))) - -(flycheck-ert-def-checker-test rust-cargo rust conventional-layout - (let ((flycheck-disabled-checkers '(rust))) - (let ((flycheck-rust-crate-type "lib")) - (flycheck-ert-should-syntax-check - "language/rust/cargo-targets/src/lib.rs" 'rust-mode - '(3 1 warning "function is never used: `foo_lib`" :checker rust-cargo) - '(3 1 info "#[warn(dead_code)] on by default" :checker rust-cargo) - '(6 17 warning "unused variable: `foo_lib_test`" :checker rust-cargo) - '(6 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo))) - - (let ((flycheck-rust-crate-type "lib")) - (flycheck-ert-should-syntax-check - "language/rust/cargo-targets/src/a.rs" 'rust-mode - '(1 1 warning "function is never used: `foo_a`" :checker rust-cargo) - '(1 1 info "#[warn(dead_code)] on by default" :checker rust-cargo) - '(4 17 warning "unused variable: `foo_a_test`" :checker rust-cargo) - '(4 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo))) - - (let ((flycheck-rust-crate-type "bin") - (flycheck-rust-binary-name "cargo-targets")) - (flycheck-ert-should-syntax-check - "language/rust/cargo-targets/src/main.rs" 'rust-mode - '(1 17 warning "unused variable: `foo_main`" :checker rust-cargo) - '(1 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo) - '(4 17 warning "unused variable: `foo_main_test`" :checker rust-cargo) - '(4 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo))) - - (let ((flycheck-rust-crate-type "bin") - (flycheck-rust-binary-name "a")) - (flycheck-ert-should-syntax-check - "language/rust/cargo-targets/src/bin/a.rs" 'rust-mode - '(1 17 warning "unused variable: `foo_bin_a`" :checker rust-cargo) - '(1 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo) - '(4 17 warning "unused variable: `foo_bin_a_test`" :checker rust-cargo) - '(4 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo))) - - (let ((flycheck-rust-crate-type "bench") - (flycheck-rust-binary-name "a")) - (flycheck-ert-should-syntax-check - "language/rust/cargo-targets/benches/a.rs" 'rust-mode - '(1 17 warning "unused variable: `foo_bench_a`" :checker rust-cargo) - '(1 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo) - '(4 17 warning "unused variable: `foo_bench_a_test`" :checker rust-cargo) - '(4 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo))) - - (let ((flycheck-rust-crate-type "test") - (flycheck-rust-binary-name "a")) - (flycheck-ert-should-syntax-check - "language/rust/cargo-targets/tests/a.rs" 'rust-mode - '(2 16 warning "unused variable: `foo_test_a_test`" :checker rust-cargo) - '(2 16 info "#[warn(unused_variables)] on by default" :checker rust-cargo) - '(4 1 warning "function is never used: `foo_test_a`" :checker rust-cargo) - '(4 1 info "#[warn(dead_code)] on by default" :checker rust-cargo))) - - (let ((flycheck-rust-crate-type "example") - (flycheck-rust-binary-name "a")) - (flycheck-ert-should-syntax-check - "language/rust/cargo-targets/examples/a.rs" 'rust-mode - '(1 17 warning "unused variable: `foo_ex_a`" :checker rust-cargo) - '(1 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo) - '(4 17 warning "unused variable: `foo_ex_a_test`" :checker rust-cargo) - '(4 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo))))) - -(flycheck-ert-def-checker-test rust rust syntax-error - (let ((flycheck-disabled-checkers '(rust-cargo))) - (flycheck-ert-should-syntax-check - "language/rust/flycheck-test/src/syntax-error.rs" 'rust-mode - '(4 5 error "cannot find value `bla` in this scope (not found in this scope)" :checker rust :id "E0425")))) +;; (flycheck-ert-def-checker-test rst rst nil +;; (flycheck-ert-should-syntax-check +;; "language/rst/errors.rst" 'rst-mode +;; '(8 nil warning "Title underline too short." :checker rst) +;; '(14 nil error "Unexpected section title." :checker rst) +;; '(16 nil error "Unknown target name: \"restructuredtext\"." :checker rst) +;; '(19 nil warning "Title underline too short." :checker rst) +;; '(21 nil error "Unknown target name: \"cool\"." :checker rst) +;; '(26 nil error "Unexpected section title." :checker rst))) + +;; (flycheck-ert-def-checker-test rst-sphinx rst nil +;; (flycheck-ert-should-syntax-check +;; "language/rst/sphinx/index.rst" 'rst-mode +;; '(2 nil warning "Title underline too short." :checker rst-sphinx) +;; '(9 nil error "Unknown target name: \"cool\"." :checker rst-sphinx) +;; '(9 nil warning "'envvar' reference target not found: FOO" +;; :checker rst-sphinx))) + +;; (flycheck-ert-def-checker-test rst-sphinx rst not-outside-of-a-sphinx-project +;; (flycheck-ert-with-resource-buffer "language/rst/errors.rst" +;; (rst-mode) +;; (should-not (flycheck-may-use-checker 'rst-sphinx)))) + +;; (flycheck-ert-def-checker-test ruby-rubocop ruby syntax-error +;; (flycheck-ert-should-syntax-check +;; "language/ruby/syntax-error.rb" 'ruby-mode +;; '(5 7 error "unexpected token tCONSTANT (Using Ruby 2.1 parser; configure using `TargetRubyVersion` parameter, under `AllCops`)" +;; :checker ruby-rubocop) +;; '(5 24 error "unterminated string meets end of file (Using Ruby 2.1 parser; configure using `TargetRubyVersion` parameter, under `AllCops`)" +;; :checker ruby-rubocop))) + +;; (flycheck-ert-def-checker-test ruby-rubylint ruby syntax-error +;; (ert-skip "Pending: https://github.com/YorickPeterse/ruby-lint/issues/202") +;; (let ((flycheck-disabled-checkers '(ruby-rubocop ruby-reek))) +;; (flycheck-ert-should-syntax-check +;; "language/ruby/syntax-error.rb" 'ruby-mode +;; '(5 7 error "unexpected token tCONSTANT" :checker ruby-rubylint)))) + +;; (flycheck-ert-def-checker-test ruby ruby syntax-error +;; (let ((flycheck-disabled-checkers '(ruby-rubocop ruby-reek ruby-rubylint))) +;; (flycheck-ert-should-syntax-check +;; "language/ruby/syntax-error.rb" 'ruby-mode +;; '(4 nil warning "assigned but unused variable - days" :checker ruby) +;; '(5 nil error "syntax error, unexpected tCONSTANT, expecting end-of-input" +;; :checker ruby)))) + +;; (flycheck-ert-def-checker-test ruby-jruby ruby syntax-error +;; (let ((flycheck-disabled-checkers '(ruby-rubocop ruby-reek ruby-rubylint ruby))) +;; (flycheck-ert-should-syntax-check +;; "language/ruby/syntax-error.rb" 'ruby-mode +;; '(5 nil error "syntax error, unexpected tCONSTANT" :checker ruby-jruby)))) + +;; (flycheck-ert-def-checker-test (ruby-rubocop ruby-reek ruby-rubylint) ruby with-rubylint +;; (flycheck-ert-should-syntax-check +;; "language/ruby/warnings.rb" 'ruby-mode +;; '(3 nil warning "Person assumes too much for instance variable '@name'" +;; :id "InstanceVariableAssumption" :checker ruby-reek) +;; '(3 1 info "Missing top-level class documentation comment." +;; :id "Style/Documentation" :checker ruby-rubocop) +;; '(5 5 warning "unused local variable arr" :checker ruby-rubylint) +;; '(5 5 warning "Useless assignment to variable - `arr`." +;; :id "Lint/UselessAssignment" :checker ruby-rubocop) +;; '(5 11 info "Use `%i` or `%I` for an array of symbols." +;; :id "Style/SymbolArray" :checker ruby-rubocop) +;; '(6 10 info "Prefer single-quoted strings when you don't need string interpolation or special symbols." +;; :id "Style/StringLiterals" :checker ruby-rubocop) +;; '(10 5 info "the use of then/do is not needed here" :checker ruby-rubylint) +;; '(10 5 info "Use a guard clause instead of wrapping the code inside a conditional expression." +;; :id "Style/GuardClause":checker ruby-rubocop) +;; '(10 5 info "Favor modifier `if` usage when having a single-line body. Another good alternative is the usage of control flow `&&`/`||`." +;; :id "Style/IfUnlessModifier" :checker ruby-rubocop) +;; '(10 8 warning "Literal `true` appeared in a condition." +;; :id "Lint/LiteralInCondition" :checker ruby-rubocop) +;; '(10 13 info "Do not use `then` for multi-line `if`." +;; :id "Style/MultilineIfThen" :checker ruby-rubocop) +;; '(11 7 info "Redundant `return` detected." +;; :id "Style/RedundantReturn" :checker ruby-rubocop) +;; '(11 24 error "undefined instance variable @name" :checker ruby-rubylint) +;; '(16 1 error "wrong number of arguments for 'test' (expected 2..3 but got 0)" +;; :checker ruby-rubylint))) + +;; (flycheck-ert-def-checker-test ruby-reek ruby warnings +;; (let ((flycheck-disabled-checkers '(ruby-rubocop ruby-rubylint))) +;; (flycheck-ert-should-syntax-check +;; "language/ruby/warnings.rb" 'ruby-mode +;; '(3 nil warning "Person assumes too much for instance variable '@name'" +;; :id "InstanceVariableAssumption" :checker ruby-reek)))) + +;; (flycheck-ert-def-checker-test ruby ruby warnings +;; (let ((flycheck-disabled-checkers '(ruby-rubocop ruby-reek ruby-rubylint))) +;; (flycheck-ert-should-syntax-check +;; "language/ruby/warnings.rb" 'ruby-mode +;; '(5 nil warning "assigned but unused variable - arr" :checker ruby) +;; '(16 nil warning "possibly useless use of == in void context" +;; :checker ruby)))) + +;; (flycheck-ert-def-checker-test ruby-jruby ruby () +;; (let ((flycheck-disabled-checkers '(ruby-rubocop ruby-reek ruby-rubylint ruby))) +;; (flycheck-ert-should-syntax-check +;; "language/ruby/warnings.rb" 'ruby-mode +;; '(16 nil warning "Useless use of == in void context." +;; :checker ruby-jruby)))) + +;; (flycheck-ert-def-checker-test rust-cargo rust warning +;; (let ((flycheck-disabled-checkers '(rust)) +;; (flycheck-rust-crate-type "bin") +;; (flycheck-rust-binary-name "flycheck-test")) +;; (flycheck-ert-should-syntax-check +;; "language/rust/flycheck-test/src/warnings.rs" 'rust-mode +;; '(3 1 warning "function is never used: `main`" :checker rust-cargo) +;; '(3 1 info "#[warn(dead_code)] on by default" :checker rust-cargo) +;; '(4 9 warning "unused variable: `x`" :checker rust-cargo) +;; '(4 9 info "#[warn(unused_variables)] on by default" :checker rust-cargo)))) + +;; (flycheck-ert-def-checker-test rust-cargo rust default-target +;; (let ((flycheck-disabled-checkers '(rust)) +;; (flycheck-rust-crate-type nil) +;; (flycheck-rust-binary-name nil)) +;; (flycheck-ert-should-syntax-check +;; "language/rust/flycheck-test/src/warnings.rs" 'rust-mode +;; '(3 1 warning "function is never used: `main`" :checker rust-cargo) +;; '(3 1 info "#[warn(dead_code)] on by default" :checker rust-cargo) +;; '(4 9 warning "unused variable: `x`" :checker rust-cargo) +;; '(4 9 info "#[warn(unused_variables)] on by default" :checker rust-cargo)))) + +;; (flycheck-ert-def-checker-test rust-cargo rust lib-main +;; (let ((flycheck-disabled-checkers '(rust)) +;; (flycheck-rust-crate-type "bin") +;; (flycheck-rust-binary-name "lib-main")) +;; (flycheck-ert-should-syntax-check +;; "language/rust/lib-main/src/main.rs" 'rust-mode))) + +;; (flycheck-ert-def-checker-test rust-cargo rust notes +;; ;; We only get notes on the first build. Ensure we start from a +;; ;; clean directory each time. +;; (call-process "cargo" nil nil nil "clean" "--manifest-path" +;; (expand-file-name +;; "language/rust/note-test/Cargo.toml" +;; flycheck-test-resources-directory)) + +;; (let ((flycheck-disabled-checkers '(rust)) +;; (flycheck-rust-check-tests)) +;; (flycheck-ert-should-syntax-check +;; "language/rust/note-test/src/lib.rs" 'rust-mode +;; '(1 1 info "library: util" :checker rust-cargo) +;; '(1 1 info "library: rt" :checker rust-cargo) +;; '(1 1 info "library: m" :checker rust-cargo) +;; '(1 1 info "library: c" :checker rust-cargo) +;; '(1 1 info "library: gcc_s" :checker rust-cargo) +;; '(1 1 info "library: pthread" :checker rust-cargo) +;; '(1 1 info "library: rt" :checker rust-cargo) +;; '(1 1 info "library: dl" :checker rust-cargo) +;; '(1 1 info +;; "the order and any duplication can be significant on some platforms, and so may need to be preserved" +;; :checker rust-cargo) +;; '(1 1 info +;; "link against the following native artifacts when linking against this static library" +;; :checker rust-cargo)))) + +;; (flycheck-ert-def-checker-test rust-cargo rust conventional-layout +;; (let ((flycheck-disabled-checkers '(rust))) +;; (let ((flycheck-rust-crate-type "lib")) +;; (flycheck-ert-should-syntax-check +;; "language/rust/cargo-targets/src/lib.rs" 'rust-mode +;; '(3 1 warning "function is never used: `foo_lib`" :checker rust-cargo) +;; '(3 1 info "#[warn(dead_code)] on by default" :checker rust-cargo) +;; '(6 17 warning "unused variable: `foo_lib_test`" :checker rust-cargo) +;; '(6 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo))) + +;; (let ((flycheck-rust-crate-type "lib")) +;; (flycheck-ert-should-syntax-check +;; "language/rust/cargo-targets/src/a.rs" 'rust-mode +;; '(1 1 warning "function is never used: `foo_a`" :checker rust-cargo) +;; '(1 1 info "#[warn(dead_code)] on by default" :checker rust-cargo) +;; '(4 17 warning "unused variable: `foo_a_test`" :checker rust-cargo) +;; '(4 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo))) + +;; (let ((flycheck-rust-crate-type "bin") +;; (flycheck-rust-binary-name "cargo-targets")) +;; (flycheck-ert-should-syntax-check +;; "language/rust/cargo-targets/src/main.rs" 'rust-mode +;; '(1 17 warning "unused variable: `foo_main`" :checker rust-cargo) +;; '(1 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo) +;; '(4 17 warning "unused variable: `foo_main_test`" :checker rust-cargo) +;; '(4 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo))) + +;; (let ((flycheck-rust-crate-type "bin") +;; (flycheck-rust-binary-name "a")) +;; (flycheck-ert-should-syntax-check +;; "language/rust/cargo-targets/src/bin/a.rs" 'rust-mode +;; '(1 17 warning "unused variable: `foo_bin_a`" :checker rust-cargo) +;; '(1 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo) +;; '(4 17 warning "unused variable: `foo_bin_a_test`" :checker rust-cargo) +;; '(4 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo))) + +;; (let ((flycheck-rust-crate-type "bench") +;; (flycheck-rust-binary-name "a")) +;; (flycheck-ert-should-syntax-check +;; "language/rust/cargo-targets/benches/a.rs" 'rust-mode +;; '(1 17 warning "unused variable: `foo_bench_a`" :checker rust-cargo) +;; '(1 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo) +;; '(4 17 warning "unused variable: `foo_bench_a_test`" :checker rust-cargo) +;; '(4 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo))) + +;; (let ((flycheck-rust-crate-type "test") +;; (flycheck-rust-binary-name "a")) +;; (flycheck-ert-should-syntax-check +;; "language/rust/cargo-targets/tests/a.rs" 'rust-mode +;; '(2 16 warning "unused variable: `foo_test_a_test`" :checker rust-cargo) +;; '(2 16 info "#[warn(unused_variables)] on by default" :checker rust-cargo) +;; '(4 1 warning "function is never used: `foo_test_a`" :checker rust-cargo) +;; '(4 1 info "#[warn(dead_code)] on by default" :checker rust-cargo))) + +;; (let ((flycheck-rust-crate-type "example") +;; (flycheck-rust-binary-name "a")) +;; (flycheck-ert-should-syntax-check +;; "language/rust/cargo-targets/examples/a.rs" 'rust-mode +;; '(1 17 warning "unused variable: `foo_ex_a`" :checker rust-cargo) +;; '(1 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo) +;; '(4 17 warning "unused variable: `foo_ex_a_test`" :checker rust-cargo) +;; '(4 17 info "#[warn(unused_variables)] on by default" :checker rust-cargo))))) + +;; (flycheck-ert-def-checker-test rust rust syntax-error +;; (let ((flycheck-disabled-checkers '(rust-cargo))) +;; (flycheck-ert-should-syntax-check +;; "language/rust/flycheck-test/src/syntax-error.rs" 'rust-mode +;; '(4 5 error "cannot find value `bla` in this scope (not found in this scope)" :checker rust :id "E0425")))) + +;; (flycheck-ert-def-checker-test rust rust type-error +;; (let ((flycheck-disabled-checkers '(rust-cargo))) +;; (flycheck-ert-should-syntax-check +;; "language/rust/flycheck-test/src/multiline-error.rs" 'rust-mode +;; '(7 9 error "mismatched types (expected u8, found i8)" :checker rust :id "E0308")))) + +;; (flycheck-ert-def-checker-test rust rust warning +;; (let ((flycheck-disabled-checkers '(rust-cargo))) +;; (flycheck-ert-should-syntax-check +;; "language/rust/flycheck-test/src/warnings.rs" 'rust-mode +;; '(4 9 warning "unused variable: `x`" :checker rust) +;; '(4 9 info "#[warn(unused_variables)] on by default" :checker rust)))) + +;; (flycheck-ert-def-checker-test rust rust note-and-help +;; (let ((flycheck-disabled-checkers '(rust-cargo))) +;; (flycheck-ert-should-syntax-check +;; "language/rust/flycheck-test/src/note-and-help.rs" 'rust-mode +;; '(11 9 info "value moved here" :checker rust :id "E0382") +;; '(12 9 error "use of moved value: `x` (value used here after move)" :checker rust :id "E0382") +;; '(12 9 info "move occurs because `x` has type `NonPOD`, which does not implement the `Copy` trait" :checker rust :id "E0382")))) + +;; (flycheck-ert-def-checker-test rust rust crate-root-not-set +;; (let ((flycheck-disabled-checkers '(rust-cargo))) +;; (flycheck-ert-should-syntax-check +;; "language/rust/flycheck-test/src/importing.rs" 'rust-mode +;; '(1 5 error "unresolved import `super::imported` (There are too many initial `super`s.)" :checker rust :id "E0432")))) + +;; (flycheck-ert-def-checker-test rust rust macro-error +;; (let ((flycheck-disabled-checkers '(rust-cargo))) +;; (flycheck-ert-should-syntax-check +;; "language/rust/flycheck-test/src/macro-error.rs" 'rust-mode +;; '(2 3 info "invalid reference to argument `0` (no arguments given)" :checker rust)))) + +;; (flycheck-ert-def-checker-test sass sass nil +;; (flycheck-ert-should-syntax-check +;; "language/sass/error.sass" 'sass-mode +;; '(5 nil error "Inconsistent indentation: 3 spaces were used for indentation, but the rest of the document was indented using 2 spaces." +;; :checker sass))) -(flycheck-ert-def-checker-test rust rust type-error - (let ((flycheck-disabled-checkers '(rust-cargo))) - (flycheck-ert-should-syntax-check - "language/rust/flycheck-test/src/multiline-error.rs" 'rust-mode - '(7 9 error "mismatched types (expected u8, found i8)" :checker rust :id "E0308")))) +;; (flycheck-ert-def-checker-test sass sass warning +;; (flycheck-ert-should-syntax-check +;; "language/sass/warning.sass" 'sass-mode +;; '(2 nil warning "this is deprecated" :checker sass))) -(flycheck-ert-def-checker-test rust rust warning - (let ((flycheck-disabled-checkers '(rust-cargo))) - (flycheck-ert-should-syntax-check - "language/rust/flycheck-test/src/warnings.rs" 'rust-mode - '(4 9 warning "unused variable: `x`" :checker rust) - '(4 9 info "#[warn(unused_variables)] on by default" :checker rust)))) +;; (flycheck-ert-def-checker-test scala scala nil +;; (flycheck-ert-should-syntax-check +;; "language/scala/syntax-error.scala" 'scala-mode +;; '(3 nil error "identifier expected but '{' found." :checker scala))) + +;; (flycheck-ert-def-checker-test scala-scalastyle scala error +;; (let ((flycheck-scalastylerc "scalastyle.xml")) +;; (flycheck-ert-should-syntax-check +;; "language/scala/style-error.scala" 'scala-mode +;; '(6 5 error "Don't use println" :checker scala-scalastyle)))) + +;; (flycheck-ert-def-checker-test scala-scalastyle scala warning +;; (let ((flycheck-scalastylerc "scalastyle.xml")) +;; (flycheck-ert-should-syntax-check +;; "language/scala/style-warning.scala" 'scala-mode +;; '(5 9 warning "Redundant braces after class definition" +;; :checker scala-scalastyle)))) + +;; (defvar geiser-impl--implementation) + +;; (defun flycheck/chicken-mode () +;; "Enable Scheme and Geiser mode for Chicken scheme." +;; (interactive) +;; (scheme-mode) +;; (setq-local geiser-impl--implementation 'chicken) +;; (geiser-mode)) + +;; (flycheck-ert-def-checker-test scheme-chicken scheme nil +;; (flycheck-ert-should-syntax-check +;; "language/chicken/error.scm" 'flycheck/chicken-mode +;; '(2 nil warning "in procedure call to `g1', expected a value of type `(procedure (* *) *)' but was given a value of type `number'" +;; :checker scheme-chicken))) -(flycheck-ert-def-checker-test rust rust note-and-help - (let ((flycheck-disabled-checkers '(rust-cargo))) - (flycheck-ert-should-syntax-check - "language/rust/flycheck-test/src/note-and-help.rs" 'rust-mode - '(11 9 info "value moved here" :checker rust :id "E0382") - '(12 9 error "use of moved value: `x` (value used here after move)" :checker rust :id "E0382") - '(12 9 info "move occurs because `x` has type `NonPOD`, which does not implement the `Copy` trait" :checker rust :id "E0382")))) +;; (flycheck-ert-def-checker-test scheme-chicken scheme syntax-error +;; (flycheck-ert-should-syntax-check +;; "language/chicken/syntax-error.scm" 'flycheck/chicken-mode +;; '(1 nil error "not enough arguments\n\n\t(define)\n\n\tExpansion history:\n\n\t<syntax>\t (##core#begin (define))\n\t<syntax>\t (define)\t<--" +;; :checker scheme-chicken))) -(flycheck-ert-def-checker-test rust rust crate-root-not-set - (let ((flycheck-disabled-checkers '(rust-cargo))) - (flycheck-ert-should-syntax-check - "language/rust/flycheck-test/src/importing.rs" 'rust-mode - '(1 5 error "unresolved import `super::imported` (There are too many initial `super`s.)" :checker rust :id "E0432")))) +;; (flycheck-ert-def-checker-test scheme-chicken scheme syntax-read-error +;; (flycheck-ert-should-syntax-check +;; "language/chicken/syntax-read-error.scm" 'flycheck/chicken-mode +;; '(1 nil error "invalid sharp-sign read syntax: #\\n" +;; :checker scheme-chicken))) + +;; (flycheck-ert-def-checker-test scss-lint scss nil +;; (let ((flycheck-scss-lintrc "scss-lint.yml")) +;; (flycheck-ert-should-syntax-check +;; "language/scss/lint-error.scss" 'scss-mode +;; '(1 1 error "Avoid using id selectors" +;; :checker scss-lint :id "IdSelector") +;; '(3 16 warning "Color `red` should be written in hexadecimal form as `#ff0000`" +;; :checker scss-lint :id "ColorKeyword")))) + +;; (flycheck-ert-def-checker-test scss-lint scss syntax-error +;; (flycheck-ert-should-syntax-check +;; "language/scss/error.scss" 'scss-mode +;; '(3 1 error "Syntax Error: Invalid CSS after \"... c olor: red\": expected \"{\", was \";\"" +;; :checker scss-lint))) + +;; (flycheck-ert-def-checker-test scss scss nil +;; (let ((flycheck-disabled-checkers '(scss-lint))) +;; (flycheck-ert-should-syntax-check +;; "language/scss/error.scss" 'scss-mode +;; '(3 nil error "Invalid CSS after \"... c olor: red\": expected \"{\", was \";\"" +;; :checker scss)))) + +;; (flycheck-ert-def-checker-test scss scss warning +;; (let ((flycheck-disabled-checkers '(scss-lint))) +;; (flycheck-ert-should-syntax-check +;; "language/scss/warning.scss" 'scss-mode +;; '(2 nil warning ".container is deprecated" :checker scss)))) + +;; (flycheck-ert-def-checker-test sh-bash (sh sh-bash) nil +;; (flycheck-ert-should-syntax-check +;; "language/sh/bash-syntax-error.bash" 'sh-mode +;; '(5 nil error "syntax error near unexpected token `fi'" :checker sh-bash) +;; '(5 nil error "`fi'" :checker sh-bash))) -(flycheck-ert-def-checker-test rust rust macro-error - (let ((flycheck-disabled-checkers '(rust-cargo))) - (flycheck-ert-should-syntax-check - "language/rust/flycheck-test/src/macro-error.rs" 'rust-mode - '(2 3 info "invalid reference to argument `0` (no arguments given)" :checker rust)))) - -(flycheck-ert-def-checker-test sass sass nil - (flycheck-ert-should-syntax-check - "language/sass/error.sass" 'sass-mode - '(5 nil error "Inconsistent indentation: 3 spaces were used for indentation, but the rest of the document was indented using 2 spaces." - :checker sass))) - -(flycheck-ert-def-checker-test sass sass warning - (flycheck-ert-should-syntax-check - "language/sass/warning.sass" 'sass-mode - '(2 nil warning "this is deprecated" :checker sass))) - -(flycheck-ert-def-checker-test scala scala nil - (flycheck-ert-should-syntax-check - "language/scala/syntax-error.scala" 'scala-mode - '(3 nil error "identifier expected but '{' found." :checker scala))) - -(flycheck-ert-def-checker-test scala-scalastyle scala error - (let ((flycheck-scalastylerc "scalastyle.xml")) - (flycheck-ert-should-syntax-check - "language/scala/style-error.scala" 'scala-mode - '(6 5 error "Don't use println" :checker scala-scalastyle)))) +;; (flycheck-ert-def-checker-test sh-posix-dash (sh sh-posix) nil +;; (flycheck-ert-should-syntax-check +;; "language/sh/posix-syntax-error.sh" 'sh-mode +;; '(3 nil error "Syntax error: \"(\" unexpected" :checker sh-posix-dash))) + +;; (flycheck-ert-def-checker-test sh-posix-bash (sh sh-posix) nil +;; (let ((flycheck-disabled-checkers '(sh-posix-dash))) +;; (flycheck-ert-should-syntax-check +;; "language/sh/posix-syntax-error.sh" 'sh-mode +;; '(3 nil error "syntax error near unexpected token `('" +;; :checker sh-posix-bash) +;; '(3 nil error "`cat <(echo blah)'" :checker sh-posix-bash)))) + +;; (flycheck-ert-def-checker-test sh-zsh (sh sh-zsh) nil +;; (flycheck-ert-should-syntax-check +;; "language/sh/zsh-syntax-error.zsh" 'sh-mode +;; '(5 nil error "parse error near `fi'" :checker sh-zsh))) -(flycheck-ert-def-checker-test scala-scalastyle scala warning - (let ((flycheck-scalastylerc "scalastyle.xml")) - (flycheck-ert-should-syntax-check - "language/scala/style-warning.scala" 'scala-mode - '(5 9 warning "Redundant braces after class definition" - :checker scala-scalastyle)))) - -(defvar geiser-impl--implementation) - -(defun flycheck/chicken-mode () - "Enable Scheme and Geiser mode for Chicken scheme." - (interactive) - (scheme-mode) - (setq-local geiser-impl--implementation 'chicken) - (geiser-mode)) - -(flycheck-ert-def-checker-test scheme-chicken scheme nil - (flycheck-ert-should-syntax-check - "language/chicken/error.scm" 'flycheck/chicken-mode - '(2 nil warning "in procedure call to `g1', expected a value of type `(procedure (* *) *)' but was given a value of type `number'" - :checker scheme-chicken))) - -(flycheck-ert-def-checker-test scheme-chicken scheme syntax-error - (flycheck-ert-should-syntax-check - "language/chicken/syntax-error.scm" 'flycheck/chicken-mode - '(1 nil error "not enough arguments\n\n\t(define)\n\n\tExpansion history:\n\n\t<syntax>\t (##core#begin (define))\n\t<syntax>\t (define)\t<--" - :checker scheme-chicken))) - -(flycheck-ert-def-checker-test scheme-chicken scheme syntax-read-error - (flycheck-ert-should-syntax-check - "language/chicken/syntax-read-error.scm" 'flycheck/chicken-mode - '(1 nil error "invalid sharp-sign read syntax: #\\n" - :checker scheme-chicken))) - -(flycheck-ert-def-checker-test scss-lint scss nil - (let ((flycheck-scss-lintrc "scss-lint.yml")) - (flycheck-ert-should-syntax-check - "language/scss/lint-error.scss" 'scss-mode - '(1 1 error "Avoid using id selectors" - :checker scss-lint :id "IdSelector") - '(3 16 warning "Color `red` should be written in hexadecimal form as `#ff0000`" - :checker scss-lint :id "ColorKeyword")))) - -(flycheck-ert-def-checker-test scss-lint scss syntax-error - (flycheck-ert-should-syntax-check - "language/scss/error.scss" 'scss-mode - '(3 1 error "Syntax Error: Invalid CSS after \"... c olor: red\": expected \"{\", was \";\"" - :checker scss-lint))) - -(flycheck-ert-def-checker-test scss scss nil - (let ((flycheck-disabled-checkers '(scss-lint))) - (flycheck-ert-should-syntax-check - "language/scss/error.scss" 'scss-mode - '(3 nil error "Invalid CSS after \"... c olor: red\": expected \"{\", was \";\"" - :checker scss)))) +;; (flycheck-ert-def-checker-test sh-shellcheck sh nil +;; :tags '(checkstyle-xml) +;; (flycheck-ert-should-syntax-check +;; "language/sh/shellcheck.sh" 'sh-mode +;; '(2 5 warning "Tilde does not expand in quotes. Use $HOME." +;; :checker sh-shellcheck :id "SC2088") +;; '(3 7 error "Double quote array expansions to avoid re-splitting elements." +;; :checker sh-shellcheck :id "SC2068") +;; '(4 8 warning "Declare and assign separately to avoid masking return values." +;; :checker sh-shellcheck :id "SC2155") +;; '(4 11 info "Use $(..) instead of legacy `..`." +;; :checker sh-shellcheck :id "SC2006"))) + +;; (flycheck-ert-def-checker-test slim slim nil +;; (flycheck-ert-should-syntax-check +;; "language/slim.slim" 'slim-mode +;; `(2 1 error "Unexpected indentation" :checker slim))) -(flycheck-ert-def-checker-test scss scss warning - (let ((flycheck-disabled-checkers '(scss-lint))) - (flycheck-ert-should-syntax-check - "language/scss/warning.scss" 'scss-mode - '(2 nil warning ".container is deprecated" :checker scss)))) - -(flycheck-ert-def-checker-test sh-bash (sh sh-bash) nil - (flycheck-ert-should-syntax-check - "language/sh/bash-syntax-error.bash" 'sh-mode - '(5 nil error "syntax error near unexpected token `fi'" :checker sh-bash) - '(5 nil error "`fi'" :checker sh-bash))) - -(flycheck-ert-def-checker-test sh-posix-dash (sh sh-posix) nil - (flycheck-ert-should-syntax-check - "language/sh/posix-syntax-error.sh" 'sh-mode - '(3 nil error "Syntax error: \"(\" unexpected" :checker sh-posix-dash))) - -(flycheck-ert-def-checker-test sh-posix-bash (sh sh-posix) nil - (let ((flycheck-disabled-checkers '(sh-posix-dash))) - (flycheck-ert-should-syntax-check - "language/sh/posix-syntax-error.sh" 'sh-mode - '(3 nil error "syntax error near unexpected token `('" - :checker sh-posix-bash) - '(3 nil error "`cat <(echo blah)'" :checker sh-posix-bash)))) - -(flycheck-ert-def-checker-test sh-zsh (sh sh-zsh) nil - (flycheck-ert-should-syntax-check - "language/sh/zsh-syntax-error.zsh" 'sh-mode - '(5 nil error "parse error near `fi'" :checker sh-zsh))) - -(flycheck-ert-def-checker-test sh-shellcheck sh nil - :tags '(checkstyle-xml) - (flycheck-ert-should-syntax-check - "language/sh/shellcheck.sh" 'sh-mode - '(2 5 warning "Tilde does not expand in quotes. Use $HOME." - :checker sh-shellcheck :id "SC2088") - '(3 7 error "Double quote array expansions to avoid re-splitting elements." - :checker sh-shellcheck :id "SC2068") - '(4 8 warning "Declare and assign separately to avoid masking return values." - :checker sh-shellcheck :id "SC2155") - '(4 11 info "Use $(..) instead of legacy `..`." - :checker sh-shellcheck :id "SC2006"))) - -(flycheck-ert-def-checker-test slim slim nil - (flycheck-ert-should-syntax-check - "language/slim.slim" 'slim-mode - `(2 1 error "Unexpected indentation" :checker slim))) - -;; (flycheck-ert-def-checker-test sqlint sql nil +;; ;; (flycheck-ert-def-checker-test sqlint sql nil +;; ;; (flycheck-ert-should-syntax-check +;; ;; "language/sql.sql" 'sql-mode +;; ;; `(1 15 error "unterminated quoted string at or near \"';\n \"" +;; ;; :checker sql-sqlint))) + +;; (flycheck-ert-def-checker-test systemd-analyze systemd nil ;; (flycheck-ert-should-syntax-check -;; "language/sql.sql" 'sql-mode -;; `(1 15 error "unterminated quoted string at or near \"';\n \"" -;; :checker sql-sqlint))) - -(flycheck-ert-def-checker-test systemd-analyze systemd nil - (flycheck-ert-should-syntax-check - "language/systemd-analyze-test.service" 'systemd-mode - '(3 nil error "Invalid URL, ignoring: foo://bar" - :checker systemd-analyze) - '(6 nil error "Unknown lvalue 'ExecSmart' in section 'Service'" - :checker systemd-analyze) - '(8 nil error "Unknown section 'Dog'. Ignoring." - :checker systemd-analyze))) - -(flycheck-ert-def-checker-test tex-chktex (tex latex) nil - (flycheck-ert-should-syntax-check - "language/tex.tex" 'latex-mode - '(5 29 warning "Intersentence spacing (`\\@') should perhaps be used." - :id "13" :checker tex-chktex))) - -(flycheck-ert-def-checker-test tex-lacheck (tex latex) nil - (let ((flycheck-disabled-checkers '(tex-chktex))) - (flycheck-ert-should-syntax-check - "language/tex.tex" 'latex-mode - '(5 nil warning "missing `\\@' before `.' in \"GNU.\"" - :checker tex-lacheck) - '(7 nil warning "possible unwanted space at \"{\"" - :checker tex-lacheck)))) - -(flycheck-ert-def-checker-test texinfo texinfo nil - (flycheck-ert-should-syntax-check - "language/texinfo.texi" 'texinfo-mode - '(3 nil warning "@settitle missing argument" :checker texinfo) - '(7 nil error "unknown command `bold'" :checker texinfo) - '(7 nil error "misplaced {" :checker texinfo) - '(7 nil error "misplaced }" :checker texinfo) - '(9 nil warning "printindex before document beginning: @printindex cp" - :checker texinfo))) - -(flycheck-ert-def-checker-test typescript-tslint typescript nil - (flycheck-ert-should-syntax-check - "language/typescript/sample.ts" 'typescript-mode - '(1 10 warning "Unused function: 'invalidAlignment'" - :checker typescript-tslint :id "no-unused-variable") - '(2 3 warning "Forbidden 'var' keyword, use 'let' or 'const' instead" - :checker typescript-tslint :id "no-var-keyword") - '(2 7 warning "Unused variable: 'a'" - :checker typescript-tslint :id "no-unused-variable") - '(3 15 warning "Missing semicolon" - :checker typescript-tslint :id "semicolon"))) - -(flycheck-ert-def-checker-test verilog-verilator verilog error - (flycheck-ert-should-syntax-check - "language/verilog/verilator_error.v" 'verilog-mode - '(4 nil error "Unsupported: $fopen with multichannel descriptor. Add ,\"w\" as second argument to open a file descriptor." - :checker verilog-verilator))) - -(flycheck-ert-def-checker-test verilog-verilator verilog warning - (flycheck-ert-should-syntax-check - "language/verilog/verilator_warning.v" 'verilog-mode - '(2 nil warning "Signal is not driven, nor used: val" - :checker verilog-verilator))) - -(flycheck-ert-def-checker-test xml-xmlstarlet xml nil - (flycheck-ert-should-syntax-check - "language/xml.xml" 'nxml-mode - '(4 10 error "Opening and ending tag mismatch: spam line 3 and with" - :checker xml-xmlstarlet))) - -(flycheck-ert-def-checker-test xml-xmllint xml nil - (let ((flycheck-disabled-checkers '(xml-xmlstarlet))) - (flycheck-ert-should-syntax-check - "language/xml.xml" 'nxml-mode - '(4 nil error "parser error : Opening and ending tag mismatch: spam line 3 and with" - :checker xml-xmllint) - '(5 nil error "parser error : Extra content at the end of the document" - :checker xml-xmllint)))) - -(flycheck-ert-def-checker-test yaml-jsyaml yaml nil - (flycheck-ert-should-syntax-check - "language/yaml.yaml" 'yaml-mode - '(4 5 error "bad indentation of a mapping entry" - :checker yaml-jsyaml))) - -(flycheck-ert-def-checker-test yaml-ruby yaml nil - (let ((flycheck-disabled-checkers '(yaml-jsyaml))) - (flycheck-ert-should-syntax-check - "language/yaml.yaml" 'yaml-mode - '(4 5 error "mapping values are not allowed in this context" - :checker yaml-ruby)))) +;; "language/systemd-analyze-test.service" 'systemd-mode +;; '(3 nil error "Invalid URL, ignoring: foo://bar" +;; :checker systemd-analyze) +;; '(6 nil error "Unknown lvalue 'ExecSmart' in section 'Service'" +;; :checker systemd-analyze) +;; '(8 nil error "Unknown section 'Dog'. Ignoring." +;; :checker systemd-analyze))) + +;; (flycheck-ert-def-checker-test tex-chktex (tex latex) nil +;; (flycheck-ert-should-syntax-check +;; "language/tex.tex" 'latex-mode +;; '(5 29 warning "Intersentence spacing (`\\@') should perhaps be used." +;; :id "13" :checker tex-chktex))) + +;; (flycheck-ert-def-checker-test tex-lacheck (tex latex) nil +;; (let ((flycheck-disabled-checkers '(tex-chktex))) +;; (flycheck-ert-should-syntax-check +;; "language/tex.tex" 'latex-mode +;; '(5 nil warning "missing `\\@' before `.' in \"GNU.\"" +;; :checker tex-lacheck) +;; '(7 nil warning "possible unwanted space at \"{\"" +;; :checker tex-lacheck)))) + +;; (flycheck-ert-def-checker-test texinfo texinfo nil +;; (flycheck-ert-should-syntax-check +;; "language/texinfo.texi" 'texinfo-mode +;; '(3 nil warning "@settitle missing argument" :checker texinfo) +;; '(7 nil error "unknown command `bold'" :checker texinfo) +;; '(7 nil error "misplaced {" :checker texinfo) +;; '(7 nil error "misplaced }" :checker texinfo) +;; '(9 nil warning "printindex before document beginning: @printindex cp" +;; :checker texinfo))) + +;; (flycheck-ert-def-checker-test typescript-tslint typescript nil +;; (flycheck-ert-should-syntax-check +;; "language/typescript/sample.ts" 'typescript-mode +;; '(1 10 warning "Unused function: 'invalidAlignment'" +;; :checker typescript-tslint :id "no-unused-variable") +;; '(2 3 warning "Forbidden 'var' keyword, use 'let' or 'const' instead" +;; :checker typescript-tslint :id "no-var-keyword") +;; '(2 7 warning "Unused variable: 'a'" +;; :checker typescript-tslint :id "no-unused-variable") +;; '(3 15 warning "Missing semicolon" +;; :checker typescript-tslint :id "semicolon"))) + +;; (flycheck-ert-def-checker-test verilog-verilator verilog error +;; (flycheck-ert-should-syntax-check +;; "language/verilog/verilator_error.v" 'verilog-mode +;; '(4 nil error "Unsupported: $fopen with multichannel descriptor. Add ,\"w\" as second argument to open a file descriptor." +;; :checker verilog-verilator))) + +;; (flycheck-ert-def-checker-test verilog-verilator verilog warning +;; (flycheck-ert-should-syntax-check +;; "language/verilog/verilator_warning.v" 'verilog-mode +;; '(2 nil warning "Signal is not driven, nor used: val" +;; :checker verilog-verilator))) + +;; (flycheck-ert-def-checker-test xml-xmlstarlet xml nil +;; (flycheck-ert-should-syntax-check +;; "language/xml.xml" 'nxml-mode +;; '(4 10 error "Opening and ending tag mismatch: spam line 3 and with" +;; :checker xml-xmlstarlet))) + +;; (flycheck-ert-def-checker-test xml-xmllint xml nil +;; (let ((flycheck-disabled-checkers '(xml-xmlstarlet))) +;; (flycheck-ert-should-syntax-check +;; "language/xml.xml" 'nxml-mode +;; '(4 nil error "parser error : Opening and ending tag mismatch: spam line 3 and with" +;; :checker xml-xmllint) +;; '(5 nil error "parser error : Extra content at the end of the document" +;; :checker xml-xmllint)))) + +;; (flycheck-ert-def-checker-test yaml-jsyaml yaml nil +;; (flycheck-ert-should-syntax-check +;; "language/yaml.yaml" 'yaml-mode +;; '(4 5 error "bad indentation of a mapping entry" +;; :checker yaml-jsyaml))) + +;; (flycheck-ert-def-checker-test yaml-ruby yaml nil +;; (let ((flycheck-disabled-checkers '(yaml-jsyaml))) +;; (flycheck-ert-should-syntax-check +;; "language/yaml.yaml" 'yaml-mode +;; '(4 5 error "mapping values are not allowed in this context" +;; :checker yaml-ruby)))) (flycheck-ert-initialize flycheck-test-resources-directory) |