summaryrefslogtreecommitdiff
path: root/ext/GDBM_File
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2000-02-15 05:17:56 +0000
committerGurusamy Sarathy <gsar@cpan.org>2000-02-15 05:17:56 +0000
commiteb99164fe573f928a1e23c686cddfafdbe9ae10a (patch)
treeeae8bb5b4209240a71a8c3f8e94c84498fcfb101 /ext/GDBM_File
parent850fabdf2ccd0a80b987899ff0014695459be38a (diff)
downloadperl-eb99164fe573f928a1e23c686cddfafdbe9ae10a.tar.gz
fix leaks in *DBM_File; safemalloc()ed things need to be freed with
safefree() rather than Safefree() p4raw-id: //depot/perl@5091
Diffstat (limited to 'ext/GDBM_File')
-rw-r--r--ext/GDBM_File/GDBM_File.xs1
1 files changed, 1 insertions, 0 deletions
diff --git a/ext/GDBM_File/GDBM_File.xs b/ext/GDBM_File/GDBM_File.xs
index be1817bba2..870f056c9b 100644
--- a/ext/GDBM_File/GDBM_File.xs
+++ b/ext/GDBM_File/GDBM_File.xs
@@ -236,6 +236,7 @@ gdbm_DESTROY(db)
GDBM_File db
CODE:
gdbm_close(db);
+ safefree(db);
#define gdbm_FETCH(db,key) gdbm_fetch(db->dbp,key)
datum_value