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

gdbm: add gdbm-info

db4
Dmitry Shubin 2010-06-28 01:52:36 +04:00
parent cab257bbea
commit 2992a37fe5
2 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
extra/gdbm/gdbm-docs.factor
View File

@ -28,6 +28,10 @@ HELP: <gdbm>
{ $values { "gdbm" gdbm } } { $values { "gdbm" gdbm } }
{ $description "Creates database configuration object with all slots set to their default values. See " { $link gdbm } " for complete slots description." } ; { $description "Creates database configuration object with all slots set to their default values. See " { $link gdbm } " for complete slots description." } ;
HELP: gdbm-info
{ $values { "str" string } }
{ $description "Returns version number and build date." } ;
HELP: gdbm-delete HELP: gdbm-delete
{ $values { "key" object } } { $values { "key" object } }
{ $description "Removes the keyed item from the database." } ; { $description "Removes the keyed item from the database." } ;

2
extra/gdbm/gdbm.factor
View File

@ -67,6 +67,8 @@ DESTRUCTOR: gdbm-close
PRIVATE> PRIVATE>
: gdbm-info ( -- str ) gdbm_version ;
: gdbm-error-message ( error -- msg ) gdbm_strerror ; : gdbm-error-message ( error -- msg ) gdbm_strerror ;
: gdbm-replace ( key content -- ) GDBM_REPLACE gdbm-store ; : gdbm-replace ( key content -- ) GDBM_REPLACE gdbm-store ;