greg/mentat
1
0
Fork 0
Code Issues 294 Pull requests Packages Projects Releases 9 Wiki Activity

Review comment: args -> inputs.

Browse source
This commit is contained in:
Richard Newman 2016-09-02 16:23:30 -07:00
parent 1197764949
commit 5424e61be4
2 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/datomish/db.cljc
View file

@ -644,14 +644,14 @@
Returns a transduced channel of [result err] pairs.
Closes the channel when fully consumed."
[db find options]
(let [{:keys [limit order-by args]} options
(let [{:keys [limit order-by inputs]} options
parsed (query/parse find)
context (-> db
query-context
(query/options-into-context limit order-by)
(query/find-into-context parsed))
row-pair-transducer (projection/row-pair-transducer context)
sql (query/context->sql-string context args)
sql (query/context->sql-string context inputs)
chan (chan 50 row-pair-transducer)]
(s/<?all-rows (.-sqlite-connection db) sql chan)

4
test/datomish/tofinoish_test.cljc
View file

@ -302,7 +302,7 @@
:where where}
{:limit limit
:order-by [[:_max_time :desc]]
:args {:since since}}))]
:inputs {:since since}}))]
(map (fn [[uri title lastVisited]]
{:uri uri :title title :lastVisited lastVisited})
rows)))))
@ -318,7 +318,7 @@
:where
[?page :page/url ?url]
[(get-else $ ?page :page/title "") ?title]]
{:args {:url url}}))))))
{:inputs {:url url}}))))))
;; Ensure that we can grow the schema over time.
(deftest-db test-schema-evolution conn