Name

replace-in:useful — ordinary primitive

Synopsis

EXTENSIONS
REPLACE-IN ( to-xt from-xt n "name" -- )(); 
 ;

Description

will handle the body of the named word as a sequence of cells (or tokens) and replaces the n'th occurences of from-xt into to-xt. A negative value will change all occurences. A zero value will not change any.