steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

fixed compile errors

db4
Sascha Matzke 2009-05-01 16:13:51 +02:00
parent 45bf6d15b0
commit cce0341e28
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
extra/mongodb/tuple/tuple.factor
View File

@ -20,7 +20,7 @@ SYNTAX: MDBTUPLE:
tuple-collection tuple-collection
[ create-collection ] [ create-collection ]
[ [ tuple-index-list ] keep [ [ tuple-index-list ] keep
'[ _ name>> swap [ name>> ] [ spec>> ] bi ensure-index ] each '[ _ name>> swap [ name>> ] [ spec>> ] bi <index-spec> ensure-index ] each
] bi ; ] bi ;
: ensure-tables ( classes -- ) : ensure-tables ( classes -- )
@ -80,4 +80,4 @@ PRIVATE>
: count-tuples ( tuple/query -- n ) : count-tuples ( tuple/query -- n )
dup mdb-query-msg? [ tuple>query ] unless dup mdb-query-msg? [ tuple>query ] unless
[ collection>> ] [ query>> ] bi count ; [ collection>> ] [ query>> ] bi <query> count ;