Reads forward in the terminal input buffer and creates a word in the dictionary whose run-time behaviour is to return the body address of the newly created word.

CREATE FRED 99 ,
FRED @ .

(displays 99)

none