save-index ( bitcask -- )

Vocabulary

bitcask

Inputs

bitcask

an object

Outputs

None

Definition

USING: accessors bitcask.private io.encodings.binary io.files
kernel sequences ;

IN: bitcask

: save-index ( bitcask -- )
    dup path>> ".idx" append binary
    [ index>> write-index ] with-file-writer ;