[elephant-cvs] CVS elephant/tests

ieslick ieslick at common-lisp.net
Wed Feb 21 04:47:47 UTC 2007


Update of /project/elephant/cvsroot/elephant/tests
In directory clnet:/tmp/cvs-serv4595/tests

Modified Files:
	testcollections.lisp 
Log Message:
Fix to map-index test; a tweaked version of Robert's symbol/pakage conversion diff and misc changes to serializer

--- /project/elephant/cvsroot/elephant/tests/testcollections.lisp	2007/02/20 20:03:45	1.18
+++ /project/elephant/cvsroot/elephant/tests/testcollections.lisp	2007/02/21 04:47:47	1.19
@@ -320,10 +320,10 @@
 	(map-index #'collector index1 :start 990 :end nil)
 	(map-index #'collector index1 :start 400 :end 410))
       sum)
-  (+ 55 ;; sum 1-10 inclusive
-     4455 ;; sum 690-700 inclusive
-     10945 ;; sum 990 to 1000 inclusive
-     ))
+  #.(+ 49 ;; sum 4-10 inclusive (1-3 removed by here)
+       4455 ;; sum 690-700 inclusive
+       10945 ;; sum 990 to 1000 inclusive
+       ))
 
 (deftest rem-kv
     (with-transaction (:store-controller *store-controller*)




More information about the Elephant-cvs mailing list