Improve readability of informational messages in tests
This commit is contained in:
parent
35fc00d4b3
commit
cfd403301f
2 changed files with 6 additions and 3 deletions
|
|
@ -40,7 +40,8 @@
|
|||
:schema/exception)))
|
||||
data (set (keys (d/datafy con)))]
|
||||
(when-let [diff (seq (set/difference data reference-keys))]
|
||||
(println (:dbtype (db)) :connection (sort diff)))
|
||||
(println (format "%6s :%-10s %s"
|
||||
(:dbtype (db)) "connection" (str (sort diff)))))
|
||||
(is (= reference-keys
|
||||
(set/intersection reference-keys data)))))))
|
||||
|
||||
|
|
@ -87,7 +88,8 @@
|
|||
:rowIdLifetime/exception)))
|
||||
data (set (keys (d/datafy (.getMetaData con))))]
|
||||
(when-let [diff (seq (set/difference data reference-keys))]
|
||||
(println (:dbtype (db)) :db-meta (sort diff)))
|
||||
(println (format "%6s :%-10s %s"
|
||||
(:dbtype (db)) "db-meta" (str (sort diff)))))
|
||||
(is (= reference-keys
|
||||
(set/intersection reference-keys data))))))
|
||||
(testing "nav to catalogs yields object"
|
||||
|
|
|
|||
|
|
@ -72,4 +72,5 @@
|
|||
:sql-params-fn start-fn
|
||||
:execute-fn exec-fn})
|
||||
sql-p)
|
||||
(println (:dbtype (db)) (:calls @timing) "calls took" (long (:total @timing)) "nanoseconds")))
|
||||
(println (format "%6s %d calls took %,10d nanoseconds"
|
||||
(:dbtype (db)) (:calls @timing) (long (:total @timing))))))
|
||||
|
|
|
|||
Loading…
Reference in a new issue