diff options
Diffstat (limited to 'html')
| -rw-r--r-- | html/chessboard.mu.html | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/html/chessboard.mu.html b/html/chessboard.mu.html index 7edc5632..2f07b96d 100644 --- a/html/chessboard.mu.html +++ b/html/chessboard.mu.html @@ -273,28 +273,28 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color <span class="Constant">local-scope</span> <span class="Constant">load-ingredients</span> from-file:number, quit?:boolean, error?:boolean<span class="Special"> <- </span>read-file stdin, screen - <span class="muControl">return-if</span> quit?, <span class="Constant">0/dummy</span>, quit?, error? - <span class="muControl">return-if</span> error?, <span class="Constant">0/dummy</span>, quit?, error? + <span class="muControl">return-if</span> quit?, <span class="Constant">0/dummy</span> + <span class="muControl">return-if</span> error?, <span class="Constant">0/dummy</span> <span class="Comment"># construct the move object</span> result:address:shared:move<span class="Special"> <- </span>new <span class="Constant">move:type</span> x:address:number<span class="Special"> <- </span>get-address *result, <span class="Constant">from-file:offset</span> *x<span class="Special"> <- </span>copy from-file x<span class="Special"> <- </span>get-address *result, <span class="Constant">from-rank:offset</span> *x, quit?, error?<span class="Special"> <- </span>read-rank stdin, screen - <span class="muControl">return-if</span> quit?, <span class="Constant">0/dummy</span>, quit?, error? - <span class="muControl">return-if</span> error?, <span class="Constant">0/dummy</span>, quit?, error? + <span class="muControl">return-if</span> quit?, <span class="Constant">0/dummy</span> + <span class="muControl">return-if</span> error?, <span class="Constant">0/dummy</span> error?<span class="Special"> <- </span>expect-from-channel stdin, <span class="Constant">45/dash</span>, screen - <span class="muControl">return-if</span> error?, <span class="Constant">0/dummy</span>, <span class="Constant">0/quit</span>, error? + <span class="muControl">return-if</span> error?, <span class="Constant">0/dummy</span>, <span class="Constant">0/quit</span> x<span class="Special"> <- </span>get-address *result, <span class="Constant">to-file:offset</span> *x, quit?, error?<span class="Special"> <- </span>read-file stdin, screen - <span class="muControl">return-if</span> quit?:boolean, <span class="Constant">0/dummy</span>, quit?:boolean, error?:boolean - <span class="muControl">return-if</span> error?:boolean, <span class="Constant">0/dummy</span>, quit?:boolean, error?:boolean + <span class="muControl">return-if</span> quit?:boolean, <span class="Constant">0/dummy</span> + <span class="muControl">return-if</span> error?:boolean, <span class="Constant">0/dummy</span> x:address:number<span class="Special"> <- </span>get-address *result, <span class="Constant">to-rank:offset</span> *x, quit?, error?<span class="Special"> <- </span>read-rank stdin, screen - <span class="muControl">return-if</span> quit?, <span class="Constant">0/dummy</span>, quit?, error? - <span class="muControl">return-if</span> error?, <span class="Constant">0/dummy</span>, quit?, error? + <span class="muControl">return-if</span> quit?, <span class="Constant">0/dummy</span> + <span class="muControl">return-if</span> error?, <span class="Constant">0/dummy</span> error?<span class="Special"> <- </span>expect-from-channel stdin, <span class="Constant">10/newline</span>, screen - <span class="muControl">return-if</span> error?, <span class="Constant">0/dummy</span>, <span class="Constant">0/quit</span>, error? + <span class="muControl">return-if</span> error?, <span class="Constant">0/dummy</span>, <span class="Constant">0/quit</span> <span class="muControl">return</span> result, quit?, error? ] |