do-postgresql-statement ( statement -- res )

Vocabulary

db.postgresql.lib

Inputs

statement

an object

Outputs

res

an object

Definition

USING: accessors db db.postgresql.ffi kernel namespaces ;

IN: db.postgresql.lib

: do-postgresql-statement ( statement -- res )
    db-connection get handle>> swap sql>> PQexec
    dup postgresql-result-ok?
    [ [ postgresql-result-error-message ] [ PQclear ] bi throw ]
    unless ;