diff options
Diffstat (limited to 'ext/ODBM_File')
| -rw-r--r-- | ext/ODBM_File/ODBM_File.xs | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/ext/ODBM_File/ODBM_File.xs b/ext/ODBM_File/ODBM_File.xs index 2510d5e4f3..8faf4a92d6 100644 --- a/ext/ODBM_File/ODBM_File.xs +++ b/ext/ODBM_File/ODBM_File.xs @@ -122,6 +122,14 @@ DESTROY(db) CODE: dbmrefcnt--; dbmclose(); + if (db->filter_fetch_key) + SvREFCNT_dec(db->filter_fetch_key) ; + if (db->filter_store_key) + SvREFCNT_dec(db->filter_store_key) ; + if (db->filter_fetch_value) + SvREFCNT_dec(db->filter_fetch_value) ; + if (db->filter_store_value) + SvREFCNT_dec(db->filter_store_value) ; safefree(db); datum_value |