C,

C,

C+PLACE

C@

C,

* C, ( value -- )

store a new byte-value in the dictionary, implicit 1 ALLOT,
see ,

FORTH/ANS core (dpANS .6.1.0860) ordinary primitive