about summary refs log tree commit diff stats
path: root/061channel.mu
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2015-06-19 16:34:11 -0700
committerKartik K. Agaram <vc@akkartik.com>2015-06-19 16:34:11 -0700
commita91c1c2a28583262cc6052a5c3d9e713e9b4c0e0 (patch)
treeeb9d9b38071275630e9533b2b02ddde048bae582 /061channel.mu
parentfc52705f4956df9a756b902b187f31799c1451a4 (diff)
downloadmu-a91c1c2a28583262cc6052a5c3d9e713e9b4c0e0.tar.gz
1599
Diffstat (limited to '061channel.mu')
-rw-r--r--061channel.mu28
1 files changed, 14 insertions, 14 deletions
diff --git a/061channel.mu b/061channel.mu
index e3f039dd..94c51df0 100644
--- a/061channel.mu
+++ b/061channel.mu
@@ -10,7 +10,7 @@
 
 scenario channel [
   run [
-    1:address:channel <- init-channel 3:literal/capacity
+    1:address:channel <- new-channel 3:literal/capacity
     1:address:channel <- write 1:address:channel, 34:literal
     2:number, 1:address:channel <- read 1:address:channel
   ]
@@ -31,8 +31,8 @@ container channel [
   data:address:array:location
 ]
 
-# result:address:channel <- init-channel capacity:number
-recipe init-channel [
+# result:address:channel <- new-channel capacity:number
+recipe new-channel [
   default-space:address:array:location <- new location:type, 30:literal
   # result = new channel
   result:address:channel <- new channel:type
@@ -119,7 +119,7 @@ recipe clear-channel [
 
 scenario channel-initialization [
   run [
-    1:address:channel <- init-channel 3:literal/capacity
+    1:address:channel <- new-channel 3:literal/capacity
     2:number <- get 1:address:channel/deref, first-full:offset
     3:number <- get 1:address:channel/deref, first-free:offset
   ]
@@ -131,7 +131,7 @@ scenario channel-initialization [
 
 scenario channel-write-increments-free [
   run [
-    1:address:channel <- init-channel 3:literal/capacity
+    1:address:channel <- new-channel 3:literal/capacity
     1:address:channel <- write 1:address:channel, 34:literal
     2:number <- get 1:address:channel/deref, first-full:offset
     3:number <- get 1:address:channel/deref, first-free:offset
@@ -144,7 +144,7 @@ scenario channel-write-increments-free [
 
 scenario channel-read-increments-full [
   run [
-    1:address:channel <- init-channel 3:literal/capacity
+    1:address:channel <- new-channel 3:literal/capacity
     1:address:channel <- write 1:address:channel, 34:literal
     _, 1:address:channel <- read 1:address:channel
     2:number <- get 1:address:channel/deref, first-full:offset
@@ -159,7 +159,7 @@ scenario channel-read-increments-full [
 scenario channel-wrap [
   run [
     # channel with just 1 slot
-    1:address:channel <- init-channel 1:literal/capacity
+    1:address:channel <- new-channel 1:literal/capacity
     # write and read a value
     1:address:channel <- write 1:address:channel, 34:literal
     _, 1:address:channel <- read 1:address:channel
@@ -226,7 +226,7 @@ recipe channel-capacity [
 
 scenario channel-new-empty-not-full [
   run [
-    1:address:channel <- init-channel 3:literal/capacity
+    1:address:channel <- new-channel 3:literal/capacity
     2:boolean <- channel-empty? 1:address:channel
     3:boolean <- channel-full? 1:address:channel
   ]
@@ -238,7 +238,7 @@ scenario channel-new-empty-not-full [
 
 scenario channel-write-not-empty [
   run [
-    1:address:channel <- init-channel 3:literal/capacity
+    1:address:channel <- new-channel 3:literal/capacity
     1:address:channel <- write 1:address:channel, 34:literal
     2:boolean <- channel-empty? 1:address:channel
     3:boolean <- channel-full? 1:address:channel
@@ -251,7 +251,7 @@ scenario channel-write-not-empty [
 
 scenario channel-write-full [
   run [
-    1:address:channel <- init-channel 1:literal/capacity
+    1:address:channel <- new-channel 1:literal/capacity
     1:address:channel <- write 1:address:channel, 34:literal
     2:boolean <- channel-empty? 1:address:channel
     3:boolean <- channel-full? 1:address:channel
@@ -264,7 +264,7 @@ scenario channel-write-full [
 
 scenario channel-read-not-full [
   run [
-    1:address:channel <- init-channel 1:literal/capacity
+    1:address:channel <- new-channel 1:literal/capacity
     1:address:channel <- write 1:address:channel, 34:literal
     _, 1:address:channel <- read 1:address:channel
     2:boolean <- channel-empty? 1:address:channel
@@ -286,7 +286,7 @@ recipe buffer-lines [
   out:address:channel <- next-ingredient
   # repeat forever
   {
-    line:address:buffer <- init-buffer, 30:literal
+    line:address:buffer <- new-buffer, 30:literal
     # read characters from 'in' until newline, copy into line
     {
       +next-character
@@ -351,8 +351,8 @@ recipe buffer-lines [
 
 scenario buffer-lines-blocks-until-newline [
   run [
-    1:address:channel/stdin <- init-channel 10:literal/capacity
-    2:address:channel/buffered-stdin <- init-channel 10:literal/capacity
+    1:address:channel/stdin <- new-channel 10:literal/capacity
+    2:address:channel/buffered-stdin <- new-channel 10:literal/capacity
     3:boolean <- channel-empty? 2:address:channel/buffered-stdin
     assert 3:boolean, [
 F buffer-lines-blocks-until-newline: channel should be empty after init]