c-set:forth_usual — ordinary primitive
FORTH
CSET ( n addr -- )();p4:"c-set";
CSET ( n addr -- )(
)
set bits in byte at given address
simulate: : CSET TUCK @ SWAP OR SWAP ! ;