Added one more assertion to test dashed names that are split by periods.
This commit is contained in:
parent
7e78b10ae4
commit
f38668edc6
1 changed files with 3 additions and 1 deletions
|
|
@ -21,7 +21,9 @@
|
||||||
(deftest test-dashed-quote
|
(deftest test-dashed-quote
|
||||||
(binding [*allow-dashed-names?* true]
|
(binding [*allow-dashed-names?* true]
|
||||||
(is (= (quote-identifier :foo-bar) "foo-bar"))
|
(is (= (quote-identifier :foo-bar) "foo-bar"))
|
||||||
(is (= (quote-identifier :foo-bar :style :ansi) "\"foo-bar\""))))
|
(is (= (quote-identifier :foo-bar :style :ansi) "\"foo-bar\""))
|
||||||
|
(is (= (quote-identifier :foo-bar.moo-bar :style :ansi)
|
||||||
|
"\"foo-bar\".\"moo-bar\""))))
|
||||||
|
|
||||||
(deftest test-cte
|
(deftest test-cte
|
||||||
(is (= (format-clause
|
(is (= (format-clause
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue