From 124c67645cb6f1b9f06d7104c5398fa4732e2f25 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Tue, 20 Jun 2017 10:40:07 -0700 Subject: 3934 --- html/chessboard.mu.html | 28 ++++++++++++++-------------- 1 file changed, 14 insertions(+), 14 deletions(-) (limited to 'html/chessboard.mu.html') diff --git a/html/chessboard.mu.html b/html/chessboard.mu.html index e4c4b112..ddc76c22 100644 --- a/html/chessboard.mu.html +++ b/html/chessboard.mu.html @@ -139,7 +139,7 @@ if ('onhashchange' in window) { 75 start-running send-keys-to-channel, console, stdin-out, screen 76 # buffer lines in stdin 77 buffered-stdin-in:&:source:char, buffered-stdin-out:&:sink:char <- new-channel 10/capacity - 78 start-running buffer-lines, stdin-in, buffered-stdin-out + 78 start-running buffer-lines, stdin-in, buffered-stdin-out 79 { 80 ¦ print screen, [Stupid text-mode chessboard. White pieces in uppercase; black pieces in lowercase. No checking for legal moves. 81 ] @@ -156,7 +156,7 @@ if ('onhashchange' in window) { 92 ¦ ¦ screen <- print screen, [move: ] 93 ¦ ¦ m:&:move, quit:bool, error:bool <- read-move buffered-stdin-in, screen 94 ¦ ¦ break-if quit, +quit - 95 ¦ ¦ buffered-stdin-in <- clear buffered-stdin-in # cleanup after error. todo: test this? + 95 ¦ ¦ buffered-stdin-in <- clear buffered-stdin-in # cleanup after error. todo: test this? 96 ¦ ¦ loop-if error 97 ¦ } 98 ¦ board <- make-move board, m @@ -442,7 +442,7 @@ if ('onhashchange' in window) { 378 ¦ assert waiting?, [ 379 F read-move-blocking: routine failed to pause after coming up (before any keys were pressed)] 380 ¦ # press 'a' -381 ¦ sink <- write sink, 97/a +381 ¦ sink <- write sink, 97/a 382 ¦ restart read-move-routine 383 ¦ # 'read-move' still waiting for input 384 ¦ wait-for-routine-to-block read-move-routine @@ -451,7 +451,7 @@ if ('onhashchange' in window) { 387 ¦ assert waiting?, [ 388 F read-move-blocking: routine failed to pause after rank 'a'] 389 ¦ # press '2' -390 ¦ sink <- write sink, 50/'2' +390 ¦ sink <- write sink, 50/'2' 391 ¦ restart read-move-routine 392 ¦ # 'read-move' still waiting for input 393 ¦ wait-for-routine-to-block read-move-routine @@ -460,7 +460,7 @@ if ('onhashchange' in window) { 396 ¦ assert waiting?, [ 397 F read-move-blocking: routine failed to pause after file 'a2'] 398 ¦ # press '-' -399 ¦ sink <- write sink, 45/'-' +399 ¦ sink <- write sink, 45/'-' 400 ¦ restart read-move-routine 401 ¦ # 'read-move' still waiting for input 402 ¦ wait-for-routine-to-block read-move-routine @@ -469,7 +469,7 @@ if ('onhashchange' in window) { 405 ¦ assert waiting?, [ 406 F read-move-blocking: routine failed to pause after hyphen 'a2-'] 407 ¦ # press 'a' -408 ¦ sink <- write sink, 97/a +408 ¦ sink <- write sink, 97/a 409 ¦ restart read-move-routine 410 ¦ # 'read-move' still waiting for input 411 ¦ wait-for-routine-to-block read-move-routine @@ -478,7 +478,7 @@ if ('onhashchange' in window) { 414 ¦ assert waiting?, [ 415 F read-move-blocking: routine failed to pause after rank 'a2-a'] 416 ¦ # press '4' -417 ¦ sink <- write sink, 52/'4' +417 ¦ sink <- write sink, 52/'4' 418 ¦ restart read-move-routine 419 ¦ # 'read-move' still waiting for input 420 ¦ wait-for-routine-to-block read-move-routine @@ -487,7 +487,7 @@ if ('onhashchange' in window) { 423 ¦ assert waiting?, [ 424 F read-move-blocking: routine failed to pause after file 'a2-a4'] 425 ¦ # press 'newline' -426 ¦ sink <- write sink, 10 # newline +426 ¦ sink <- write sink, 10 # newline 427 ¦ restart read-move-routine 428 ¦ # 'read-move' now completes 429 ¦ wait-for-routine-to-block read-move-routine @@ -515,7 +515,7 @@ if ('onhashchange' in window) { 451 ¦ assert waiting?, [ 452 F read-move-quit: routine failed to pause after coming up (before any keys were pressed)] 453 ¦ # press 'q' -454 ¦ sink <- write sink, 113/q +454 ¦ sink <- write sink, 113/q 455 ¦ restart read-move-routine 456 ¦ # 'read-move' completes 457 ¦ wait-for-routine-to-block read-move-routine @@ -542,7 +542,7 @@ if ('onhashchange' in window) { 478 ¦ waiting?:bool <- not-equal read-move-state, 2/discontinued 479 ¦ assert waiting?, [ 480 F read-move-illegal-file: routine failed to pause after coming up (before any keys were pressed)] -481 ¦ sink <- write sink, 50/'2' +481 ¦ sink <- write sink, 50/'2' 482 ¦ restart read-move-routine 483 ¦ wait-for-routine-to-block read-move-routine 484 ] @@ -564,8 +564,8 @@ if ('onhashchange' in window) { 500 ¦ waiting?:bool <- not-equal read-move-state, 2/discontinued 501 ¦ assert waiting?, [ 502 F read-move-illegal-rank: routine failed to pause after coming up (before any keys were pressed)] -503 ¦ sink <- write sink, 97/a -504 ¦ sink <- write sink, 97/a +503 ¦ sink <- write sink, 97/a +504 ¦ sink <- write sink, 97/a 505 ¦ restart read-move-routine 506 ¦ wait-for-routine-to-block read-move-routine 507 ] @@ -587,8 +587,8 @@ if ('onhashchange' in window) { 523 ¦ waiting?:bool <- not-equal read-move-state, 2/discontinued 524 ¦ assert waiting?, [ 525 F read-move-empty: routine failed to pause after coming up (before any keys were pressed)] -526 ¦ sink <- write sink, 10/newline -527 ¦ sink <- write sink, 97/a +526 ¦ sink <- write sink, 10/newline +527 ¦ sink <- write sink, 97/a 528 ¦ restart read-move-routine 529 ¦ wait-for-routine-to-block read-move-routine 530 ] -- cgit 1.4.1-2-gfad0