[Pkg-gnupg-commit] [gnupg2] 75/160: gpgscm: Free memory backing string ports.

[Daniel Kahn Gillmor]

This is an automated email from the git hooks/post-receive script.

dkg pushed a commit to branch upstream
in repository gnupg2.

commit 599ad21104e622acbd1230d90d6a23abf9145499
Author: Justus Winter <justus at g10code.com>
Date:   Thu Jun 30 12:35:27 2016 +0200

    gpgscm: Free memory backing string ports.
    
    * tests/gpgscm/scheme.c (finalize_cell): Free memory backing string
    ports.
    
    Signed-off-by: Justus Winter <justus at g10code.com>
---
 tests/gpgscm/scheme.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/tests/gpgscm/scheme.c b/tests/gpgscm/scheme.c
index 4c28230..5f2f205 100644
--- a/tests/gpgscm/scheme.c
+++ b/tests/gpgscm/scheme.c
@@ -1390,6 +1390,8 @@ static void finalize_cell(scheme *sc, pointer a) {
     if(a->_object._port->kind&port_file
        && a->_object._port->rep.stdio.closeit) {
       port_close(sc,a,port_input|port_output);
+    } else if (a->_object._port->kind & port_srfi6) {
+      sc->free(a->_object._port->rep.string.start);
     }
     sc->free(a->_object._port);
   } else if(is_foreign_object(a)) {

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-gnupg/gnupg2.git