diff options
| author | Kartik K. Agaram <vc@akkartik.com> | 2016-09-17 12:55:10 -0700 |
|---|---|---|
| committer | Kartik K. Agaram <vc@akkartik.com> | 2016-09-17 12:55:10 -0700 |
| commit | 760f683f2755038a1b0c16522f5001b889096aa5 (patch) | |
| tree | e07afd384d45be93d81fb4c1788b332fe05799a0 /090scenario_filesystem_test.mu | |
| parent | 80df524b566a708551f752ce8b82e21738591651 (diff) | |
| download | mu-760f683f2755038a1b0c16522f5001b889096aa5.tar.gz | |
3389
Diffstat (limited to '090scenario_filesystem_test.mu')
| -rw-r--r-- | 090scenario_filesystem_test.mu | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/090scenario_filesystem_test.mu b/090scenario_filesystem_test.mu index caaecbd2..c255e69b 100644 --- a/090scenario_filesystem_test.mu +++ b/090scenario_filesystem_test.mu @@ -7,7 +7,7 @@ scenario read-from-fake-file [ |xyz| ] ] - contents:address:source:char <- start-reading filesystem:address:filesystem, [a] + contents:&:source:char <- start-reading filesystem:&:filesystem, [a] 1:char/raw <- read contents 2:char/raw <- read contents 3:char/raw <- read contents @@ -26,7 +26,7 @@ scenario write-to-fake-file [ local-scope assume-filesystem [ ] - sink:address:sink:char, writer:num/routine <- start-writing filesystem:address:filesystem, [a] + sink:&:sink:char, writer:num/routine <- start-writing filesystem:&:filesystem, [a] sink <- write sink, 120/x sink <- write sink, 121/y close sink @@ -43,7 +43,7 @@ scenario write-to-fake-file-that-exists [ assume-filesystem [ [a] <- [] ] - sink:address:sink:char, writer:num/routine <- start-writing filesystem:address:filesystem, [a] + sink:&:sink:char, writer:num/routine <- start-writing filesystem:&:filesystem, [a] sink <- write sink, 120/x sink <- write sink, 121/y close sink @@ -63,7 +63,7 @@ scenario write-to-existing-file-preserves-other-files [ |bcd| ] ] - sink:address:sink:char, writer:num/routine <- start-writing filesystem:address:filesystem, [a] + sink:&:sink:char, writer:num/routine <- start-writing filesystem:&:filesystem, [a] sink <- write sink, 120/x sink <- write sink, 121/y close sink @@ -79,11 +79,11 @@ scenario write-to-existing-file-preserves-other-files [ ] ] -def slurp fs:address:filesystem, filename:text -> contents:text [ +def slurp fs:&:filesystem, filename:text -> contents:text [ local-scope load-ingredients - source:address:source:char <- start-reading fs, filename - buf:address:buffer <- new-buffer 30/capacity + source:&:source:char <- start-reading fs, filename + buf:&:buffer <- new-buffer 30/capacity { c:char, done?:bool, source <- read source break-if done? |