define-tr ( word mapping -- )

Vocabulary

tr.private

Inputs

word	an object
mapping	an object

Outputs

None

Definition

USING: words ;

IN: tr.private

: define-tr ( word mapping -- )
    tr-quot ( seq -- translated ) define-declared ;