diff options
| author | Kartik K. Agaram <vc@akkartik.com> | 2016-09-12 00:06:40 -0700 |
|---|---|---|
| committer | Kartik K. Agaram <vc@akkartik.com> | 2016-09-12 00:38:36 -0700 |
| commit | ea19d0dc2c11f48ca384fb087b4e44ef400bfaa2 (patch) | |
| tree | ba204ece67397481a3104f4c7c1d6a0f3ad271f7 /090scenario_filesystem_test.mu | |
| parent | ec1cd4ae38f283970a401354a1ec17823fa0b7da (diff) | |
| download | mu-ea19d0dc2c11f48ca384fb087b4e44ef400bfaa2.tar.gz | |
3337 - first use of type abbreviations: text
In the process I've uncover a couple of situations we don't support type abbreviations yet. They're next.
Diffstat (limited to '090scenario_filesystem_test.mu')
| -rw-r--r-- | 090scenario_filesystem_test.mu | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/090scenario_filesystem_test.mu b/090scenario_filesystem_test.mu index b959c141..0eefadad 100644 --- a/090scenario_filesystem_test.mu +++ b/090scenario_filesystem_test.mu @@ -31,7 +31,7 @@ scenario write-to-fake-file [ sink <- write sink, 121/y close sink wait-for-routine writer - contents-read-back:address:array:character <- slurp filesystem, [a] + contents-read-back:text <- slurp filesystem, [a] 10:boolean/raw <- equal contents-read-back, [xy] memory-should-contain [ 10 <- 1 # file contents read back exactly match what was written @@ -48,7 +48,7 @@ scenario write-to-fake-file-that-exists [ sink <- write sink, 121/y close sink wait-for-routine writer - contents-read-back:address:array:character <- slurp filesystem, [a] + contents-read-back:text <- slurp filesystem, [a] 10:boolean/raw <- equal contents-read-back, [xy] memory-should-contain [ 10 <- 1 # file contents read back exactly match what was written @@ -68,9 +68,9 @@ scenario write-to-existing-file-preserves-other-files [ sink <- write sink, 121/y close sink wait-for-routine writer - contents-read-back:address:array:character <- slurp filesystem, [a] + contents-read-back:text <- slurp filesystem, [a] 10:boolean/raw <- equal contents-read-back, [xy] - other-file-contents:address:array:character <- slurp filesystem, [b] + other-file-contents:text <- slurp filesystem, [b] 11:boolean/raw <- equal other-file-contents, [bcd ] memory-should-contain [ |