From: antirez <antirez@gmail.com>
Date: Mon, 1 Mar 2010 21:15:49 +0000 (+0100)
Subject: Swappability bug due to a typo fixed thanks to code review by Felix Geisendörfer... 
X-Git-Url: https://git.saurik.com/redis.git/commitdiff_plain/c8c72447f6c9e999a17d37338e9d3460f45722f4

Swappability bug due to a typo fixed thanks to code review by Felix Geisendörfer @felixge
---

diff --git a/redis.c b/redis.c
index b7fd3b5b..52ada380 100644
--- a/redis.c
+++ b/redis.c
@@ -7560,7 +7560,7 @@ static double computeObjectSwappability(robj *o) {
         }
         break;
     }
-    return (double)asize*log(1+asize);
+    return (double)age*log(1+asize);
 }
 
 /* Try to swap an object that's a good candidate for swapping.
diff --git a/test-redis.tcl b/test-redis.tcl
index 9b546722..36b82e38 100644
--- a/test-redis.tcl
+++ b/test-redis.tcl
@@ -952,7 +952,6 @@ proc main {server port} {
         $r sort tosort {DESC}
     } [lsort -decreasing -integer $res]
 
-while 1 {
     test {SORT speed, sorting 10000 elements list using BY, 100 times} {
         set start [clock clicks -milliseconds]
         for {set i 0} {$i < 100} {incr i} {
@@ -963,7 +962,7 @@ while 1 {
         flush stdout
         format {}
     } {}
-}
+
     test {SORT speed, sorting 10000 elements list directly, 100 times} {
         set start [clock clicks -milliseconds]
         for {set i 0} {$i < 100} {incr i} {