tests/pkcs11/long-label: fix a leak

Fixes: #1799
Signed-off-by: Alexander Sosedkin <asosedkin@redhat.com>

diff --git a/tests/pkcs11/long-label.c b/tests/pkcs11/long-label.c
index a70bc97284585be1c5edf73aa773ca679dce8425..f5c273f085c7806ed7b66b456bcdd47e40c16ead 100644 (file)
--- a/tests/pkcs11/long-label.c
+++ b/tests/pkcs11/long-label.c
@@ -101,19 +101,20 @@ static void test(const char *provider)
                fail("gnutls_pkcs11_token_init: %s\n", gnutls_strerror(ret));
        }
 
+       char *url = NULL;
        for (i = 0;; i++) {
-               char *url = NULL;
-
                ret = gnutls_pkcs11_token_get_url(i, 0, &url);
                if (ret < 0)
                        break;
                if (strstr(url,
                           "token=this%20is%20a%20very%20long%20label%20whose"))
                        break;
+               gnutls_free(url);
        }
        if (ret < 0)
                fail("gnutls_pkcs11_token_get_url: %s\n", gnutls_strerror(ret));
 
+       gnutls_free(url);
        gnutls_pkcs11_deinit();
 }