Pg: Set appropriate quote_identifier for $conn->Q()

This commit is contained in:
Yorhel 2025-05-22 09:53:41 +02:00
parent 81a3d3c608
commit 2083ab2a6f
3 changed files with 27 additions and 2 deletions

12
FU.xs
View file

@ -217,6 +217,12 @@ void query_trace(fupg_conn *c, SV *cb)
SvGETMAGIC(cb);
c->trace = SvOK(cb) ? SvREFCNT_inc(cb) : NULL;
void conn(fupg_conn *c)
CODE:
ST(0) = sv_newmortal();
sv_setrv_inc(ST(0), c->self);
sv_bless(ST(0), gv_stashpv("FU::Pg::conn", 0));
void status(fupg_conn *c)
CODE:
ST(0) = sv_2mortal(newSVpv(fupg_conn_status(c), 0));
@ -317,6 +323,12 @@ void cache(fupg_txn *x, ...)
CODE:
FUPG_STFLAGS;
void conn(fupg_txn *t)
CODE:
ST(0) = sv_newmortal();
sv_setrv_inc(ST(0), t->conn->self);
sv_bless(ST(0), gv_stashpv("FU::Pg::conn", 0));
void status(fupg_txn *t)
CODE:
ST(0) = sv_2mortal(newSVpv(fupg_txn_status(t), 0));