Temporarily comment out WIP tests

This commit is contained in:
Sean Corfield 2021-02-27 09:35:03 -08:00
parent 78ca2a0530
commit 5e2036a922

View file

@ -483,7 +483,7 @@
;; these tests are adapted from Cam Saul's PR #283
(deftest merge-where-no-params-test
#_(deftest merge-where-no-params-test
(doseq [[k [f merge-f]] {"WHERE" [where where]
"HAVING" [having having]}]
(testing "merge-where called with just the map as parameter - see #228"
@ -493,7 +493,7 @@
(is (= [(str "SELECT * FROM table " k " foo = bar")]
(sql/format (apply merge-f sqlmap []))))))))
(deftest merge-where-test
#_(deftest merge-where-test
(doseq [[k sql-keyword f merge-f] [[:where "WHERE" where where]
[:having "HAVING" having having]]]
(is (= [(str "SELECT * FROM table " sql-keyword " (foo = bar) AND (quuz = xyzzy)")]
@ -524,7 +524,7 @@
:or
[:x] nil [:y]))))))
(deftest merge-where-combine-clauses-test
#_(deftest merge-where-combine-clauses-test
(doseq [[k f] {:where where
:having having}]
(testing (str "Combine new " k " clauses into the existing clause when appropriate. (#282)")