Name

defer:header — definining primitive

Synopsis

EXTENSIONS

DEFER ( 'word' -- )();
p4:"defer";

Description

create a new word with ((DEFER))-semantics

 simulate:
   : DEFER  CREATE 0, DOES> ( the ((DEFER)) runtime ) 
      @ ?DUP IF EXECUTE THEN ;
   : DEFER  DEFER-RT HEADER 0 , ;

declare as <c>"DEFER deferword"</c> <br> and set as <c>"['] executionword IS deferword"</c> (in pfe, you can also use TO deferword to set the execution)