1 files changed, 0 insertions, 211 deletions
diff --git a/bdb/perl.BerkeleyDB/mkconsts b/bdb/perl.BerkeleyDB/mkconsts
deleted file mode 100644
index 24ef4fca7b2..00000000000
--- a/bdb/perl.BerkeleyDB/mkconsts
+++ /dev/null
@@ -1,211 +0,0 @@
-#!/usr/bin/perl
-
-%constants = (
-	# Symbol		   0 = define, 1 = enum
-	DB_AFTER		=> 0,
-	DB_APPEND		=> 0,
-	DB_ARCH_ABS		=> 0,
-	DB_ARCH_DATA		=> 0,
-	DB_ARCH_LOG		=> 0,
-	DB_BEFORE		=> 0,
-	DB_BTREE		=> 1,
-	DB_BTREEMAGIC		=> 0,
-	DB_BTREEOLDVER		=> 0,
-	DB_BTREEVERSION  	=> 0,
-	DB_CHECKPOINT		=> 0,
-	DB_CONSUME		=> 0,
-	DB_CREATE		=> 0,
-	DB_CURLSN		=> 0,
-	DB_CURRENT		=> 0,
-	DB_DBT_MALLOC		=> 0,
-	DB_DBT_PARTIAL		=> 0,
-	DB_DBT_USERMEM		=> 0,
-	DB_DELETED		=> 0,
-	DB_DELIMITER		=> 0,
-	DB_DUP			=> 0,
-	DB_DUPSORT		=> 0,
-	DB_ENV_APPINIT		=> 0,
-	DB_ENV_STANDALONE	=> 0,
-	DB_ENV_THREAD		=> 0,
-	DB_EXCL			=> 0,
-	DB_FILE_ID_LEN		=> 0,
-	DB_FIRST		=> 0,
-	DB_FIXEDLEN		=> 0,
-	DB_FLUSH		=> 0,
-	DB_FORCE		=> 0,
-	DB_GET_BOTH		=> 0,
-	DB_GET_RECNO		=> 0,
-	DB_HASH			=> 1,
-	DB_HASHMAGIC		=> 0,
-	DB_HASHOLDVER		=> 0,
-	DB_HASHVERSION 		=> 0,
-	DB_INCOMPLETE		=> 0,
-	DB_INIT_CDB		=> 0,
-	DB_INIT_LOCK		=> 0,
-	DB_INIT_LOG		=> 0,
-	DB_INIT_MPOOL		=> 0,
-	DB_INIT_TXN		=> 0,
-	DB_JOIN_ITEM		=> 0,
-	DB_KEYEMPTY		=> 0,
-	DB_KEYEXIST		=> 0,
-	DB_KEYFIRST		=> 0,
-	DB_KEYLAST		=> 0,
-	DB_LAST			=> 0,
-	DB_LOCK_CONFLICT	=> 0,
-	DB_LOCK_DEADLOCK	=> 0,
-	DB_LOCK_DEFAULT		=> 0,
-	DB_LOCK_GET		=> 1,
-	DB_LOCK_NORUN		=> 0,
-	DB_LOCK_NOTGRANTED	=> 0,
-	DB_LOCK_NOTHELD		=> 0,
-	DB_LOCK_NOWAIT		=> 0,
-	DB_LOCK_OLDEST		=> 0,
-	DB_LOCK_RANDOM		=> 0,
-	DB_LOCK_RIW_N		=> 0,
-	DB_LOCK_RW_N		=> 0,
-	DB_LOCK_YOUNGEST	=> 0,
-	DB_LOCKMAGIC		=> 0,
-	DB_LOCKVERSION 		=> 0,
-	DB_LOGMAGIC		=> 0,
-	DB_LOGOLDVER  		=> 0,
-	DB_MAX_PAGES		=> 0,
-	DB_MAX_RECORDS		=> 0,
-	DB_MPOOL_CLEAN		=> 0,
-	DB_MPOOL_CREATE		=> 0,
-	DB_MPOOL_DIRTY		=> 0,
-	DB_MPOOL_DISCARD	=> 0,
-	DB_MPOOL_LAST		=> 0,
-	DB_MPOOL_NEW		=> 0,
-	DB_MPOOL_PRIVATE	=> 0,
-	DB_MUTEXDEBUG		=> 0,
-	DB_MUTEXLOCKS		=> 0,
-	DB_NEEDSPLIT		=> 0,
-	DB_NEXT			=> 0,
-	DB_NEXT_DUP		=> 0,
-	DB_NOMMAP		=> 0,
-	DB_NOOVERWRITE		=> 0,
-	DB_NOSYNC		=> 0,
-	DB_NOTFOUND		=> 0,
-	DB_PAD			=> 0,
-	DB_PAGEYIELD		=> 0,
-	DB_POSITION		=> 0,
-	DB_PREV			=> 0,
-	DB_PRIVATE		=> 0,
-	DB_QUEUE		=> 1,
-	DB_RDONLY		=> 0,
-	DB_RECNO		=> 1,
-	DB_RECNUM		=> 0,
-	DB_RECORDCOUNT		=> 0,
-	DB_RECOVER		=> 0,
-	DB_RECOVER_FATAL	=> 0,
-	DB_REGISTERED		=> 0,
-	DB_RENUMBER		=> 0,
-	DB_RMW			=> 0,
-	DB_RUNRECOVERY		=> 0,
-	DB_SEQUENTIAL		=> 0,
-	DB_SET			=> 0,
-	DB_SET_RANGE		=> 0,
-	DB_SET_RECNO		=> 0,
-	DB_SNAPSHOT		=> 0,
-	DB_SWAPBYTES		=> 0,
-	DB_TEMPORARY		=> 0,
-	DB_THREAD		=> 0,
-	DB_TRUNCATE		=> 0,
-	DB_TXN_ABORT		=> 1,
-	DB_TXN_BACKWARD_ROLL	=> 1,
-	DB_TXN_CKP		=> 0,
-	DB_TXN_FORWARD_ROLL	=> 1,
-	DB_TXN_LOCK_2PL		=> 0,
-	DB_TXN_LOCK_MASK	=> 0,
-	DB_TXN_LOCK_OPTIMISTIC	=> 0,
-	DB_TXN_LOG_MASK		=> 0,
-	DB_TXN_LOG_REDO		=> 0,
-	DB_TXN_LOG_UNDO		=> 0,
-	DB_TXN_LOG_UNDOREDO	=> 0,
-	DB_TXN_NOSYNC		=> 0,
-	DB_TXN_NOWAIT		=> 0,
-	DB_TXN_SYNC		=> 0,
-	DB_TXN_OPENFILES	=> 1,
-	DB_TXN_REDO		=> 0,
-	DB_TXN_UNDO		=> 0,
-	DB_TXNMAGIC		=> 0,
-	DB_TXNVERSION		=> 0,
-	DB_TXN_LOCK_OPTIMIST	=> 0,
-	DB_UNKNOWN		=> 1,
-	DB_USE_ENVIRON		=> 0,
-	DB_USE_ENVIRON_ROOT	=> 0,
-	DB_VERSION_MAJOR	=> 0,
-	DB_VERSION_MINOR	=> 0,
-	DB_VERSION_PATCH	=> 0,
-	DB_WRITECURSOR		=> 0,
-	) ;
-
-sub OutputXS
-{
-    # skip to the marker
-    if (0) {
-        while (<>)
-        {
-            last if /^MARKER/ ;
-            print ;
-        }
-    }
-    
-    foreach my $key (sort keys %constants)
-    {
-        my $isEnum = $constants{$key} ;
-
-	if ($isEnum) {
-            print <<EOM
-        if (strEQ(name, "$key"))
-            return $key;
-EOM
-	}
-	else
-	{
-            print <<EOM
-        if (strEQ(name, "$key"))
-#ifdef $key
-            return $key;
-#else
-            goto not_there;
-#endif
-EOM
-	}
-    
-    }
-    
-    if (0) {
-        while (<>)
-        {
-	    print ;
-        }
-    }
-}
-
-sub OutputPM
-{
-    # skip to the marker
-    if (0) {
-        while (<>)
-        {
-            last if /^MARKER/ ;
-            print ;
-        }
-    }
-    
-    foreach my $key (sort keys %constants)
-    {
-	print "\t$key\n";
-    }
-    
-    if (0) {
-        while (<>)
-        {
-	    print ;
-        }
-    }
-}
-
-OutputXS() if $ARGV[0] =~ /xs/i ;
-OutputPM() if $ARGV[0] =~ /pm/i ;