+TO +PLACE +UNDER
+TO
* +TO ( val [name] -- )

add the val to the named VALUE or LOCALS| value

FORTH/BASE misc compiling primitive