lang.model.spec-postgres.common — xyz.zcaudate/postgres 4.1.8

+pg-jsonb-shapes+ clj

Explicit JSONB shapes accepted by deftype column metadata.

+pg-jsonb-types+ clj

Types and aliases emitted as PostgreSQL jsonb.

+pg-query-alias+ clj

+pg-type-alias+ clj

block-case-block clj

(block-case-block value & args)

emits case block

block-do-block clj

(block-do-block form)

initates do block

block-do-suppress clj

(block-do-suppress form)

initates suppress block

block-loop-block clj

(block-loop-block _ & forms)

emits loop block

block-while-block clj

(block-while-block condition & forms)

emits while block

pg-array clj

(pg-array [_ & arr] grammar mopts)

creates an array object

(common/pg-array '(array 1 2 3 4 5) g/+grammar+ {}) => "ARRAY[1,2,3,4,5]"

pg-base-token clj

(pg-base-token tok schtok)

creates a base token

pg-current-module-link? clj

(pg-current-module-link? current-module {:keys [module]})

checks whether a link points to the active module

pg-defblock clj

(pg-defblock [_ sym array])

creates generic defblock

pg-defenum clj

(pg-defenum [_ sym array])

defenum block

pg-defindex clj

(pg-defindex [_ sym doc? attr? [table & cols] & body :as form])

defindex block

pg-defpolicy clj

(pg-defpolicy [_ sym doc? attr? [table] body :as form])

defpolicy block

pg-defpublication clj

(pg-defpublication [_ sym doc? attr? args body :as form])

defpublication block

pg-defsubscription clj

(pg-defsubscription [_ sym doc? attr? [conn pub] body :as form])

defsubscription block

pg-deftrigger clj

(pg-deftrigger [_ sym doc? attr? [table] body :as form])

TODO

pg-deftype-ref-name clj

(pg-deftype-ref-name col {:keys [raw]})

gets the ref name

pg-do-assert clj

(pg-do-assert [_ chk [tag data]] grammar mopts)

creates an assert form

pg-entry-literal clj

(pg-entry-literal entry)

creates an entry literal

pg-entry-token clj

(pg-entry-token entry)

gets the entry token

pg-format clj

(pg-format [op sym & body])

formats a form, extracting static components

pg-full-token clj

(pg-full-token tok schtok)

creates a full token (for types and enums)

pg-hydrate clj

(pg-hydrate [op sym & body] grammar mopts)

hydrate function for top level entries

pg-hydrate-module-static clj

(pg-hydrate-module-static module)

gets the static module

pg-invoke-typecast clj

(pg-invoke-typecast form grammar mopts)

emits a typecast call

pg-jsonb-type? clj

(pg-jsonb-type? type)

Returns true when a deftype column type emits PostgreSQL jsonb.

pg-link-symbol clj

(pg-link-symbol {:keys [module id]})

creates a fully qualified symbol for a link

pg-linked clj

(pg-linked sym grammar opts)

emits the linked symbol

pg-linked-token clj

(pg-linked-token sym mopts)

gets the linked token given symbol

pg-map clj

(pg-map m grammar mopts)

creates a postgres json object

pg-policy-format clj

(pg-policy-format form)

TODO

pg-publication-format clj

(pg-publication-format form)

formats publication

pg-resolve-entry clj

(pg-resolve-entry link {:keys [book snapshot module lang] :as _mopts})

resolves a postgres link against the live module first, then the snapshot book, then vars

pg-set clj

(pg-set e grammar mopts)

makes a set object

pg-string clj

(pg-string s)

constructs a pg string

pg-subscription-format clj

(pg-subscription-format form)

formats subscription

pg-sym-meta clj

(pg-sym-meta sym)

returns the sym meta

pg-type-alias clj

(pg-type-alias type)

gets the type alias

pg-typecast clj

(pg-typecast [_ sym & args] grammar mopts)

creates a typecast

pg-uuid clj

(pg-uuid u)

constructs a pg uuid

validate-pg-jsonb-metadata clj

(validate-pg-jsonb-metadata {:keys [type shape] :as attrs})

Validates JSONB shape metadata without changing the emitted SQL type.

:map and :array remain aliases for PostgreSQL jsonb. The metadata is only consumed by typed parsers and downstream schema conversion.