luciano/honeysql
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Pass strings to strop

Browse source 
Converting Character->String involves additional allocations. Passing literal
strings avoids that.
This commit is contained in:
Oleksandr Yakushev 2024-09-27 09:58:01 +03:00
parent f31533d8d6
commit ac136dab08
1 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
src/honey/sql.cljc
View file

@ -110,16 +110,16 @@
(reduce-kv (fn [m k v] (reduce-kv (fn [m k v]
(assoc m k (assoc v :dialect k))) (assoc m k (assoc v :dialect k)))
{} {}
{:ansi {:quote #(strop \" % \")} {:ansi {:quote #(strop "\"" % "\"")}
:sqlserver {:quote #(strop \[ % \])} :sqlserver {:quote #(strop "[" % "]")}
:mysql {:quote #(strop \` % \`) :mysql {:quote #(strop "`" % "`")
:clause-order-fn :clause-order-fn
#(add-clause-before % :set :where)} #(add-clause-before % :set :where)}
:nrql {:quote #(strop \` % \`) :nrql {:quote #(strop "`" % "`")
:col-fn #(if (keyword? %) (subs (str %) 1) (str %)) :col-fn #(if (keyword? %) (subs (str %) 1) (str %))
:parts-fn vector} :parts-fn vector}
:oracle {:quote #(strop \" % \") :as false} :oracle {:quote #(strop "\"" % "\"") :as false}
:xtdb {:quote #(strop \" % \") :xtdb {:quote #(strop "\"" % "\"")
:col-fn #(if (keyword? %) (subs (str %) 1) (str %)) :col-fn #(if (keyword? %) (subs (str %) 1) (str %))
:parts-fn #(str/split % #"\.")}}))) :parts-fn #(str/split % #"\.")}})))