diff options
| author | Kartik K. Agaram <vc@akkartik.com> | 2015-05-10 10:02:17 -0700 |
|---|---|---|
| committer | Kartik K. Agaram <vc@akkartik.com> | 2015-05-10 10:02:17 -0700 |
| commit | 6b16a2ef6b12eedc14f2a7652bf8d977c8192b6e (patch) | |
| tree | 035f54ad4e8ef1be018c605b453b3acdac3f0b11 | |
| parent | 8536dcf46d8c41c077fd844eee000bb36fb83d1b (diff) | |
| download | mu-6b16a2ef6b12eedc14f2a7652bf8d977c8192b6e.tar.gz | |
1326
| -rw-r--r-- | chessboard.mu | 23 |
1 files changed, 0 insertions, 23 deletions
diff --git a/chessboard.mu b/chessboard.mu index 003f3116..5cd2deb1 100644 --- a/chessboard.mu +++ b/chessboard.mu @@ -472,29 +472,6 @@ scenario making-a-move [ ] ] -# Use this to debug asynchronous keyboard processing. -#? recipe main [ -#? default-space:address:array:location <- new location:type, 30:literal -#? switch-to-display -#? stdin:address:channel <- init-channel 10:literal/capacity -#? start-running send-keys-to-channel:recipe, 0:literal/keyboard, stdin:address:channel, 0:literal/screen -#? c:character, stdin:address:channel <- read stdin:address:channel -#? return-to-console -#? ] - -#? recipe main [ -#? default-space:address:array:location <- new location:type, 30:literal -#? switch-to-display -#? { -#? c:character, found:boolean <- read-key-from-keyboard -#? $print found:boolean, [ -#? ] -#? loop-unless found:boolean -#? } -#? #? return-to-console -#? $print c:character -#? ] - recipe chessboard [ default-space:address:array:location <- new location:type, 30:literal board:address:array:address:array:character <- initial-position |