<tokyo-remotedb> ( host port -- tokyo-remotedb )

Vocabulary

tokyo.remotedb

Inputs

host	an object
port	an object

Outputs

tokyo-remotedb

an object

Definition

USING: accessors kernel tokyo.alien.tcrdb ;

IN: tokyo.remotedb

: <tokyo-remotedb> ( host port -- tokyo-remotedb )
    [ tcrdbnew dup ] 2dip tcrdbopen drop tokyo-remotedb new
    [ handle<< ] keep ;