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

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
extra/bson/reader/reader.factor
View File

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

6
extra/mongodb/driver/driver-docs.factor
View File

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