anchor.diff:  tuser HANDLER	\ Holds return stack for error handling
   tuser CONTEXT	\ Area for vocabulary search order.  This is the first to search.
   7 CELLS /user +! \ reserve space for 7 more search contexts
  -tuser CURRENT	\ Pointer to vocabulary currently being extended
  +tuser CURRENT	\ Pointer to descriptor of vocabulary currently being extended
   tuser CP	\ Pointer to next available space for code
   tuser NP	\ Pointer to bottom of name dictionary
   tuser LAST	\ Pointer to last name in the dictionary
   tuser TIBB	\ The actual terminal input buffer.
   80 /user +!
   tuser 'TYPE	\ execution vector of TYPE
  -tuser forthVoc	\ Forth vocabulary record
  +tuser forthVoc	\ Forth vocabulary descriptor
   1 CELLS /user +!
   
   
  
positive.code: \ COLD is the Forth half of the cold bootstrap for the
  \ Forth runtime environment.
  
  t: COLD		BEGIN U0 PRESET hi FORTH QUIT AGAIN ;
  
  \ __RESET__ is the RISC-V half of the cold bootstrap for
  \ the Forth runtime environment.  It's responsible for
  
negative.code: \ queue, initializing the video display hardware, etc.
  t: !io		0kia 0mgia ;
  t: FORTH	forthVoc CONTEXT ! ;
  t: DEFINITIONS	CONTEXT @ CURRENT ! ;
  t: PRESET	( SP0 SP! ) TIBB 80 #TIB 2! ;
  
  \ Shell
  