From 65361948ca7975553757a0e0df4ac7352413044c Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Thu, 14 May 2015 16:04:45 -0700 Subject: 1376 - update github docs --- html/076scenario_keyboard_test.mu.html | 28 ++++++++++++++-------------- 1 file changed, 14 insertions(+), 14 deletions(-) (limited to 'html/076scenario_keyboard_test.mu.html') diff --git a/html/076scenario_keyboard_test.mu.html b/html/076scenario_keyboard_test.mu.html index 233ae5eb..00081624 100644 --- a/html/076scenario_keyboard_test.mu.html +++ b/html/076scenario_keyboard_test.mu.html @@ -2,7 +2,7 @@ -Mu - 076scenario_keyboard_test.mu +~/Desktop/s/mu/076scenario_keyboard_test.mu @@ -14,7 +14,7 @@ pre { white-space: pre-wrap; font-family: monospace; color: #d0d0d0; background- body { font-family: monospace; color: #d0d0d0; background-color: #000000; } * { font-size: 1em; } .Comment { color: #8080ff; } -.Delimiter { color: #c000c0; } +.Constant { color: #008080; } .Special { color: #ff6060; } --> @@ -31,25 +31,25 @@ body { font-family: monospace; color: #d0d0d0; background-color: #000000; } # scenario_keyboard.mu # Tests for keyboard interface. -scenario read-key-in-mu [ - assume-keyboard [abc] - run [ +scenario read-key-in-mu [ + assume-keyboard [abc] + run [ 1:character, 2:boolean, keyboard:address <- read-key keyboard:address 3:character, 4:boolean, keyboard:address <- read-key keyboard:address 5:character, 6:boolean, keyboard:address <- read-key keyboard:address 7:character, 8:boolean, keyboard:address <- read-key keyboard:address - ] - memory-should-contain [ + ] + memory-should-contain [ 1 <- 97 # 'a' - 2 <- 1 # first read-key call found a character + 2 <- 1 3 <- 98 # 'b' - 4 <- 1 # second read-key call found a character + 4 <- 1 5 <- 99 # 'c' - 6 <- 1 # third read-key call found a character - 7 <- 0 - 8 <- 0 # fourth read-key call didn't find a character - ] -] + 6 <- 1 + 7 <- 0 # eof + 8 <- 1 + ] +] -- cgit 1.4.1-2-gfad0