2840

2 files changed, 5 insertions, 5 deletions

diff --git a/070text.mu b/070text.mu
index 386fee22..1e1999c7 100644
--- a/070text.mu
+++ b/070text.mu
@@ -193,7 +193,7 @@ def append in:address:shared:buffer, c:character -> in:address:shared:buffer [
     empty?:boolean <- lesser-or-equal len, 0
     return-if empty?
     len <- subtract len, 1
-    put *in, length:offset, len
+    *in <- put *in, length:offset, len
     return
   }
   {
@@ -206,7 +206,7 @@ def append in:address:shared:buffer, c:character -> in:address:shared:buffer [
   dest:address:character <- index-address *s, len
   *dest <- copy c
   len <- add len, 1
-  put *in, length:offset, len
+  *in <- put *in, length:offset, len
 ]
 
 scenario buffer-append-works [
diff --git a/072channel.mu b/072channel.mu
index 25956af9..5fcbc98d 100644
--- a/072channel.mu
+++ b/072channel.mu
@@ -84,7 +84,7 @@ def write out:address:shared:sink:_elem, val:_elem -> out:address:shared:sink:_e
     free <- copy 0
   }
   # write back
-  put *chan, first-free:offset, free
+  *chan <- put *chan, first-free:offset, free
 ]
 
 def read in:address:shared:source:_elem -> result:_elem, in:address:shared:source:_elem [
@@ -113,7 +113,7 @@ def read in:address:shared:source:_elem -> result:_elem, in:address:shared:sourc
     full <- copy 0
   }
   # write back
-  put *chan, first-full:offset, full
+  *chan <- put *chan, first-full:offset, full
 ]
 
 def clear in:address:shared:source:_elem -> in:address:shared:source:_elem [
@@ -312,7 +312,7 @@ def buffer-lines in:address:shared:source:character, buffered-out:address:shared
           buffer-empty?:boolean <- equal buffer-length, 0
           break-if buffer-empty?
           buffer-length <- subtract buffer-length, 1
-          put *line, length:offset, buffer-length
+          *line <- put *line, length:offset, buffer-length
         }
         # and don't append this one
         loop +next-character:label