with-rocksdb ( path quot -- )

Vocabulary

rocksdb.lib

Inputs

path	an object
quot	an object

Outputs

None

Definition

USING: destructors kernel namespaces ;

IN: rocksdb.lib

: with-rocksdb ( path quot -- )
    [
        [
            create-rocksdb
            [ <rocksdb-handle> &dispose drop ] keep
            dup rocksdb-handle-var
        ] dip with-variable
    ] with-destructors ; inline