XC,

( xchar -- )

Append the encoding of xchar to the dictionary.

See:

Implementation:

: XC, ( xchar -- ) HERE XC!+ DP ! ;

ContributeContributions