1 files changed, 0 insertions, 44 deletions
diff --git a/contrib/perl5/ext/DB_File/typemap b/contrib/perl5/ext/DB_File/typemap
deleted file mode 100644
index 55439ee..0000000
--- a/contrib/perl5/ext/DB_File/typemap
+++ /dev/null
@@ -1,44 +0,0 @@
-# typemap for Perl 5 interface to Berkeley 
-#
-# written by Paul Marquess <Paul.Marquess@btinternet.com>
-# last modified 10th December 2000
-# version 1.74
-#
-#################################### DB SECTION
-#
-# 
-
-u_int			T_U_INT
-DB_File			T_PTROBJ
-DBT			T_dbtdatum
-DBTKEY			T_dbtkeydatum
-
-INPUT
-T_dbtkeydatum
-	ckFilter($arg, filter_store_key, \"filter_store_key\");
-	DBT_clear($var) ;
-	if (db->type != DB_RECNO) {
-	    $var.data = SvPV($arg, PL_na);
-	    $var.size = (int)PL_na;
-	}
-	else {
-	    Value =  GetRecnoKey(aTHX_ db, SvIV($arg)) ; 
-	    $var.data = & Value; 
-	    $var.size = (int)sizeof(recno_t);
-	}
-T_dbtdatum
-	ckFilter($arg, filter_store_value, \"filter_store_value\");
-	DBT_clear($var) ;
-	if (SvOK($arg)) {
-	    $var.data = SvPV($arg, PL_na);
-	    $var.size = (int)PL_na;
-	}
-
-OUTPUT
-
-T_dbtkeydatum
-	OutputKey($arg, $var)
-T_dbtdatum
-	OutputValue($arg, $var)
-T_PTROBJ
-        sv_setref_pv($arg, dbtype, (void*)$var);