4447

1 files changed, 20 insertions, 20 deletions

diff --git a/html/061text.mu.html b/html/061text.mu.html
index d069e621..2c115a45 100644
--- a/html/061text.mu.html
+++ b/html/061text.mu.html
@@ -15,16 +15,16 @@ body { font-size: 12pt; font-family: monospace; color: #aaaaaa; background-color
 a { color:#eeeeee; text-decoration: none; }
 a:hover { text-decoration: underline; }
 * { font-size: 12pt; font-size: 1em; }
+.muControl { color: #c0a020; }
 .muRecipe { color: #ff8700; }
-.muScenario { color: #00af00; }
 .Special { color: #c00000; }
 .Delimiter { color: #800080; }
+.muData { color: #ffff00; }
 .Comment { color: #9090ff; }
 .Comment a { color:#0000ee; text-decoration:underline; }
 .Constant { color: #00a0a0; }
 .LineNr { color: #444444; }
-.muControl { color: #c0a020; }
-.muData { color: #ffff00; }
+.muScenario { color: #00af00; }
 -->
 </style>
 
@@ -64,17 +64,17 @@ if ('onhashchange' in window) {
 <span id="L3" class="LineNr">   3 </span><span class="muRecipe">def</span> equal a:text, b:text<span class="muRecipe"> -&gt; </span>result:bool [
 <span id="L4" class="LineNr">   4 </span>  <span class="Constant">local-scope</span>
 <span id="L5" class="LineNr">   5 </span>  <span class="Constant">load-inputs</span>
-<span id="L6" class="LineNr">   6 </span>  an:num, bn:num <span class="Special">&lt;-</span> copy a, b
+<span id="L6" class="LineNr">   6 </span>  an:num, bn:num <span class="Special">&lt;-</span> deaddress a, b
 <span id="L7" class="LineNr">   7 </span>  address-equal?:boolean <span class="Special">&lt;-</span> equal an, bn
-<span id="L8" class="LineNr">   8 </span>  <span class="muControl">return-if</span> address-equal?, <span class="Constant">1/true</span>
-<span id="L9" class="LineNr">   9 </span>  <span class="muControl">return-unless</span> a, <span class="Constant">0/false</span>
-<span id="L10" class="LineNr">  10 </span>  <span class="muControl">return-unless</span> b, <span class="Constant">0/false</span>
+<span id="L8" class="LineNr">   8 </span>  <span class="muControl">return-if</span> address-equal?,<span class="Constant"> true</span>
+<span id="L9" class="LineNr">   9 </span>  <span class="muControl">return-unless</span> a,<span class="Constant"> false</span>
+<span id="L10" class="LineNr">  10 </span>  <span class="muControl">return-unless</span> b,<span class="Constant"> false</span>
 <span id="L11" class="LineNr">  11 </span>  a-len:num <span class="Special">&lt;-</span> length *a
 <span id="L12" class="LineNr">  12 </span>  b-len:num <span class="Special">&lt;-</span> length *b
 <span id="L13" class="LineNr">  13 </span>  <span class="Comment"># compare lengths</span>
 <span id="L14" class="LineNr">  14 </span>  trace<span class="Constant"> 99</span>, <span class="Constant">[text-equal]</span>, <span class="Constant">[comparing lengths]</span>
 <span id="L15" class="LineNr">  15 </span>  length-equal?:bool <span class="Special">&lt;-</span> equal a-len, b-len
-<span id="L16" class="LineNr">  16 </span>  <span class="muControl">return-unless</span> length-equal?, <span class="Constant">0/false</span>
+<span id="L16" class="LineNr">  16 </span>  <span class="muControl">return-unless</span> length-equal?,<span class="Constant"> false</span>
 <span id="L17" class="LineNr">  17 </span>  <span class="Comment"># compare each corresponding character</span>
 <span id="L18" class="LineNr">  18 </span>  trace<span class="Constant"> 99</span>, <span class="Constant">[text-equal]</span>, <span class="Constant">[comparing characters]</span>
 <span id="L19" class="LineNr">  19 </span>  i:num <span class="Special">&lt;-</span> copy<span class="Constant"> 0</span>
@@ -84,11 +84,11 @@ if ('onhashchange' in window) {
 <span id="L23" class="LineNr">  23 </span>    a2:char <span class="Special">&lt;-</span> index *a, i
 <span id="L24" class="LineNr">  24 </span>    b2:char <span class="Special">&lt;-</span> index *b, i
 <span id="L25" class="LineNr">  25 </span>    chars-match?:bool <span class="Special">&lt;-</span> equal a2, b2
-<span id="L26" class="LineNr">  26 </span>    <span class="muControl">return-unless</span> chars-match?, <span class="Constant">0/false</span>
+<span id="L26" class="LineNr">  26 </span>    <span class="muControl">return-unless</span> chars-match?,<span class="Constant"> false</span>
 <span id="L27" class="LineNr">  27 </span>    i <span class="Special">&lt;-</span> add i,<span class="Constant"> 1</span>
 <span id="L28" class="LineNr">  28 </span>   <span class="muControl"> loop</span>
 <span id="L29" class="LineNr">  29 </span>  <span class="Delimiter">}</span>
-<span id="L30" class="LineNr">  30 </span> <span class="muControl"> return</span> <span class="Constant">1/true</span>
+<span id="L30" class="LineNr">  30 </span> <span class="muControl"> return</span><span class="Constant"> true</span>
 <span id="L31" class="LineNr">  31 </span>]
 <span id="L32" class="LineNr">  32 </span>
 <span id="L33" class="LineNr">  33 </span><span class="muScenario">scenario</span> text-equal-reflexive [
@@ -147,10 +147,10 @@ if ('onhashchange' in window) {
 <span id="L86" class="LineNr">  86 </span><span class="muScenario">scenario</span> text-equal-with-null [
 <span id="L87" class="LineNr">  87 </span>  <span class="Constant">local-scope</span>
 <span id="L88" class="LineNr">  88 </span>  x:text <span class="Special">&lt;-</span> new <span class="Constant">[abcd]</span>
-<span id="L89" class="LineNr">  89 </span>  y:text <span class="Special">&lt;-</span> copy<span class="Constant"> 0</span>
+<span id="L89" class="LineNr">  89 </span>  y:text <span class="Special">&lt;-</span> copy<span class="Constant"> null</span>
 <span id="L90" class="LineNr">  90 </span>  run [
-<span id="L91" class="LineNr">  91 </span>    10:bool/<span class="Special">raw</span> <span class="Special">&lt;-</span> equal x,<span class="Constant"> 0</span>
-<span id="L92" class="LineNr">  92 </span>    11:bool/<span class="Special">raw</span> <span class="Special">&lt;-</span> equal<span class="Constant"> 0</span>, x
+<span id="L91" class="LineNr">  91 </span>    10:bool/<span class="Special">raw</span> <span class="Special">&lt;-</span> equal x,<span class="Constant"> null</span>
+<span id="L92" class="LineNr">  92 </span>    11:bool/<span class="Special">raw</span> <span class="Special">&lt;-</span> equal<span class="Constant"> null</span>, x
 <span id="L93" class="LineNr">  93 </span>    12:bool/<span class="Special">raw</span> <span class="Special">&lt;-</span> equal x, y
 <span id="L94" class="LineNr">  94 </span>    13:bool/<span class="Special">raw</span> <span class="Special">&lt;-</span> equal y, x
 <span id="L95" class="LineNr">  95 </span>    14:bool/<span class="Special">raw</span> <span class="Special">&lt;-</span> equal y, y
@@ -400,7 +400,7 @@ if ('onhashchange' in window) {
 <span id="L339" class="LineNr"> 339 </span>  <span class="Constant">local-scope</span>
 <span id="L340" class="LineNr"> 340 </span>  <span class="Constant">load-inputs</span>
 <span id="L341" class="LineNr"> 341 </span>  <span class="Comment"># propagate null buffer</span>
-<span id="L342" class="LineNr"> 342 </span>  <span class="muControl">return-unless</span> in,<span class="Constant"> 0</span>
+<span id="L342" class="LineNr"> 342 </span>  <span class="muControl">return-unless</span> in,<span class="Constant"> null</span>
 <span id="L343" class="LineNr"> 343 </span>  len:num <span class="Special">&lt;-</span> get *in, <span class="Constant">length:offset</span>
 <span id="L344" class="LineNr"> 344 </span>  s:&amp;:@:_elem <span class="Special">&lt;-</span> get *in, <span class="Constant">data:offset</span>
 <span id="L345" class="LineNr"> 345 </span>  <span class="Comment"># we can't just return s because it is usually the wrong length</span>
@@ -419,7 +419,7 @@ if ('onhashchange' in window) {
 <span id="L358" class="LineNr"> 358 </span><span class="muRecipe">def</span> <a href='061text.mu.html#L358'>blank?</a> x:&amp;:@:_elem<span class="muRecipe"> -&gt; </span>result:bool [
 <span id="L359" class="LineNr"> 359 </span>  <span class="Constant">local-scope</span>
 <span id="L360" class="LineNr"> 360 </span>  <span class="Constant">load-inputs</span>
-<span id="L361" class="LineNr"> 361 </span>  <span class="muControl">return-unless</span> x, <span class="Constant">1/true</span>
+<span id="L361" class="LineNr"> 361 </span>  <span class="muControl">return-unless</span> x,<span class="Constant"> true</span>
 <span id="L362" class="LineNr"> 362 </span>  len:num <span class="Special">&lt;-</span> length *x
 <span id="L363" class="LineNr"> 363 </span>  result <span class="Special">&lt;-</span> equal len,<span class="Constant"> 0</span>
 <span id="L364" class="LineNr"> 364 </span>]
@@ -467,7 +467,7 @@ if ('onhashchange' in window) {
 <span id="L406" class="LineNr"> 406 </span>
 <span id="L407" class="LineNr"> 407 </span><span class="muScenario">scenario</span> text-append-null [
 <span id="L408" class="LineNr"> 408 </span>  <span class="Constant">local-scope</span>
-<span id="L409" class="LineNr"> 409 </span>  x:text <span class="Special">&lt;-</span> copy<span class="Constant"> 0</span>
+<span id="L409" class="LineNr"> 409 </span>  x:text <span class="Special">&lt;-</span> copy<span class="Constant"> null</span>
 <span id="L410" class="LineNr"> 410 </span>  y:text <span class="Special">&lt;-</span> new <span class="Constant">[ world!]</span>
 <span id="L411" class="LineNr"> 411 </span>  run [
 <span id="L412" class="LineNr"> 412 </span>    z:text <span class="Special">&lt;-</span> append x, y
@@ -481,7 +481,7 @@ if ('onhashchange' in window) {
 <span id="L420" class="LineNr"> 420 </span><span class="muScenario">scenario</span> text-append-null-2 [
 <span id="L421" class="LineNr"> 421 </span>  <span class="Constant">local-scope</span>
 <span id="L422" class="LineNr"> 422 </span>  x:text <span class="Special">&lt;-</span> new <span class="Constant">[hello,]</span>
-<span id="L423" class="LineNr"> 423 </span>  y:text <span class="Special">&lt;-</span> copy<span class="Constant"> 0</span>
+<span id="L423" class="LineNr"> 423 </span>  y:text <span class="Special">&lt;-</span> copy<span class="Constant"> null</span>
 <span id="L424" class="LineNr"> 424 </span>  run [
 <span id="L425" class="LineNr"> 425 </span>    z:text <span class="Special">&lt;-</span> append x, y
 <span id="L426" class="LineNr"> 426 </span>    10:@:char/<span class="Special">raw</span> <span class="Special">&lt;-</span> copy *z
@@ -1058,7 +1058,7 @@ if ('onhashchange' in window) {
 <span id="L997" class="LineNr"> 997 </span>  x:num <span class="Special">&lt;-</span> length *text
 <span id="L998" class="LineNr"> 998 </span>  x <span class="Special">&lt;-</span> subtract x, pattern-len
 <span id="L999" class="LineNr"> 999 </span>  enough-room?:bool <span class="Special">&lt;-</span> lesser-or-equal idx, x
-<span id="L1000" class="LineNr">1000 </span>  <span class="muControl">return-unless</span> enough-room?, <span class="Constant">0/not-found</span>
+<span id="L1000" class="LineNr">1000 </span>  <span class="muControl">return-unless</span> enough-room?,<span class="Constant"> false/not-found</span>
 <span id="L1001" class="LineNr">1001 </span>  <span class="Comment"># check each character of pattern</span>
 <span id="L1002" class="LineNr">1002 </span>  pattern-idx:num <span class="Special">&lt;-</span> copy<span class="Constant"> 0</span>
 <span id="L1003" class="LineNr">1003 </span>  <span class="Delimiter">{</span>
@@ -1067,12 +1067,12 @@ if ('onhashchange' in window) {
 <span id="L1006" class="LineNr">1006 </span>    c:char <span class="Special">&lt;-</span> index *text, idx
 <span id="L1007" class="LineNr">1007 </span>    exp:char <span class="Special">&lt;-</span> index *pattern, pattern-idx
 <span id="L1008" class="LineNr">1008 </span>    match?:bool <span class="Special">&lt;-</span> equal c, exp
-<span id="L1009" class="LineNr">1009 </span>    <span class="muControl">return-unless</span> match?, <span class="Constant">0/not-found</span>
+<span id="L1009" class="LineNr">1009 </span>    <span class="muControl">return-unless</span> match?,<span class="Constant"> false/not-found</span>
 <span id="L1010" class="LineNr">1010 </span>    idx <span class="Special">&lt;-</span> add idx,<span class="Constant"> 1</span>
 <span id="L1011" class="LineNr">1011 </span>    pattern-idx <span class="Special">&lt;-</span> add pattern-idx,<span class="Constant"> 1</span>
 <span id="L1012" class="LineNr">1012 </span>   <span class="muControl"> loop</span>
 <span id="L1013" class="LineNr">1013 </span>  <span class="Delimiter">}</span>
-<span id="L1014" class="LineNr">1014 </span> <span class="muControl"> return</span> <span class="Constant">1/found</span>
+<span id="L1014" class="LineNr">1014 </span> <span class="muControl"> return</span><span class="Constant"> true/found</span>
 <span id="L1015" class="LineNr">1015 </span>]
 <span id="L1016" class="LineNr">1016 </span>
 <span id="L1017" class="LineNr">1017 </span><span class="muScenario">scenario</span> match-at-checks-pattern-at-index [