HOLD HIWORD I
HOLD
* HOLD ( char -- )

the old-style forth-formatting system -- this
word adds a char to the picutred output string.

core ordinary primitive