diff --git a/acb_hypgeom/erf.c b/acb_hypgeom/erf.c index 7a7ff953..98984a3b 100644 --- a/acb_hypgeom/erf.c +++ b/acb_hypgeom/erf.c @@ -79,7 +79,7 @@ acb_hypgeom_erf_1f1b(acb_t res, const acb_t z, slong prec) acb_clear(a); acb_clear(b); acb_clear(t); - acb_clear (w); + acb_clear(w); } void diff --git a/acb_poly/div_root.c b/acb_poly/div_root.c index 231ff57a..6e96dafc 100644 --- a/acb_poly/div_root.c +++ b/acb_poly/div_root.c @@ -43,4 +43,7 @@ _acb_poly_div_root(acb_ptr Q, acb_t R, acb_srcptr A, acb_mul(r, r, c, prec); acb_add(R, r, t, prec); + + acb_clear(r); + acb_clear(t); } diff --git a/arb/test/t-intersection.c b/arb/test/t-intersection.c index dd8a68f4..b52d9987 100644 --- a/arb/test/t-intersection.c +++ b/arb/test/t-intersection.c @@ -189,6 +189,7 @@ int main() arb_clear(xy); arb_clear(yz); arb_clear(y); + arb_clear(v); arb_clear(w); } diff --git a/arb_poly/div_root.c b/arb_poly/div_root.c index 0ab2b8fa..5b72fb4c 100644 --- a/arb_poly/div_root.c +++ b/arb_poly/div_root.c @@ -43,4 +43,8 @@ _arb_poly_div_root(arb_ptr Q, arb_t R, arb_srcptr A, arb_mul(r, r, c, prec); arb_add(R, r, t, prec); + + arb_clear(r); + arb_clear(t); } + diff --git a/arb_poly/zeta_series.c b/arb_poly/zeta_series.c index 162ca278..c8d820c2 100644 --- a/arb_poly/zeta_series.c +++ b/arb_poly/zeta_series.c @@ -140,8 +140,8 @@ _arb_poly_zeta_series(arb_ptr res, arb_srcptr h, slong hlen, const arb_t a, int _acb_vec_clear(z, len); _arb_vec_clear(t, len); _arb_vec_clear(u, len); - acb_init(cs); - acb_init(ca); + acb_clear(cs); + acb_clear(ca); } void