From 9e751bb8c0cdf771d34c839cb6591d892b8e62de Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Tue, 7 Mar 2017 01:41:48 -0800 Subject: 3761 --- html/090scenario_filesystem_test.mu.html | 45 ++++++++++++++++---------------- 1 file changed, 23 insertions(+), 22 deletions(-) (limited to 'html/090scenario_filesystem_test.mu.html') diff --git a/html/090scenario_filesystem_test.mu.html b/html/090scenario_filesystem_test.mu.html index 94ec62a7..e0a8ba7f 100644 --- a/html/090scenario_filesystem_test.mu.html +++ b/html/090scenario_filesystem_test.mu.html @@ -15,11 +15,12 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color a { text-decoration: none; } a:hover { text-decoration: underline; } * { font-size: 12pt; font-size: 1em; } +.Conceal { color: #4e4e4e; } +.muScenario { color: #00af00; } .Special { color: #c00000; } .Comment { color: #9090ff; } .Constant { color: #00a0a0; } .LineNr { color: #444444; } -.muScenario { color: #00af00; } --> @@ -59,9 +60,9 @@ if ('onhashchange' in window) { 3 scenario read-from-fake-file [ 4 local-scope 5 assume-resources [ - 6 [a] <- [ - 7 |xyz| - 8 ] + 6 ¦ [a] <- [ + 7 ¦ ¦ |xyz| + 8 ¦ ] 9 ] 10 contents:&:source:char <- start-reading resources, [a] 11 1:char/raw <- read contents @@ -70,11 +71,11 @@ if ('onhashchange' in window) { 14 4:char/raw <- read contents 15 _, 5:bool/raw <- read contents 16 memory-should-contain [ -17 1 <- 120 # x -18 2 <- 121 # y -19 3 <- 122 # z -20 4 <- 10 # newline -21 5 <- 1 # eof +17 ¦ 1 <- 120 # x +18 ¦ 2 <- 121 # y +19 ¦ 3 <- 122 # z +20 ¦ 4 <- 10 # newline +21 ¦ 5 <- 1 # eof 22 ] 23 ] 24 @@ -90,16 +91,16 @@ if ('onhashchange' in window) { 34 contents-read-back:text <- slurp resources, [a] 35 10:bool/raw <- equal contents-read-back, [xy] 36 memory-should-contain [ -37 10 <- 1 # file contents read back exactly match what was written +37 ¦ 10 <- 1 # file contents read back exactly match what was written 38 ] 39 ] 40 41 scenario write-to-new-fake-file-2 [ 42 local-scope 43 assume-resources [ -44 [a] <- [ -45 |abc| -46 ] +44 ¦ [a] <- [ +45 ¦ ¦ |abc| +46 ¦ ] 47 ] 48 sink:&:sink:char, writer:num/routine <- start-writing resources, [b] 49 sink <- write sink, 120/x @@ -109,14 +110,14 @@ if ('onhashchange' in window) { 53 contents-read-back:text <- slurp resources, [b] 54 10:bool/raw <- equal contents-read-back, [xy] 55 memory-should-contain [ -56 10 <- 1 # file contents read back exactly match what was written +56 ¦ 10 <- 1 # file contents read back exactly match what was written 57 ] 58 ] 59 60 scenario write-to-fake-file-that-exists [ 61 local-scope 62 assume-resources [ -63 [a] <- [] +63 ¦ [a] <- [] 64 ] 65 sink:&:sink:char, writer:num/routine <- start-writing resources, [a] 66 sink <- write sink, 120/x @@ -126,17 +127,17 @@ if ('onhashchange' in window) { 70 contents-read-back:text <- slurp resources, [a] 71 10:bool/raw <- equal contents-read-back, [xy] 72 memory-should-contain [ -73 10 <- 1 # file contents read back exactly match what was written +73 ¦ 10 <- 1 # file contents read back exactly match what was written 74 ] 75 ] 76 77 scenario write-to-existing-file-preserves-other-files [ 78 local-scope 79 assume-resources [ -80 [a] <- [] -81 [b] <- [ -82 |bcd| -83 ] +80 ¦ [a] <- [] +81 ¦ [b] <- [ +82 ¦ ¦ |bcd| +83 ¦ ] 84 ] 85 sink:&:sink:char, writer:num/routine <- start-writing resources, [a] 86 sink <- write sink, 120/x @@ -149,8 +150,8 @@ if ('onhashchange' in window) { 93 11:bool/raw <- equal other-file-contents, [bcd 94 ] 95 memory-should-contain [ -96 10 <- 1 # file contents read back exactly match what was written -97 11 <- 1 # other files also continue to persist unchanged +96 ¦ 10 <- 1 # file contents read back exactly match what was written +97 ¦ 11 <- 1 # other files also continue to persist unchanged 98 ] 99 ] -- cgit 1.4.1-2-gfad0