
<hr><h3><A name="22">aligning?</A> ( -- addr  )</h3>
<br>
variable holding flag, true means assembler does aligning on its own.  
Implemented for CPU independent metacompiling.  

<hr><h3><A name="52">registers</A> ( -- addr  )</h3>
 Extra: bug 
<br>
The address of a buffer holding all register contents after the last exception.  

<hr><h3><A name="82">#threads</A> ( -- n )</h3>
<br>
n is the number of threads used by the dictionary hashing scheme.  
<p>
Currently  <code><A href="_smal_BK#82"> #threads </A></code> is 8, so each 
vocabulary is represented by 8 linked lists of words.  

<hr><h3><A name="b2">(more</A> ( -- )</h3>
<br>
Display the file whose file descriptor is stored in the variable  <code><A href="_smal_AU#224"> ifd </A>.</code> 
Pauses at the end of screen.  

<hr><h3><A name="e2">.now</A> ( -- )</h3>
<br>
Displays the current time.  Equivalent to  <code>"<A href="_smal_AN#27d"> now </A></code>  <code><A href="_smal_BP#e7"> .time </A>"</code> 

<hr><h3><A name="112">8*</A> ( n1 -- n2 )</h3>
 Extra: F83
<br>
n2 is the result of shifting n1 left three bits.  Zeros are shifted into the 
vacated bit positions.  

<hr><h3><A name="142">abort"</A> ( flag -- )</h3> <kbd>ccc"</kbd> 
 Extra: compiling
<br>
 ( -- )<br>
<br>
Used in the form: 
<br><code>    flag abort" ccc"</code><br>
When later executed, if flag is true the characters ccc, delimited by " 
(close-quote), are displayed and then a system dependent error abort sequence, 
including the function of  <code><A href="_smal_BJ#141"> abort </A>,</code> is 
performed.  If flag is false, the flag is dropped and execution continues.  The 
space following  <code><A href="_smal_BK#142"> abort" </A></code> is not part of 
ccc.  

<hr><h3><A name="172">c@</A> ( addr -- n )</h3>
 Extra: 83Std
<br>
n is the contents of the byte at address addr (with the higher bits of the 
"normal" length stack entry padded with zeroes).  

<hr><h3><A name="1a2">ctoggle</A> ( byte-mask addr -- )</h3>
<br>
The byte at address addr is logically XOR'ed with the mask byte-mask, thus 
changing the bits in the byte at addr corresponding to the "one" bits in the 
mask.  

See:  <code><A href="_smal_BH#19f"> cset </A></code>  <code><A href="_smal_BE#19c"> creset </A></code> 

<hr><h3><A name="1d2">dst?</A> ( -- flag )</h3>
<br>
flag is true if daylight savings time is in effect.  

<hr><h3><A name="202">find</A> ( pstr -- addr n )</h3>
 Extra: 83Std
<br>
pstr is the address of a packed string.  The string contains a word name to be 
located in the currently active search order.  It the word is not found, addr is 
the string address, and n is zero.  If the word is found, addr is the 
compilation address and n is set to one of two non-zero values.  If the word 
found has the immediate attribute, n is set to one.  If the word is 
non-immediate, n is set to minus one (  <code><A href="_smal_AE#304"> true </A></code> 
).  

<hr><h3><A name="232">interpret-do-defined</A> ( acf n -- ?? )</h3>
 Extra: Interpreting
<br>
 <code><A href="_smal_BK#232"> interpret-do-defined </A></code> is an 
implementation of the deferred word  <code><A href="_smal_AU#1c4"> do-defined </A>.</code>  <code><A href="_smal_AU#1c4"> do-defined </A></code> 
is executed from  <code><A href="_smal_AR#71"> "compile </A></code> after the 
word under consideration has been found in the dictionary.  acf is the 
compilation address of the word that was found, and n is 1 if that word is 
immediate, or -1 if it isn't.  
<p>
 <code><A href="_smal_AQ#190"> compile-do-defined </A></code> is used while 
compiling.  While interpreting,  <code><A href="_smal_BK#232"> interpret-do-defined </A></code> 
is used instead.   <code><A href="_smal_BK#232"> interpret-do-defined </A></code> 
executes the word acf.  
<p>

See:  <code><A href="_smal_AU#1c4"> do-defined </A></code>  <code><A href="_smal_AQ#190"> compile-do-defined </A></code> 
"Text Interpreter" 

<hr><h3><A name="262">m*</A> ( n1 n2 -- d )</h3>
<br>
ud is the signed double size product of n1 times n2, both signed cell numbers.  

<hr><h3><A name="292">pack</A> ( addr len pstr -- pstr )</h3>
 Extra: F83
<br>
The character array specified by addr and len is placed as a packed string at 
pstr, returning pstr.  

<hr><h3><A name="2c2">save-forth</A> ( filename-pstr -- )</h3>
<br>
Used in the form: 
<br><code>    "" filename  save-forth</code><br>
An executable image of the current Forth configuration is saved into filename.  
From Risc OS, you can later re-enter that same Forth image with: 
<br><code>    run filename</code><br>

<hr><h3><A name="2f2">terminal:</A> ( --  )</h3> <kbd>terminal-name</kbd> 
<br>
Define a new type of terminal, this is followed by a <strong>prototype</strong> 
statement to predefined standard terminal functions.  Specific functions follow 
the prototype.  
<p>
<br><code>    terminal: ansi</code><br>
<br><code>    prototype dumb</code><br>
<br><code>    for (#lines  34 ;</code><br>
<br><code>    for (right   esc[ C ;</code><br>
<br><code>    for (up      esc[ A ;</code><br>
<br><code>    for (down    esc[ B ;</code><br>

<hr><h3><A name="322">user</A> ( offset -- )</h3> <kbd>name</kbd> 
<br>
A defining word used in the form: 
<br><code>    offset user &lt;name&gt;</code><br>
When name is later executed, it leaves the address of its data storage area, 
which is at the given offset in the  <code><A href="_smal_BK#322"> user </A></code> 
area.  Space for this in the  <code><A href="_smal_BK#322"> user </A></code> 
area is  <code><A href="_smal_AM#27c"> not </A></code> allocated.  The 
allocation must be done separately, perhaps with  <code><A href="_smal_AS#312"> ualloc </A>.</code> 
