Add tests for class symbols
This commit is contained in:
parent
34e19e7b2a
commit
10ee6bd63c
3 changed files with 12 additions and 5 deletions
|
@ -3,7 +3,7 @@
|
|||
(:use [clojure.test]))
|
||||
|
||||
;; These tests are identical to the tests in kibit.test.core
|
||||
;; The are here to illustrate kibit use via `check`
|
||||
;; They are here to illustrate kibit use via `check`
|
||||
|
||||
(deftest simplify-alts
|
||||
(are [expected-alt test-form]
|
||||
|
|
|
@ -23,6 +23,3 @@
|
|||
(= expected-expr (:expr (kibit/check-expr test-expr)))
|
||||
'(do [1 2 3]) '(do [1 2 3])
|
||||
nil '(if (> 2 3) :one :two)))
|
||||
|
||||
|
||||
|
||||
|
|
|
@ -1,7 +1,17 @@
|
|||
(ns kibit.test.misc
|
||||
(:require [kibit.check :as kibit])
|
||||
(:require [kibit.check :as kibit]
|
||||
[kibit.rules.misc :as misc])
|
||||
(:use [clojure.test]))
|
||||
|
||||
(deftest class-symbol-are
|
||||
(are [valid? class-symbol]
|
||||
(= valid? (misc/class-symbol? class-symbol))
|
||||
true 'Boolean
|
||||
true 'foo.bar.Baz
|
||||
false 'boolean
|
||||
false 'foo.bar.baz
|
||||
false 'foo.bar))
|
||||
|
||||
(deftest misc-are
|
||||
(are [expected-alt-form test-form]
|
||||
(= expected-alt-form (:alt (kibit/check-expr test-form)))
|
||||
|
|
Loading…
Reference in a new issue