* W! ( w-val addr -- ) store a 2byte-val at addressed 2byte-value
W!
( w-val addr -- )
misc ordinary primitive