couchdb-commits mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From kocol...@apache.org
Subject svn commit: r919447 - /couchdb/trunk/test/etap/070-couch-db.t
Date Fri, 05 Mar 2010 15:24:57 GMT
Author: kocolosk
Date: Fri Mar  5 15:24:57 2010
New Revision: 919447

URL: http://svn.apache.org/viewvc?rev=919447&view=rev
Log:
faster LRU test in 070-couch-db.t

Modified:
    couchdb/trunk/test/etap/070-couch-db.t

Modified: couchdb/trunk/test/etap/070-couch-db.t
URL: http://svn.apache.org/viewvc/couchdb/trunk/test/etap/070-couch-db.t?rev=919447&r1=919446&r2=919447&view=diff
==============================================================================
--- couchdb/trunk/test/etap/070-couch-db.t (original)
+++ couchdb/trunk/test/etap/070-couch-db.t Fri Mar  5 15:24:57 2010
@@ -41,6 +41,7 @@
     etap:ok(not lists:member(<<"etap-test-db">>, AllDbs2),
         "Database was deleted."),
 
+    gen_server:call(couch_server, {set_max_dbs_open, 3}),
     MkDbName = fun(Int) -> list_to_binary("lru-" ++ integer_to_list(Int)) end,
 
     lists:foreach(fun(Int) ->
@@ -51,24 +52,24 @@
         end,
         {ok, Db} = couch_db:create(MkDbName(Int), []),
         ok = couch_db:close(Db)
-    end, lists:seq(1, 200)),
+    end, lists:seq(1, 6)),
 
     {ok, AllDbs3} = couch_server:all_databases(),
     NumCreated = lists:foldl(fun(Int, Acc) ->
         true = lists:member(MkDbName(Int), AllDbs3),
         Acc+1
-    end, 0, lists:seq(1, 200)),
-    etap:is(200, NumCreated, "Created all databases."),
+    end, 0, lists:seq(1, 6)),
+    etap:is(6, NumCreated, "Created all databases."),
 
     lists:foreach(fun(Int) ->
         ok = couch_server:delete(MkDbName(Int), [])
-    end, lists:seq(1, 200)),
+    end, lists:seq(1, 6)),
 
     {ok, AllDbs4} = couch_server:all_databases(),
     NumDeleted = lists:foldl(fun(Int, Acc) ->
         false = lists:member(MkDbName(Int), AllDbs4),
         Acc+1
-    end, 0, lists:seq(1, 200)),
-    etap:is(200, NumDeleted, "Deleted all databases."),
+    end, 0, lists:seq(1, 6)),
+    etap:is(6, NumDeleted, "Deleted all databases."),
 
     ok.



Mime
View raw message