diff options
| author | Tom Lane <tgl@sss.pgh.pa.us> | 2018-04-26 14:47:16 -0400 |
|---|---|---|
| committer | Tom Lane <tgl@sss.pgh.pa.us> | 2018-04-26 14:47:16 -0400 |
| commit | bdf46af748d0f15f257c99bf06e9e25aba6a24f9 (patch) | |
| tree | 3637d69ad413fdc23098cc2cf94b2cd57fd44dab /contrib/jsonb_plperl/jsonb_plperl.c | |
| parent | f83bf385c1dad4964e0d899174989a1668536182 (diff) | |
| download | postgresql-bdf46af748d0f15f257c99bf06e9e25aba6a24f9.tar.gz postgresql-bdf46af748d0f15f257c99bf06e9e25aba6a24f9.zip | |
Post-feature-freeze pgindent run.
Discussion: https://postgr.es/m/15719.1523984266@sss.pgh.pa.us
Diffstat (limited to 'contrib/jsonb_plperl/jsonb_plperl.c')
| -rw-r--r-- | contrib/jsonb_plperl/jsonb_plperl.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/contrib/jsonb_plperl/jsonb_plperl.c b/contrib/jsonb_plperl/jsonb_plperl.c index 837bae2ab50..cde38b295c5 100644 --- a/contrib/jsonb_plperl/jsonb_plperl.c +++ b/contrib/jsonb_plperl/jsonb_plperl.c @@ -18,7 +18,7 @@ static SV *Jsonb_to_SV(JsonbContainer *jsonb); static JsonbValue *SV_to_JsonbValue(SV *obj, JsonbParseState **ps, bool is_elem); -static SV * +static SV * JsonbValue_to_SV(JsonbValue *jbv) { dTHX; @@ -33,6 +33,7 @@ JsonbValue_to_SV(JsonbValue *jbv) char *str = DatumGetCString(DirectFunctionCall1(numeric_out, NumericGetDatum(jbv->val.numeric))); SV *result = newSVnv(SvNV(cstr2sv(str))); + pfree(str); return result; } @@ -42,6 +43,7 @@ JsonbValue_to_SV(JsonbValue *jbv) char *str = pnstrdup(jbv->val.string.val, jbv->val.string.len); SV *result = cstr2sv(str); + pfree(str); return result; } |