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

Implement returning (postgres)

Browse source
This commit is contained in:
Sean Corfield 2020-09-26 00:39:54 -07:00
parent 002523bb8c
commit 9154d73678
1 changed files with 9 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
src/honey/sql.cljc
View file

@ -20,7 +20,8 @@
:columns :set :from :columns :set :from
:join :left-join :right-join :inner-join :outer-join :full-join :join :left-join :right-join :inner-join :outer-join :full-join
:cross-join :cross-join
:where :group-by :having :order-by :limit :offset :values]) :where :group-by :having :order-by :limit :offset :values
:returning])
(defn- add-clause-before (defn- add-clause-before
"Low-level helper just to insert a new clause." "Low-level helper just to insert a new clause."
@ -339,7 +340,8 @@
:order-by #'format-order-by :order-by #'format-order-by
:limit #'format-on-expr :limit #'format-on-expr
:offset #'format-on-expr :offset #'format-on-expr
:values #'format-values})) :values #'format-values
:returning #'format-selects}))
(assert (= (set @base-clause-order) (assert (= (set @base-clause-order)
(set @current-clause-order) (set @current-clause-order)
@ -378,6 +380,11 @@
:lock 215 :lock 215
;:values 220 ;:values 220
:query-values 230}) :query-values 230})
;; :on-conflict -- https://www.postgresqltutorial.com/postgresql-upsert/
;; :on-constraint (part of :on-conflict)
;; :do-update-set
;; ;do-nothing
;:returning
(defn- format-dsl [x & [{:keys [aliased? nested? pretty?]}]] (defn- format-dsl [x & [{:keys [aliased? nested? pretty?]}]]
(let [[sqls params leftover] (let [[sqls params leftover]