diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2016-03-09 19:23:44 -0800 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2016-03-09 19:23:44 -0800 |
commit | 83edf90dc3a697a412f733786cbcfbb4ec4c649b (patch) | |
tree | 15492c8c7b8c13a00fafdc6a708965931c847da9 | |
parent | b1a672a2025a5236f09845e13aeb560b01a7d685 (diff) | |
download | mu-83edf90dc3a697a412f733786cbcfbb4ec4c649b.tar.gz |
2749
-rw-r--r-- | chessboard.mu | 24 | ||||
-rw-r--r-- | html/chessboard.mu.html | 48 |
2 files changed, 36 insertions, 36 deletions
diff --git a/chessboard.mu b/chessboard.mu index 9f73561e..0f400157 100644 --- a/chessboard.mu +++ b/chessboard.mu @@ -386,7 +386,7 @@ scenario read-move-blocking [ wait-for-routine 2:number 3:number <- routine-state 2:number/id 4:boolean/waiting? <- equal 3:number/routine-state, 3/waiting - assert 4:boolean/waiting?, [ + assert 4:boolean/waiting?, [ F read-move-blocking: routine failed to pause after coming up (before any keys were pressed)] # press 'a' 1:address:shared:channel <- write 1:address:shared:channel, 97/a @@ -395,7 +395,7 @@ F read-move-blocking: routine failed to pause after coming up (before any keys w wait-for-routine 2:number 3:number <- routine-state 2:number/id 4:boolean/waiting? <- equal 3:number/routine-state, 3/waiting - assert 4:boolean/waiting?, [ + assert 4:boolean/waiting?, [ F read-move-blocking: routine failed to pause after rank 'a'] # press '2' 1:address:shared:channel <- write 1:address:shared:channel, 50/'2' @@ -404,7 +404,7 @@ F read-move-blocking: routine failed to pause after rank 'a'] wait-for-routine 2:number 3:number <- routine-state 2:number/id 4:boolean/waiting? <- equal 3:number/routine-state, 3/waiting - assert 4:boolean/waiting?, [ + assert 4:boolean/waiting?, [ F read-move-blocking: routine failed to pause after file 'a2'] # press '-' 1:address:shared:channel <- write 1:address:shared:channel, 45/'-' @@ -413,7 +413,7 @@ F read-move-blocking: routine failed to pause after file 'a2'] wait-for-routine 2:number 3:number <- routine-state 2:number 4:boolean/waiting? <- equal 3:number/routine-state, 3/waiting - assert 4:boolean/waiting?/routine-state, [ + assert 4:boolean/waiting?/routine-state, [ F read-move-blocking: routine failed to pause after hyphen 'a2-'] # press 'a' 1:address:shared:channel <- write 1:address:shared:channel, 97/a @@ -422,7 +422,7 @@ F read-move-blocking: routine failed to pause after hyphen 'a2-'] wait-for-routine 2:number 3:number <- routine-state 2:number 4:boolean/waiting? <- equal 3:number/routine-state, 3/waiting - assert 4:boolean/waiting?/routine-state, [ + assert 4:boolean/waiting?/routine-state, [ F read-move-blocking: routine failed to pause after rank 'a2-a'] # press '4' 1:address:shared:channel <- write 1:address:shared:channel, 52/'4' @@ -431,7 +431,7 @@ F read-move-blocking: routine failed to pause after rank 'a2-a'] wait-for-routine 2:number 3:number <- routine-state 2:number 4:boolean/waiting? <- equal 3:number/routine-state, 3/waiting - assert 4:boolean/waiting?, [ + assert 4:boolean/waiting?, [ F read-move-blocking: routine failed to pause after file 'a2-a4'] # press 'newline' 1:address:shared:channel <- write 1:address:shared:channel, 10 # newline @@ -440,7 +440,7 @@ F read-move-blocking: routine failed to pause after file 'a2-a4'] wait-for-routine 2:number 3:number <- routine-state 2:number 4:boolean/completed? <- equal 3:number/routine-state, 1/completed - assert 4:boolean/completed?, [ + assert 4:boolean/completed?, [ F read-move-blocking: routine failed to terminate on newline] trace 1, [test], [reached end] ] @@ -458,7 +458,7 @@ scenario read-move-quit [ wait-for-routine 2:number 3:number <- routine-state 2:number/id 4:boolean/waiting? <- equal 3:number/routine-state, 3/waiting - assert 4:boolean/waiting?, [ + assert 4:boolean/waiting?, [ F read-move-quit: routine failed to pause after coming up (before any keys were pressed)] # press 'q' 1:address:shared:channel <- write 1:address:shared:channel, 113/q @@ -467,7 +467,7 @@ F read-move-quit: routine failed to pause after coming up (before any keys were wait-for-routine 2:number 3:number <- routine-state 2:number/id 4:boolean/completed? <- equal 3:number/routine-state, 1/completed - assert 4:boolean/completed?, [ + assert 4:boolean/completed?, [ F read-move-quit: routine failed to terminate on 'q'] trace 1, [test], [reached end] ] @@ -485,7 +485,7 @@ scenario read-move-illegal-file [ wait-for-routine 2:number 3:number <- routine-state 2:number/id 4:boolean/waiting? <- equal 3:number/routine-state, 3/waiting - assert 4:boolean/waiting?, [ + assert 4:boolean/waiting?, [ F read-move-file: routine failed to pause after coming up (before any keys were pressed)] 1:address:shared:channel <- write 1:address:shared:channel, 50/'2' restart 2:number/routine @@ -506,7 +506,7 @@ scenario read-move-illegal-rank [ wait-for-routine 2:number 3:number <- routine-state 2:number/id 4:boolean/waiting? <- equal 3:number/routine-state, 3/waiting - assert 4:boolean/waiting?, [ + assert 4:boolean/waiting?, [ F read-move-file: routine failed to pause after coming up (before any keys were pressed)] 1:address:shared:channel <- write 1:address:shared:channel, 97/a 1:address:shared:channel <- write 1:address:shared:channel, 97/a @@ -528,7 +528,7 @@ scenario read-move-empty [ wait-for-routine 2:number 3:number <- routine-state 2:number/id 4:boolean/waiting? <- equal 3:number/routine-state, 3/waiting - assert 4:boolean/waiting?, [ + assert 4:boolean/waiting?, [ F read-move-file: routine failed to pause after coming up (before any keys were pressed)] 1:address:shared:channel <- write 1:address:shared:channel, 10/newline 1:address:shared:channel <- write 1:address:shared:channel, 97/a diff --git a/html/chessboard.mu.html b/html/chessboard.mu.html index 2f07b96d..c04a31dd 100644 --- a/html/chessboard.mu.html +++ b/html/chessboard.mu.html @@ -414,8 +414,8 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color wait-for-routine <span class="Constant">2</span>:number <span class="Constant">3</span>:number<span class="Special"> <- </span>routine-state <span class="Constant">2</span>:number/id <span class="Constant">4</span>:boolean/waiting?<span class="Special"> <- </span>equal <span class="Constant">3</span>:number/routine-state, <span class="Constant">3/waiting</span> - assert <span class="Constant">4</span>:boolean/waiting?, [ -F read-move-blocking: routine failed to pause <span class="muRecipe">after</span> coming up (<span class="muRecipe">before</span> any keys were pressed)] + assert <span class="Constant">4</span>:boolean/waiting?, <span class="Constant">[ </span> +<span class="Constant">F read-move-blocking: routine failed to pause after coming up (before any keys were pressed)]</span> <span class="Comment"># press 'a'</span> <span class="Constant">1</span>:address:shared:channel<span class="Special"> <- </span>write <span class="Constant">1</span>:address:shared:channel, <span class="Constant">97/a</span> restart <span class="Constant">2</span>:number/routine @@ -423,8 +423,8 @@ F read-move-blocking: routine failed to pause <span class="muRecipe">after</span wait-for-routine <span class="Constant">2</span>:number <span class="Constant">3</span>:number<span class="Special"> <- </span>routine-state <span class="Constant">2</span>:number/id <span class="Constant">4</span>:boolean/waiting?<span class="Special"> <- </span>equal <span class="Constant">3</span>:number/routine-state, <span class="Constant">3/waiting</span> - assert <span class="Constant">4</span>:boolean/waiting?, [ -F read-move-blocking: routine failed to pause <span class="muRecipe">after</span> rank 'a'] + assert <span class="Constant">4</span>:boolean/waiting?, <span class="Constant">[ </span> +<span class="Constant">F read-move-blocking: routine failed to pause after rank 'a']</span> <span class="Comment"># press '2'</span> <span class="Constant">1</span>:address:shared:channel<span class="Special"> <- </span>write <span class="Constant">1</span>:address:shared:channel, <span class="Constant">50/'2'</span> restart <span class="Constant">2</span>:number/routine @@ -432,8 +432,8 @@ F read-move-blocking: routine failed to pause <span class="muRecipe">after</span wait-for-routine <span class="Constant">2</span>:number <span class="Constant">3</span>:number<span class="Special"> <- </span>routine-state <span class="Constant">2</span>:number/id <span class="Constant">4</span>:boolean/waiting?<span class="Special"> <- </span>equal <span class="Constant">3</span>:number/routine-state, <span class="Constant">3/waiting</span> - assert <span class="Constant">4</span>:boolean/waiting?, [ -F read-move-blocking: routine failed to pause <span class="muRecipe">after</span> file 'a2'] + assert <span class="Constant">4</span>:boolean/waiting?, <span class="Constant">[ </span> +<span class="Constant">F read-move-blocking: routine failed to pause after file 'a2']</span> <span class="Comment"># press '-'</span> <span class="Constant">1</span>:address:shared:channel<span class="Special"> <- </span>write <span class="Constant">1</span>:address:shared:channel, <span class="Constant">45/'-'</span> restart <span class="Constant">2</span>:number/routine @@ -441,8 +441,8 @@ F read-move-blocking: routine failed to pause <span class="muRecipe">after</span wait-for-routine <span class="Constant">2</span>:number <span class="Constant">3</span>:number<span class="Special"> <- </span>routine-state <span class="Constant">2</span>:number <span class="Constant">4</span>:boolean/waiting?<span class="Special"> <- </span>equal <span class="Constant">3</span>:number/routine-state, <span class="Constant">3/waiting</span> - assert <span class="Constant">4</span>:boolean/waiting?/routine-state, [ -F read-move-blocking: routine failed to pause <span class="muRecipe">after</span> hyphen 'a2-'] + assert <span class="Constant">4</span>:boolean/waiting?/routine-state, <span class="Constant">[ </span> +<span class="Constant">F read-move-blocking: routine failed to pause after hyphen 'a2-']</span> <span class="Comment"># press 'a'</span> <span class="Constant">1</span>:address:shared:channel<span class="Special"> <- </span>write <span class="Constant">1</span>:address:shared:channel, <span class="Constant">97/a</span> restart <span class="Constant">2</span>:number/routine @@ -450,8 +450,8 @@ F read-move-blocking: routine failed to pause <span class="muRecipe">after</span wait-for-routine <span class="Constant">2</span>:number <span class="Constant">3</span>:number<span class="Special"> <- </span>routine-state <span class="Constant">2</span>:number <span class="Constant">4</span>:boolean/waiting?<span class="Special"> <- </span>equal <span class="Constant">3</span>:number/routine-state, <span class="Constant">3/waiting</span> - assert <span class="Constant">4</span>:boolean/waiting?/routine-state, [ -F read-move-blocking: routine failed to pause <span class="muRecipe">after</span> rank 'a2-a'] + assert <span class="Constant">4</span>:boolean/waiting?/routine-state, <span class="Constant">[ </span> +<span class="Constant">F read-move-blocking: routine failed to pause after rank 'a2-a']</span> <span class="Comment"># press '4'</span> <span class="Constant">1</span>:address:shared:channel<span class="Special"> <- </span>write <span class="Constant">1</span>:address:shared:channel, <span class="Constant">52/'4'</span> restart <span class="Constant">2</span>:number/routine @@ -459,8 +459,8 @@ F read-move-blocking: routine failed to pause <span class="muRecipe">after</span wait-for-routine <span class="Constant">2</span>:number <span class="Constant">3</span>:number<span class="Special"> <- </span>routine-state <span class="Constant">2</span>:number <span class="Constant">4</span>:boolean/waiting?<span class="Special"> <- </span>equal <span class="Constant">3</span>:number/routine-state, <span class="Constant">3/waiting</span> - assert <span class="Constant">4</span>:boolean/waiting?, [ -F read-move-blocking: routine failed to pause <span class="muRecipe">after</span> file 'a2-a4'] + assert <span class="Constant">4</span>:boolean/waiting?, <span class="Constant">[ </span> +<span class="Constant">F read-move-blocking: routine failed to pause after file 'a2-a4']</span> <span class="Comment"># press 'newline'</span> <span class="Constant">1</span>:address:shared:channel<span class="Special"> <- </span>write <span class="Constant">1</span>:address:shared:channel, <span class="Constant">10</span> <span class="Comment"># newline</span> restart <span class="Constant">2</span>:number/routine @@ -468,8 +468,8 @@ F read-move-blocking: routine failed to pause <span class="muRecipe">after</span wait-for-routine <span class="Constant">2</span>:number <span class="Constant">3</span>:number<span class="Special"> <- </span>routine-state <span class="Constant">2</span>:number <span class="Constant">4</span>:boolean/completed?<span class="Special"> <- </span>equal <span class="Constant">3</span>:number/routine-state, <span class="Constant">1/completed</span> - assert <span class="Constant">4</span>:boolean/completed?, [ -F read-move-blocking: routine failed to terminate on newline] + assert <span class="Constant">4</span>:boolean/completed?, <span class="Constant">[ </span> +<span class="Constant">F read-move-blocking: routine failed to terminate on newline]</span> trace <span class="Constant">1</span>, <span class="Constant">[test]</span>, <span class="Constant">[reached end]</span> ] trace-should-contain [ @@ -486,8 +486,8 @@ F read-move-blocking: routine failed to terminate on newline] wait-for-routine <span class="Constant">2</span>:number <span class="Constant">3</span>:number<span class="Special"> <- </span>routine-state <span class="Constant">2</span>:number/id <span class="Constant">4</span>:boolean/waiting?<span class="Special"> <- </span>equal <span class="Constant">3</span>:number/routine-state, <span class="Constant">3/waiting</span> - assert <span class="Constant">4</span>:boolean/waiting?, [ -F read-move-quit: routine failed to pause <span class="muRecipe">after</span> coming up (<span class="muRecipe">before</span> any keys were pressed)] + assert <span class="Constant">4</span>:boolean/waiting?, <span class="Constant">[ </span> +<span class="Constant">F read-move-quit: routine failed to pause after coming up (before any keys were pressed)]</span> <span class="Comment"># press 'q'</span> <span class="Constant">1</span>:address:shared:channel<span class="Special"> <- </span>write <span class="Constant">1</span>:address:shared:channel, <span class="Constant">113/q</span> restart <span class="Constant">2</span>:number/routine @@ -495,8 +495,8 @@ F read-move-quit: routine failed to pause <span class="muRecipe">after</span> co wait-for-routine <span class="Constant">2</span>:number <span class="Constant">3</span>:number<span class="Special"> <- </span>routine-state <span class="Constant">2</span>:number/id <span class="Constant">4</span>:boolean/completed?<span class="Special"> <- </span>equal <span class="Constant">3</span>:number/routine-state, <span class="Constant">1/completed</span> - assert <span class="Constant">4</span>:boolean/completed?, [ -F read-move-quit: routine failed to terminate on 'q'] + assert <span class="Constant">4</span>:boolean/completed?, <span class="Constant">[ </span> +<span class="Constant">F read-move-quit: routine failed to terminate on 'q']</span> trace <span class="Constant">1</span>, <span class="Constant">[test]</span>, <span class="Constant">[reached end]</span> ] trace-should-contain [ @@ -513,8 +513,8 @@ F read-move-quit: routine failed to terminate on 'q'] wait-for-routine <span class="Constant">2</span>:number <span class="Constant">3</span>:number<span class="Special"> <- </span>routine-state <span class="Constant">2</span>:number/id <span class="Constant">4</span>:boolean/waiting?<span class="Special"> <- </span>equal <span class="Constant">3</span>:number/routine-state, <span class="Constant">3/waiting</span> - assert <span class="Constant">4</span>:boolean/waiting?, [ -F read-move-file: routine failed to pause <span class="muRecipe">after</span> coming up (<span class="muRecipe">before</span> any keys were pressed)] + assert <span class="Constant">4</span>:boolean/waiting?, <span class="Constant">[ </span> +<span class="Constant">F read-move-file: routine failed to pause after coming up (before any keys were pressed)]</span> <span class="Constant">1</span>:address:shared:channel<span class="Special"> <- </span>write <span class="Constant">1</span>:address:shared:channel, <span class="Constant">50/'2'</span> restart <span class="Constant">2</span>:number/routine wait-for-routine <span class="Constant">2</span>:number @@ -534,8 +534,8 @@ F read-move-file: routine failed to pause <span class="muRecipe">after</span> co wait-for-routine <span class="Constant">2</span>:number <span class="Constant">3</span>:number<span class="Special"> <- </span>routine-state <span class="Constant">2</span>:number/id <span class="Constant">4</span>:boolean/waiting?<span class="Special"> <- </span>equal <span class="Constant">3</span>:number/routine-state, <span class="Constant">3/waiting</span> - assert <span class="Constant">4</span>:boolean/waiting?, [ -F read-move-file: routine failed to pause <span class="muRecipe">after</span> coming up (<span class="muRecipe">before</span> any keys were pressed)] + assert <span class="Constant">4</span>:boolean/waiting?, <span class="Constant">[ </span> +<span class="Constant">F read-move-file: routine failed to pause after coming up (before any keys were pressed)]</span> <span class="Constant">1</span>:address:shared:channel<span class="Special"> <- </span>write <span class="Constant">1</span>:address:shared:channel, <span class="Constant">97/a</span> <span class="Constant">1</span>:address:shared:channel<span class="Special"> <- </span>write <span class="Constant">1</span>:address:shared:channel, <span class="Constant">97/a</span> restart <span class="Constant">2</span>:number/routine @@ -556,8 +556,8 @@ F read-move-file: routine failed to pause <span class="muRecipe">after</span> co wait-for-routine <span class="Constant">2</span>:number <span class="Constant">3</span>:number<span class="Special"> <- </span>routine-state <span class="Constant">2</span>:number/id <span class="Constant">4</span>:boolean/waiting?<span class="Special"> <- </span>equal <span class="Constant">3</span>:number/routine-state, <span class="Constant">3/waiting</span> - assert <span class="Constant">4</span>:boolean/waiting?, [ -F read-move-file: routine failed to pause <span class="muRecipe">after</span> coming up (<span class="muRecipe">before</span> any keys were pressed)] + assert <span class="Constant">4</span>:boolean/waiting?, <span class="Constant">[ </span> +<span class="Constant">F read-move-file: routine failed to pause after coming up (before any keys were pressed)]</span> <span class="Constant">1</span>:address:shared:channel<span class="Special"> <- </span>write <span class="Constant">1</span>:address:shared:channel, <span class="Constant">10/newline</span> <span class="Constant">1</span>:address:shared:channel<span class="Special"> <- </span>write <span class="Constant">1</span>:address:shared:channel, <span class="Constant">97/a</span> restart <span class="Constant">2</span>:number/routine |