Additional tools, which can be useful with the console.

: VOC-NAME. ( wid -- )
Display vocabulary name.

: ORDER
Display search order.

: vocs
Display defined vocabularies.

: info
Display information about free memory remaining.

: ?SLITERAL2 ( c-addr u -- ... )
Provide the "" syntax. Use as

' ?SLITERAL2 to ?SLITERAL

to get the ""-syntax. After this, you can write

"mymemo"

to include the memo called "mymemo". 
[ must it be called "( mymemo)"?]

: Advanced-OK
Make the OK prompt show the current BASE. To install, execute:

' Advanced-OK to OK

then change the variable BASE.

: ID. ( nfa -- )
Display a word's name given its NFA.

: NLIST ( wid -- )
List all words in wordlist wid. To stop, press space or write space char 
by graffity. 

: WORDS
List all words in the first vocabulary in the search order. To stop, press 
space or write space char by graffity.

: WordByAddr ( t-addr  -- nfa -1 | 0 )
Get the NFA for the word at address t-addr in threaded segment. 

For example, execute:

' words WordByAddr . id.

This displays:

-1 WORDS

: .s
Show the stack.
