diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2014-11-15 14:58:58 -0800 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2014-11-15 14:58:58 -0800 |
commit | ea36397b5010be4d79dcb07be5ed2b3b84217040 (patch) | |
tree | cce5cced1492a792eb814e7760ef72fa0e740080 /mu.arc.t | |
parent | 44de0079e5a5a3c46370fd70af790beb886c052e (diff) | |
download | mu-ea36397b5010be4d79dcb07be5ed2b3b84217040.tar.gz |
267 - more intuitive channel capacity
Diffstat (limited to 'mu.arc.t')
-rw-r--r-- | mu.arc.t | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/mu.arc.t b/mu.arc.t index 04d3ffbe..460465ed 100644 --- a/mu.arc.t +++ b/mu.arc.t @@ -1890,8 +1890,8 @@ (new-trace "channel-write-wrap") (add-fns '((main - ; channel with 2 slots (capacity 1 since we waste a slot) - ((1 channel-address) <- new-channel (2 literal)) + ; channel with 1 slot + ((1 channel-address) <- new-channel (1 literal)) ; write a value ((2 integer-address) <- new (integer literal)) ((2 integer-address deref) <- copy (34 literal)) @@ -1916,8 +1916,8 @@ (new-trace "channel-read-wrap") (add-fns '((main - ; channel with 2 slots (capacity 1 since we waste a slot) - ((1 channel-address) <- new-channel (2 literal)) + ; channel with 1 slot + ((1 channel-address) <- new-channel (1 literal)) ; write a value ((2 integer-address) <- new (integer literal)) ((2 integer-address deref) <- copy (34 literal)) @@ -1976,7 +1976,7 @@ (new-trace "channel-write-full") (add-fns '((main - ((1 channel-address) <- new-channel (2 literal)) + ((1 channel-address) <- new-channel (1 literal)) ((2 integer-address) <- new (integer literal)) ((2 integer-address deref) <- copy (34 literal)) ((3 tagged-value-address) <- new-tagged-value (integer-address literal) (2 integer-address)) |