Skip to content

Commit

Permalink
update test to report bug emitting strings with known forms
Browse files Browse the repository at this point in the history
  • Loading branch information
myguidingstar committed Apr 29, 2014
1 parent 72ec6db commit 91916ed
Showing 1 changed file with 5 additions and 2 deletions.
7 changes: 5 additions & 2 deletions test/chlorine/js_test.clj
Expand Up @@ -51,9 +51,9 @@
(is (= (detect-form '(foo 1 :x))
"foo"))
(is (= (detect-form 123)
123))
:default))
(is (= (detect-form "foo")
"foo")))
:default)))

(deftest sym->property-test
(is (= (sym->property :a)
Expand Down Expand Up @@ -101,6 +101,9 @@
(is (= (js #{:foo :bar :baz}) "hashSet('foo', 'bar', 'baz')"))
(is (= (js [:foo :bar :baz]) "['foo','bar','baz']"))
(is (= (js \newline) "'\n'"))
(is (= (js ".") "\".\""))
(is (= (js "defmacro") "\"defmacro\""))
(is (= (js ".abc") "\".abc\""))
(is (= (js \a) "'a'")))

(deftest functions
Expand Down

0 comments on commit 91916ed

Please sign in to comment.