File: test-racket.el

package info (click to toggle)
flycheck 36.0-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 3,600 kB
  • sloc: lisp: 16,210; python: 718; makefile: 219; cpp: 24; ruby: 23; perl: 21; ada: 17; f90: 16; haskell: 15; javascript: 15; sh: 14; erlang: 14; xml: 14; ansic: 12; php: 9; tcl: 8; fortran: 3; vhdl: 2; awk: 1; sql: 1
file content (14 lines) | stat: -rw-r--r-- 514 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
;;; test-racket.el --- Flycheck Specs: Racket -*- lexical-binding: t; -*-
;;; Code:
(require 'flycheck-buttercup)
(require 'test-helpers)

(describe "Language Racket"
  (flycheck-buttercup-def-checker-test racket racket nil
    (assume (funcall (flycheck-checker-get 'racket 'predicate)))
    (let ((inhibit-message t))
      (flycheck-buttercup-should-syntax-check
       "language/racket.rkt" 'racket-mode
       '(4 3 error "read: expected a `)' to close `('" :checker racket)))))

;;; test-racket.el ends here