TO
* TO ( value [name] -- )

set the parameter field of name to the value, this is used
to change the value of a >VALUE and it can be also used
to change the value of LOCALS|

core compiling primitive