about summary refs log tree commit diff stats
path: root/090scenario_filesystem_test.mu
diff options
context:
space:
mode:
Diffstat (limited to '090scenario_filesystem_test.mu')
-rw-r--r--090scenario_filesystem_test.mu21
1 files changed, 20 insertions, 1 deletions
diff --git a/090scenario_filesystem_test.mu b/090scenario_filesystem_test.mu
index c33eeb81..6d212f88 100644
--- a/090scenario_filesystem_test.mu
+++ b/090scenario_filesystem_test.mu
@@ -22,7 +22,7 @@ scenario read-from-fake-file [
   ]
 ]
 
-scenario write-to-fake-file [
+scenario write-to-new-fake-file [
   local-scope
   assume-resources [
   ]
@@ -38,6 +38,25 @@ scenario write-to-fake-file [
   ]
 ]
 
+scenario write-to-new-fake-file-2 [
+  local-scope
+  assume-resources [
+    [a] <- [
+      |abc|
+    ]
+  ]
+  sink:&:sink:char, writer:num/routine <- start-writing resources, [b]
+  sink <- write sink, 120/x
+  sink <- write sink, 121/y
+  close sink
+  wait-for-routine writer
+  contents-read-back:text <- slurp resources, [b]
+  10:bool/raw <- equal contents-read-back, [xy]
+  memory-should-contain [
+    10 <- 1  # file contents read back exactly match what was written
+  ]
+]
+
 scenario write-to-fake-file-that-exists [
   local-scope
   assume-resources [