Documentation index can now link to body text of examples

README.md

@@ -1,6 +1,6 @@
 # Inform 7
 
-[Version](notes/versioning.md): 10.2.0-beta+6X55 'Krypton' (5 May 2024)
+[Version](notes/versioning.md): 10.2.0-beta+6X56 'Krypton' (6 May 2024)
 
 ## About Inform
 

build.txt

@@ -1,3 +1,3 @@
 Prerelease: beta
-Build Date: 5 May 2024
-Build Number: 6X55
+Build Date: 6 May 2024
+Build Number: 6X56

docs/Architecture16Kit/S-io.html

@@ -205,8 +205,10 @@ <h1><a href="../index.html">
 <span class="plain-syntax">];</span>
 <span class="plain-syntax">[ </span><span class="identifier-syntax">VM_KeyDelay_Interrupt</span><span class="plain-syntax">; </span><span class="reserved-syntax">rtrue</span><span class="plain-syntax">; ];</span>
 
-<span class="plain-syntax">[ </span><span class="identifier-syntax">VM_ReadKeyboard</span><span class="plain-syntax"> </span><span class="identifier-syntax">a_buffer</span><span class="plain-syntax"> </span><span class="identifier-syntax">a_table</span><span class="plain-syntax">;</span>
+<span class="plain-syntax">[ </span><span class="identifier-syntax">VM_ReadKeyboard</span><span class="plain-syntax"> </span><span class="identifier-syntax">a_buffer</span><span class="plain-syntax"> </span><span class="identifier-syntax">a_table</span><span class="plain-syntax"> </span><span class="identifier-syntax">ix</span><span class="plain-syntax">;</span>
 <span class="plain-syntax">    </span><span class="reserved-syntax">read</span><span class="plain-syntax"> </span><span class="identifier-syntax">a_buffer</span><span class="plain-syntax"> </span><span class="identifier-syntax">a_table</span><span class="plain-syntax">;</span>
+<span class="plain-syntax">    </span><span class="reserved-syntax">for</span><span class="plain-syntax"> ( </span><span class="identifier-syntax">ix</span><span class="plain-syntax"> = </span><span class="constant-syntax">2</span><span class="plain-syntax"> : </span><span class="identifier-syntax">ix</span><span class="plain-syntax"> &lt;= (</span><span class="identifier-syntax">a_buffer</span><span class="plain-syntax">-&gt;1) + </span><span class="constant-syntax">1</span><span class="plain-syntax"> : </span><span class="identifier-syntax">ix</span><span class="plain-syntax">++ )</span>
+<span class="plain-syntax">        </span><span class="reserved-syntax">if</span><span class="plain-syntax"> (((</span><span class="identifier-syntax">a_buffer</span><span class="plain-syntax">-&gt;</span><span class="identifier-syntax">ix</span><span class="plain-syntax">) &lt; </span><span class="constant-syntax">32</span><span class="plain-syntax">) || ((</span><span class="identifier-syntax">a_buffer</span><span class="plain-syntax">-&gt;</span><span class="identifier-syntax">ix</span><span class="plain-syntax">) == </span><span class="constant-syntax">160</span><span class="plain-syntax">)) </span><span class="identifier-syntax">a_buffer</span><span class="plain-syntax">-&gt;</span><span class="identifier-syntax">ix</span><span class="plain-syntax"> = </span><span class="constant-syntax">32</span><span class="plain-syntax">;</span>
 <span class="plain-syntax">];</span>
 </pre>
 <p class="commentary firstcommentary"><a id="SP7" class="paragraph-anchor"></a><b>&#167;7. Buffer Functions. </b>A "buffer", in this sense, is an array containing a stream of characters

docs/Architecture32Kit/S-io.html

@@ -346,7 +346,10 @@ <h1><a href="../index.html">
 <span class="character-syntax">    return key;</span>
 <span class="character-syntax">];</span>
 
-<span class="character-syntax">[ VM_ReadKeyboard  a_buffer a_table done ix;</span>
+<span class="character-syntax">Array UnicodeWhitespace --&gt; 133 160 5760 8232 8233 8239 8287 12288;</span>
+<span class="character-syntax">Constant UnicodeWhitespaceLen = 8;</span>
+
+<span class="character-syntax">[ VM_ReadKeyboard  a_buffer a_table done ix chr;</span>
 <span class="character-syntax">    if (gg_commandstr ~= 0 &amp;&amp; gg_command_reading ~= false) {</span>
 <span class="character-syntax">        done = glk_get_line_stream_uni(gg_commandstr, a_buffer+WORDSIZE,</span>
 <span class="character-syntax">            (INPUT_BUFFER_LEN-1)-1);</span>
@@ -387,6 +390,16 @@ <h1><a href="../index.html">
 <span class="character-syntax">        glk_put_char_stream(gg_commandstr, 10); </span><span class="comment-syntax">newline</span>
 <span class="character-syntax">    }</span>
 <span class="character-syntax">  .KPContinue;</span>
+
+<span class="character-syntax">    for ( ix = 1 : ix &lt;= (a_buffer--&gt;0) : ix++ ) {</span>
+<span class="character-syntax">      chr = a_buffer--&gt;ix;</span>
+<span class="character-syntax">      if ((chr &lt;= 32) || (((chr &gt;= 8192) &amp;&amp; (chr &lt;= 8202))))</span>
+<span class="character-syntax">        a_buffer--&gt;ix = 32;</span>
+<span class="character-syntax">      else {</span>
+<span class="character-syntax">        @binarysearch chr WORDSIZE UnicodeWhitespace WORDSIZE UnicodeWhitespaceLen 0 0 chr;</span>
+<span class="character-syntax">    if (chr) a_buffer--&gt;ix = 32;</span>
+<span class="character-syntax">      }</span>
+<span class="character-syntax">    }</span>
 <span class="character-syntax">    VM_Tokenise(a_buffer,a_table);</span>
 <span class="character-syntax">    </span><span class="comment-syntax">It's time to close any quote window we've got going.</span>
 <span class="character-syntax">    if (gg_quotewin) {</span>