diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2016-10-23 19:45:36 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2016-10-23 19:56:28 -0700 |
commit | f918675c8b11adb80a83000a3a984e4ff3bdcf1b (patch) | |
tree | 2472316e3bf536e0bad76751c5f3504d029b8215 /html/090scenario_filesystem_test.mu.html | |
parent | af7349d50c40e0604c9bb1e9a50aa1c3c0d407d8 (diff) | |
download | mu-f918675c8b11adb80a83000a3a984e4ff3bdcf1b.tar.gz |
3569
Update syntax highlighting to not color numeric locations like literals.
Diffstat (limited to 'html/090scenario_filesystem_test.mu.html')
-rw-r--r-- | html/090scenario_filesystem_test.mu.html | 82 |
1 files changed, 41 insertions, 41 deletions
diff --git a/html/090scenario_filesystem_test.mu.html b/html/090scenario_filesystem_test.mu.html index 4bb717c3..f82e26e0 100644 --- a/html/090scenario_filesystem_test.mu.html +++ b/html/090scenario_filesystem_test.mu.html @@ -36,22 +36,22 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color <span class="muScenario">scenario</span> read-from-fake-file [ <span class="Constant">local-scope</span> assume-resources [ - <span class="Constant">[a]</span><span class="Special"> <- </span>[ + <span class="Constant">[a]</span> <span class="Special"><-</span> [ <span class="Constant"> |xyz|</span> ] ] - contents:&:source:char<span class="Special"> <- </span>start-reading resources, <span class="Constant">[a]</span> - <span class="Constant">1</span>:char/<span class="Special">raw <- </span>read contents - <span class="Constant">2</span>:char/<span class="Special">raw <- </span>read contents - <span class="Constant">3</span>:char/<span class="Special">raw <- </span>read contents - <span class="Constant">4</span>:char/<span class="Special">raw <- </span>read contents - _, <span class="Constant">5</span>:bool/<span class="Special">raw <- </span>read contents + contents:&:source:char <span class="Special"><-</span> start-reading resources, <span class="Constant">[a]</span> + 1:char/<span class="Special">raw</span> <span class="Special"><-</span> read contents + 2:char/<span class="Special">raw</span> <span class="Special"><-</span> read contents + 3:char/<span class="Special">raw</span> <span class="Special"><-</span> read contents + 4:char/<span class="Special">raw</span> <span class="Special"><-</span> read contents + _, 5:bool/<span class="Special">raw</span> <span class="Special"><-</span> read contents memory-should-contain [ - <span class="Constant">1</span><span class="Special"> <- </span><span class="Constant">120</span> <span class="Comment"># x</span> - <span class="Constant">2</span><span class="Special"> <- </span><span class="Constant">121</span> <span class="Comment"># y</span> - <span class="Constant">3</span><span class="Special"> <- </span><span class="Constant">122</span> <span class="Comment"># z</span> - <span class="Constant">4</span><span class="Special"> <- </span><span class="Constant">10</span> <span class="Comment"># newline</span> - <span class="Constant">5</span><span class="Special"> <- </span><span class="Constant">1</span> <span class="Comment"># eof</span> + <span class="Constant"> 1</span> <span class="Special"><-</span><span class="Constant"> 120</span> <span class="Comment"># x</span> + <span class="Constant"> 2</span> <span class="Special"><-</span><span class="Constant"> 121</span> <span class="Comment"># y</span> + <span class="Constant"> 3</span> <span class="Special"><-</span><span class="Constant"> 122</span> <span class="Comment"># z</span> + <span class="Constant"> 4</span> <span class="Special"><-</span><span class="Constant"> 10</span> <span class="Comment"># newline</span> + <span class="Constant"> 5</span> <span class="Special"><-</span><span class="Constant"> 1</span> <span class="Comment"># eof</span> ] ] @@ -59,71 +59,71 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color <span class="Constant">local-scope</span> assume-resources [ ] - sink:&:sink:char, writer:num/routine<span class="Special"> <- </span>start-writing resources, <span class="Constant">[a]</span> - sink<span class="Special"> <- </span>write sink, <span class="Constant">120/x</span> - sink<span class="Special"> <- </span>write sink, <span class="Constant">121/y</span> + sink:&:sink:char, writer:num/routine <span class="Special"><-</span> start-writing resources, <span class="Constant">[a]</span> + sink <span class="Special"><-</span> write sink, <span class="Constant">120/x</span> + sink <span class="Special"><-</span> write sink, <span class="Constant">121/y</span> close sink wait-for-routine writer - contents-read-back:text<span class="Special"> <- </span>slurp resources, <span class="Constant">[a]</span> - <span class="Constant">10</span>:bool/<span class="Special">raw <- </span>equal contents-read-back, <span class="Constant">[xy]</span> + contents-read-back:text <span class="Special"><-</span> slurp resources, <span class="Constant">[a]</span> + 10:bool/<span class="Special">raw</span> <span class="Special"><-</span> equal contents-read-back, <span class="Constant">[xy]</span> memory-should-contain [ - <span class="Constant">10</span><span class="Special"> <- </span><span class="Constant">1</span> <span class="Comment"># file contents read back exactly match what was written</span> + <span class="Constant"> 10</span> <span class="Special"><-</span><span class="Constant"> 1</span> <span class="Comment"># file contents read back exactly match what was written</span> ] ] <span class="muScenario">scenario</span> write-to-fake-file-that-exists [ <span class="Constant">local-scope</span> assume-resources [ - <span class="Constant">[a]</span><span class="Special"> <- </span><span class="Constant">[]</span> + <span class="Constant">[a]</span> <span class="Special"><-</span> <span class="Constant">[]</span> ] - sink:&:sink:char, writer:num/routine<span class="Special"> <- </span>start-writing resources, <span class="Constant">[a]</span> - sink<span class="Special"> <- </span>write sink, <span class="Constant">120/x</span> - sink<span class="Special"> <- </span>write sink, <span class="Constant">121/y</span> + sink:&:sink:char, writer:num/routine <span class="Special"><-</span> start-writing resources, <span class="Constant">[a]</span> + sink <span class="Special"><-</span> write sink, <span class="Constant">120/x</span> + sink <span class="Special"><-</span> write sink, <span class="Constant">121/y</span> close sink wait-for-routine writer - contents-read-back:text<span class="Special"> <- </span>slurp resources, <span class="Constant">[a]</span> - <span class="Constant">10</span>:bool/<span class="Special">raw <- </span>equal contents-read-back, <span class="Constant">[xy]</span> + contents-read-back:text <span class="Special"><-</span> slurp resources, <span class="Constant">[a]</span> + 10:bool/<span class="Special">raw</span> <span class="Special"><-</span> equal contents-read-back, <span class="Constant">[xy]</span> memory-should-contain [ - <span class="Constant">10</span><span class="Special"> <- </span><span class="Constant">1</span> <span class="Comment"># file contents read back exactly match what was written</span> + <span class="Constant"> 10</span> <span class="Special"><-</span><span class="Constant"> 1</span> <span class="Comment"># file contents read back exactly match what was written</span> ] ] <span class="muScenario">scenario</span> write-to-existing-file-preserves-other-files [ <span class="Constant">local-scope</span> assume-resources [ - <span class="Constant">[a]</span><span class="Special"> <- </span><span class="Constant">[]</span> - <span class="Constant">[b]</span><span class="Special"> <- </span>[ + <span class="Constant">[a]</span> <span class="Special"><-</span> <span class="Constant">[]</span> + <span class="Constant">[b]</span> <span class="Special"><-</span> [ <span class="Constant"> |bcd|</span> ] ] - sink:&:sink:char, writer:num/routine<span class="Special"> <- </span>start-writing resources, <span class="Constant">[a]</span> - sink<span class="Special"> <- </span>write sink, <span class="Constant">120/x</span> - sink<span class="Special"> <- </span>write sink, <span class="Constant">121/y</span> + sink:&:sink:char, writer:num/routine <span class="Special"><-</span> start-writing resources, <span class="Constant">[a]</span> + sink <span class="Special"><-</span> write sink, <span class="Constant">120/x</span> + sink <span class="Special"><-</span> write sink, <span class="Constant">121/y</span> close sink wait-for-routine writer - contents-read-back:text<span class="Special"> <- </span>slurp resources, <span class="Constant">[a]</span> - <span class="Constant">10</span>:bool/<span class="Special">raw <- </span>equal contents-read-back, <span class="Constant">[xy]</span> - other-file-contents:text<span class="Special"> <- </span>slurp resources, <span class="Constant">[b]</span> - <span class="Constant">11</span>:bool/<span class="Special">raw <- </span>equal other-file-contents, <span class="Constant">[bcd</span> + contents-read-back:text <span class="Special"><-</span> slurp resources, <span class="Constant">[a]</span> + 10:bool/<span class="Special">raw</span> <span class="Special"><-</span> equal contents-read-back, <span class="Constant">[xy]</span> + other-file-contents:text <span class="Special"><-</span> slurp resources, <span class="Constant">[b]</span> + 11:bool/<span class="Special">raw</span> <span class="Special"><-</span> equal other-file-contents, <span class="Constant">[bcd</span> <span class="Constant">]</span> memory-should-contain [ - <span class="Constant">10</span><span class="Special"> <- </span><span class="Constant">1</span> <span class="Comment"># file contents read back exactly match what was written</span> - <span class="Constant">11</span><span class="Special"> <- </span><span class="Constant">1</span> <span class="Comment"># other files also continue to persist unchanged</span> + <span class="Constant"> 10</span> <span class="Special"><-</span><span class="Constant"> 1</span> <span class="Comment"># file contents read back exactly match what was written</span> + <span class="Constant"> 11</span> <span class="Special"><-</span><span class="Constant"> 1</span> <span class="Comment"># other files also continue to persist unchanged</span> ] ] <span class="muRecipe">def</span> slurp resources:&:resources, filename:text<span class="muRecipe"> -> </span>contents:text [ <span class="Constant">local-scope</span> <span class="Constant">load-ingredients</span> - source:&:source:char<span class="Special"> <- </span>start-reading resources, filename - buf:&:buffer<span class="Special"> <- </span>new-buffer <span class="Constant">30/capacity</span> + source:&:source:char <span class="Special"><-</span> start-reading resources, filename + buf:&:buffer <span class="Special"><-</span> new-buffer <span class="Constant">30/capacity</span> <span class="Delimiter">{</span> - c:char, done?:bool, source<span class="Special"> <- </span>read source + c:char, done?:bool, source <span class="Special"><-</span> read source <span class="muControl">break-if</span> done? - buf<span class="Special"> <- </span>append buf, c + buf <span class="Special"><-</span> append buf, c <span class="muControl">loop</span> <span class="Delimiter">}</span> - contents<span class="Special"> <- </span>buffer-to-array buf + contents <span class="Special"><-</span> buffer-to-array buf ] </pre> </body> |