setup-euc ( word file-name -- singleton-class biassoc )


Vocabulary
io.encodings.euc.private

Inputs
wordan object
file-namean object


Outputs
singleton-classan object
biassocan object


Definition
USING: classes.singleton kernel simple-flat-file ;

IN: io.encodings.euc.private

: setup-euc ( word file-name -- singleton-class biassoc )
[ dup define-singleton-class ] [ load-codetable-file ] bi* ;