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


Vocabulary
tokyo.remotedb

Inputs
hostan object
portan object


Outputs
tokyo-remotedban 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 ;