becomes

Oft hat man das Problem, dass der System-Maintainer ein Wort nicht deferred gemacht hat, man es aber trotzdem ändern will. Man muss es also patchen. Klaus Schleisiek schlägt als Name BECOMES vor, ähnlich wie IS nimmt es einen Wert vom Stack und weist den dem folgenden Namen zu. BECOMES kann man „fast“ portabel programmieren, hier die Version für threaded code:

: becomes ( xt <name> -- )  here >r ' >body dp ! >r
  postpone AHEAD  r> dp !  postpone  THEN  r> dp ! ;

Für native Code (z.B. bigForth) muss man nur das >body weglassen.