summaryrefslogtreecommitdiff
path: root/ext
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2000-02-15 05:24:02 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2000-02-15 05:24:02 +0000
commit71978f00f3194daa9ba6ff0fa01f4fc3b62ff703 (patch)
treef0a1ddc0cd0e120ad945b8533b08ecba0ff015f9 /ext
parentf7dd4e7f9162489ccd596581ee29f9a160583580 (diff)
parenteb99164fe573f928a1e23c686cddfafdbe9ae10a (diff)
downloadperl-71978f00f3194daa9ba6ff0fa01f4fc3b62ff703.tar.gz
Integrate with Sarathy.
p4raw-id: //depot/cfgperl@5093
Diffstat (limited to 'ext')
-rw-r--r--ext/DB_File/DB_File.xs2
-rw-r--r--ext/GDBM_File/GDBM_File.xs1
-rw-r--r--ext/NDBM_File/NDBM_File.xs1
-rw-r--r--ext/ODBM_File/ODBM_File.xs1
-rw-r--r--ext/SDBM_File/SDBM_File.xs2
5 files changed, 5 insertions, 2 deletions
diff --git a/ext/DB_File/DB_File.xs b/ext/DB_File/DB_File.xs
index 7bc2491cb4..2b76bab722 100644
--- a/ext/DB_File/DB_File.xs
+++ b/ext/DB_File/DB_File.xs
@@ -1586,7 +1586,7 @@ db_DESTROY(db)
if (db->filter_store_value)
SvREFCNT_dec(db->filter_store_value) ;
#endif /* DBM_FILTERING */
- Safefree(db) ;
+ safefree(db) ;
#ifdef DB_VERSION_MAJOR
if (RETVAL > 0)
RETVAL = -1 ;
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
diff --git a/ext/NDBM_File/NDBM_File.xs b/ext/NDBM_File/NDBM_File.xs
index 29cc288769..49a1db5e56 100644
--- a/ext/NDBM_File/NDBM_File.xs
+++ b/ext/NDBM_File/NDBM_File.xs
@@ -63,6 +63,7 @@ ndbm_DESTROY(db)
NDBM_File db
CODE:
dbm_close(db->dbp);
+ safefree(db);
#define ndbm_FETCH(db,key) dbm_fetch(db->dbp,key)
datum_value
diff --git a/ext/ODBM_File/ODBM_File.xs b/ext/ODBM_File/ODBM_File.xs
index 7601c3433b..e263dfbc62 100644
--- a/ext/ODBM_File/ODBM_File.xs
+++ b/ext/ODBM_File/ODBM_File.xs
@@ -120,6 +120,7 @@ DESTROY(db)
CODE:
dbmrefcnt--;
dbmclose();
+ safefree(db);
datum_value
odbm_FETCH(db, key)
diff --git a/ext/SDBM_File/SDBM_File.xs b/ext/SDBM_File/SDBM_File.xs
index ee672ca915..a4b90451a9 100644
--- a/ext/SDBM_File/SDBM_File.xs
+++ b/ext/SDBM_File/SDBM_File.xs
@@ -80,7 +80,7 @@ sdbm_DESTROY(db)
SvREFCNT_dec(db->filter_fetch_value) ;
if (db->filter_store_value)
SvREFCNT_dec(db->filter_store_value) ;
- Safefree(db) ;
+ safefree(db) ;
datum_value
sdbm_FETCH(db, key)