fixed docs

db4
Sascha Matzke 2010-07-31 19:50:29 +02:00
parent 19c78de60f
commit 69027378cb
2 changed files with 9 additions and 6 deletions

View File

@ -15,6 +15,8 @@ SYMBOL: state
DEFER: stream>assoc
ERROR: unknown-bson-type type msg ;
<PRIVATE
DEFER: read-elements
@ -59,8 +61,10 @@ DEFER: read-elements
{ T_Binary_Default [ read ] }
{ T_Binary_Bytes_Deprecated [ drop read-int32 read ] }
{ T_Binary_Custom [ read bytes>object ] }
{ T_Binary_Function [ read ] }
[ drop read >string ]
{ T_Binary_Function [ read-sized-string ] }
{ T_Binary_MD5 [ read >string ] }
{ T_Binary_UUID [ read >string ] }
[ "unknown binary sub-type" unknown-bson-type ]
} case ; inline
TYPED: bson-regexp-read ( -- mdbregexp: mdbregexp )
@ -90,6 +94,7 @@ TYPED: element-data-read ( type: integer -- object )
{ T_Code [ read-int32 read-sized-string ] }
{ T_ScopedCode [ read-int32 drop read-cstring H{ } clone stream>assoc <mongo-scoped-code> ] }
{ T_NULL [ f ] }
[ "type unknown" unknown-bson-type ]
} case ; inline recursive
TYPED: (read-object) ( type: integer name: string -- )

View File

@ -81,15 +81,13 @@ HELP: create-collection
HELP: delete
{ $values
{ "collection" "a collection" }
{ "selector" "assoc which identifies the objects to be removed from the collection" }
{ "delete-msg" "a delete msg" }
}
{ $description "removes objects from the collection (with lasterror check)" } ;
HELP: delete-unsafe
{ $values
{ "collection" "a collection" }
{ "selector" "assoc which identifies the objects to be removed from the collection" }
{ "delete-msg" "a delete msg" }
}
{ $description "removes objects from the collection (without error check)" } ;