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

added filter-fields word which sets the returnfields slot in the current query object

Sascha Matzke 2009-12-27 13:29:24 +01:00
parent 80e64b8379
commit 3d490b71ab
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
extra/mongodb/driver/driver.factor
View File

@ -193,6 +193,9 @@ M: mdb-query-msg skip
: sort ( mdb-query-msg sort-quot -- mdb-query-msg ) : sort ( mdb-query-msg sort-quot -- mdb-query-msg )
output>array [ 1array >hashtable ] map >>orderby ; inline output>array [ 1array >hashtable ] map >>orderby ; inline
: filter-fields ( mdb-query-msg filterseq -- mdb-query-msg )
[ asc ] map >hashtable >>returnfields ; inline
: key-spec ( spec-quot -- spec-assoc ) : key-spec ( spec-quot -- spec-assoc )
output>array >hashtable ; inline output>array >hashtable ; inline