From 76b23ebfd5384033ecefd8bed4babfeb12d103e9 Mon Sep 17 00:00:00 2001 From: minima Date: Sun, 29 Sep 2002 17:53:40 +0000 Subject: [PATCH] increase LRU cache sizes --- perl/DXUser.pm | 2 +- perl/Prefix.pm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/perl/DXUser.pm b/perl/DXUser.pm index 80a9b641..6b85afb3 100644 --- a/perl/DXUser.pm +++ b/perl/DXUser.pm @@ -32,7 +32,7 @@ $dbm = undef; $filename = undef; $lastoperinterval = 60*24*60*60; $lasttime = 0; -$lrusize = 500; +$lrusize = 2000; # hash of valid elements and a simple prompt %valid = ( diff --git a/perl/Prefix.pm b/perl/Prefix.pm index a07ebdbd..10559711 100644 --- a/perl/Prefix.pm +++ b/perl/Prefix.pm @@ -30,7 +30,7 @@ $db = undef; # the DB_File handle %prefix_loc = (); # the meat of the info %pre = (); # the prefix list $hits = $misses = $matchtotal = 1; # cache stats -$lrusize = 1000; # size of prefix LRU cache +$lrusize = 2000; # size of prefix LRU cache $lru = LRU->newbase('Prefix', $lrusize); -- 2.43.0