* , ( val -- ) store the value in the dictionary simulate: : , DP 1 CELLS DP +! ! ;
,
( val -- )
simulate: : , DP 1 CELLS DP +! ! ;
FORTH/ANS core (dpANS.6.1.0150) ordinary primitive