diff --git a/ext/dba/dba_tcadb.c b/ext/dba/dba_tcadb.c
index abdfdee3f92..f1644b519bf 100644
--- a/ext/dba/dba_tcadb.c
+++ b/ext/dba/dba_tcadb.c
@@ -77,6 +77,7 @@ DBA_CLOSE_FUNC(tcadb)
 	dba_tcadb_data *dba = info->dbf;
 
 	tcadbclose(dba->tcadb);
+	tcadbdel(dba->tcadb);
 	pefree(dba, info->flags & DBA_PERSISTENT);
 }
 
diff --git a/ext/dba/tests/dba_tcadb.phpt b/ext/dba/tests/dba_tcadb.phpt
index ed27e079c3f..51ed92081c4 100644
--- a/ext/dba/tests/dba_tcadb.phpt
+++ b/ext/dba/tests/dba_tcadb.phpt
@@ -9,6 +9,7 @@ dba
 ?>
 --FILE--
 <?php
+    $handler = 'tcadb';
     $lock_flag = 'l';
     $db_filename = $db_file = __DIR__ .'/test0.tch';
     @unlink($db_filename);