USING: kernel parser sequences words ;
IN: unicode.syntax.backend

: VALUE:
    CREATE-WORD { f } clone [ first ] curry define ; parsing

: set-value ( value word -- )
    word-def first set-first ;