Skip to content

Instantly share code, notes, and snippets.

@cmoore
Created August 14, 2012 14:43
Show Gist options
  • Save cmoore/3349915 to your computer and use it in GitHub Desktop.
Save cmoore/3349915 to your computer and use it in GitHub Desktop.
CL-MONGO-TEST> (quick-test)
---- starting test of package : { test counting documents } ---------------
testing counting : client count : 43 -- server count 43.0d0
---- finished test of package { test counting documents } sucessfully ------
---- starting test of package : { finding documents by field } ---------------
findOne is default : 1
limit == 0 returns all 43 : 43
---- finished test of package { finding documents by field } sucessfully ------
---- starting test of package : { deleting documents } ---------------
---- finished test of package { deleting documents } sucessfully ------
---- starting test of package : { finding documents } ---------------
---- finished test of package { finding documents } sucessfully ------
---- starting test of package : { finding documents with a selector } ---------------
elems with key k : (56.0d0 57.0d0 58.0d0 59.0d0 60.0d0 61.0d0 62.0d0
63.0d0 64.0d0 65.0d0 66.0d0 67.0d0 68.0d0 69.0d0
70.0d0 71.0d0 72.0d0 73.0d0 74.0d0 75.0d0 76.0d0
77.0d0 78.0d0 79.0d0 80.0d0 81.0d0 82.0d0 83.0d0
84.0d0 85.0d0 86.0d0 87.0d0 88.0d0 89.0d0 90.0d0
91.0d0 92.0d0 93.0d0 94.0d0 95.0d0 96.0d0 97.0d0
98.0d0)
elems with key l : (-9.0d0 -8.0d0 -7.0d0 -6.0d0 -5.0d0 -4.0d0 -3.0d0
-2.0d0 -1.0d0 0.0d0 1.0d0 2.0d0 3.0d0 4.0d0 5.0d0
6.0d0 7.0d0 8.0d0 9.0d0 10.0d0 11.0d0 12.0d0 13.0d0
14.0d0 15.0d0 16.0d0 17.0d0 18.0d0 19.0d0 20.0d0
21.0d0 22.0d0 23.0d0 24.0d0 25.0d0 26.0d0 27.0d0
28.0d0 29.0d0 30.0d0 31.0d0 32.0d0 33.0d0)
elems with key 'index-this' (s/b none) : (NIL NIL NIL NIL NIL NIL NIL NIL
NIL NIL NIL NIL NIL NIL NIL NIL
NIL NIL NIL NIL NIL NIL NIL NIL
NIL NIL NIL NIL NIL NIL NIL NIL
NIL NIL NIL NIL NIL NIL NIL NIL
NIL NIL NIL)
elems with key k (s/b none !) : (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL
NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL
NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL
NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL
NIL NIL NIL)
elems with key l (s/b none !) : (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL
NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL
NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL
NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL
NIL NIL NIL)
elems with key index-this : (0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
18 19 20 21 22 23 24 25 26 27 28 29 30 31 32
33 34 35 36 37 38 39 40 41 42)
---- finished test of package { finding documents with a selector } sucessfully ------
---- starting test of package : { sorting documents by field } ---------------
------------------------------------------------------------
sorting test : printing out server side sorted arrays; no test yet ..
elem : (56.0d0 57.0d0 58.0d0 59.0d0 60.0d0 61.0d0 62.0d0 63.0d0 64.0d0
65.0d0 66.0d0 67.0d0 68.0d0 69.0d0 70.0d0 71.0d0 72.0d0 73.0d0
74.0d0 75.0d0 76.0d0 77.0d0 78.0d0 79.0d0 80.0d0 81.0d0 82.0d0
83.0d0 84.0d0 85.0d0 86.0d0 87.0d0 88.0d0 89.0d0 90.0d0 91.0d0
92.0d0 93.0d0 94.0d0 95.0d0 96.0d0 97.0d0 98.0d0)
elem : (98.0d0 97.0d0 96.0d0 95.0d0 94.0d0 93.0d0 92.0d0 91.0d0 90.0d0
89.0d0 88.0d0 87.0d0 86.0d0 85.0d0 84.0d0 83.0d0 82.0d0 81.0d0
80.0d0 79.0d0 78.0d0 77.0d0 76.0d0 75.0d0 74.0d0 73.0d0 72.0d0
71.0d0 70.0d0 69.0d0 68.0d0 67.0d0 66.0d0 65.0d0 64.0d0 63.0d0
62.0d0 61.0d0 60.0d0 59.0d0 58.0d0 57.0d0 56.0d0)
------------------------------------------------------------
---- finished test of package { sorting documents by field } sucessfully ------
---- starting test of package : { matching document elements by field } ---------------
error occured when sending message : couldn't read from #<SB-SYS:FD-STREAM
for "socket 127.0.0.1:60078, peer: 127.0.0.1:27017"
{1003BA0343}>:
Connection reset by peer
closing connection (type-of MONGO) [name : DEFAULT ]
{[id : 8A28A81A-50D0-49A6-A3FD-5577529B5056] [port : 27017] [host : localhost] [db : admin]}
test-package 'matching document elements by field' failed with error :
*) The value NIL is not of type ARRAY.
---- starting test of package : { advanced query regression elements } ---------------
---- finished test of package { advanced query regression elements } sucessfully ------
---- starting test of package : { advanced query regression elements; part 2 } ---------------
---- finished test of package { advanced query regression elements; part 2 } sucessfully ------
---- starting test of package : { test update modifiers } ---------------
---- finished test of package { test update modifiers } sucessfully ------
---- starting test of package : { test java script (local and remote) } ---------------
"errmsg" -> ns not found
"ok" -> 0.0d0
(ECHO 1) failed:
Expected 1.0d0 but saw NIL; T
DESCRIPTION => "echo with client-side js : number"
(ECHO (+ 1 2)) failed:
Expected 3.0d0 but saw NIL; T
DESCRIPTION => "echo with client-side js : calculation"
(ECHO "hello") failed:
Expected "hello" but saw NIL; T
DESCRIPTION => "echo with client-side js : string"
(ECHO (LIST "hello" 56 (LIST 1 2))) failed:
Expected ("hello" 56.0d0 (1.0d0 2.0d0)) but saw NIL; T
DESCRIPTION => "echo with client-side js : array"
(RET (DB.COUNT COLLECTION (KV "k" VALUE))) failed:
Expected 43.0d0 but saw 0.0d0
DESCRIPTION => "set field in collection to number"
(RET (DB.COUNT COLLECTION (KV "k" VALUE))) failed:
Expected 43.0d0 but saw 0.0d0
DESCRIPTION => "set field in collection to string"
(RET (DB.COUNT COLLECTION (KV "k" VALUE))) failed:
Expected 43.0d0 but saw 0.0d0
DESCRIPTION => "set field in collection to list"
(REMOTE_ECHO 1) failed:
Expected 1.0d0 but saw NIL; T
DESCRIPTION => "echo with client-side js : number"
(REMOTE_ECHO (+ 1 2)) failed:
Expected 3.0d0 but saw NIL; T
DESCRIPTION => "echo with client-side js : calculation"
(REMOTE_ECHO "hello") failed:
Expected "hello" but saw NIL; T
DESCRIPTION => "echo with client-side js : string"
(REMOTE_ECHO (LIST "hello" 56 (LIST 1 2))) failed:
Expected ("hello" 56.0d0 (1.0d0 2.0d0)) but saw NIL; T
DESCRIPTION => "echo with client-side js : array"
(RET (DB.COUNT COLLECTION (KV "k" VALUE))) failed:
Expected 43.0d0 but saw 0.0d0
DESCRIPTION => "set field in collection to number"
(RET (DB.COUNT COLLECTION (KV "k" VALUE))) failed:
Expected 43.0d0 but saw 0.0d0
DESCRIPTION => "set field in collection to string"
(RET (DB.COUNT COLLECTION (KV "k" VALUE))) failed:
Expected 43.0d0 but saw 0.0d0
DESCRIPTION => "set field in collection to list"
(TF8) failed:
Expected (1.0d0 2.0d0 3.0d0 4.0d0 5.0d0) but saw NIL; T
DESCRIPTION => "remotely create objects : return data"
(MAPCAR (LAMBDA (D) (GET-ELEMENT "field" D)) (DOCS (DB.FIND "foo" :ALL))) failed:
Expected (1.0d0 2.0d0 3.0d0 4.0d0 5.0d0) but saw NIL
DESCRIPTION => "remotely create objects"
(REDUCE (LAMBDA (X Y) (AND X Y))
(MAPCAR (LAMBDA (D) (EQL (* 5.0d0 89.0d0) (GET-ELEMENT "k" D)))
(DOCS (DB.FIND "foo" :ALL)))) failed:
Expected T but saw NIL
DESCRIPTION => "set value referencing remotly installed script"
---- finished test of package { test java script (local and remote) } sucessfully ------
---- starting test of package : { test map-reduce) } ---------------
(GET-ELEMENT "value" (CAR (DOCS (DB.FIND "testit" ($ "_id" "simple"))))) failed:
Expected 900.0d0 but saw NIL; NIL
DESCRIPTION => "value is equal to value associated with key 'name'"
(GET-ELEMENT "value"
(CAR
(DOCS (MR.P ($MAP-REDUCE COLLECTION MAP_KEYS SUMREDUCE))))) failed:
Expected 387.0d0 but saw NIL; NIL
DESCRIPTION => "sum the value associated with key 'name'"
(LENGTH
(DOCS (MR.P ($MAP-REDUCE COLLECTION MAP_KEYS SUMREDUCE :KEEPTEMP T)))) failed:
Expected 43 but saw 0
DESCRIPTION => "emit value associated with key k"
(LENGTH (CL-MONGO::MR.COLLECTIONS)) failed:
Expected 2 but saw 0
DESCRIPTION => "automatic cleanup of temp map-reduce stores"
---- finished test of package { test map-reduce) } sucessfully ------
---- starting test of package : { test indexing } ---------------
"errmsg" -> ns not found
"ok" -> 0.0d0
[{name : _id_} {ns : test.foo} {key : } {v : 0} ]
[{name : _id_} {ns : test.system.js} {key : } {v : 0} ]
[{name : _id_} {ns : test.testit} {key : } {v : 0} ]
[{name : _id_} {ns : test.mr.foo} {key : } {v : 0} ]
[{name : index_this2_1} {ns : test.foo} {key : (index_this2 : 1.0d0) } {v : 0} ]
[{name : _id_} {ns : test.foo} {key : } {v : 0} ]
[{name : _id_} {ns : test.system.js} {key : } {v : 0} ]
[{name : _id_} {ns : test.testit} {key : } {v : 0} ]
[{name : _id_} {ns : test.mr.foo} {key : } {v : 0} ]
[{name : index_this2_1} {ns : test.foo} {key : (index_this2 : 1.0d0) } {v : 0} ]
[{name : index_this2_-1} {ns : test.foo} {key : (index_this2 : -1.0d0) } {unique : T} {dropDups : T} {v : 0} ]
"errmsg" -> ns not found
"ok" -> 0.0d0
---- finished test of package { test indexing } sucessfully ------
---- starting test of package : { test serialization; inspect visually } ---------------
{
"_id" -> objectid(34EC6F2CC231463B8E34475C)
"date-time" -> CL-MONGO::BSON-TIME Mon Apr 5 2010 16:34:12 (GMT-5)
"string" -> hello world generated by test-document
"number89" -> 89
"numberbig" -> 89988787777887
"float 89.67" -> 89.66999816894531d0
"list-1" -> [ 1, 2, 3, 4,]
"list-2" -> [ 1,[ inside, 3, 4, list,], the end,]
"doc2" ->
{
"_id" -> objectid(E0241DB6B58043CC8BC8149F)
"key-1" -> doc in doc !!
"key-2" -> 56.88999938964844d0
"doc3" ->
{
"_id" -> objectid(DB2B397021574AF8A366E362)
"array" -> [[[ inside a nest!!,],],]
"key56" -> 56
}
}
}
---- finished test of package { test serialization; inspect visually } sucessfully ------
NIL
CL-MONGO-TEST> '("1.8.5")
("1.8.5")
CL-MONGO-TEST>
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment