574 - printing string literals is a hack; hard-code it in for now

1 files changed, 4 insertions, 4 deletions

diff --git a/channel.mu b/channel.mu
index ea6c89a8..0dd71ccc 100644
--- a/channel.mu
+++ b/channel.mu
@@ -8,9 +8,9 @@
     (done?:boolean <- less-than n:integer 5:literal)
     (break-unless done?:boolean)
     ; other threads might get between these prints
-    (print-primitive nil:literal/terminal (("produce: " literal)))
+    (print-primitive-to-host (("produce: " literal)))
     (print-primitive nil:literal/terminal n:integer)
-    (print-primitive nil:literal/terminal (("\n" literal)))
+    (print-primitive-to-host (("\n" literal)))
     ; 'box' n into a dynamically typed 'tagged value' because that's what
     ; channels take
     (n2:integer <- copy n:integer)
@@ -31,9 +31,9 @@
     ; unbox the tagged value into an integer
     (n2:integer <- maybe-coerce x:tagged-value integer:literal)
     ; other threads might get between these prints
-    (print-primitive nil:literal/terminal (("consume: " literal)))
+    (print-primitive-to-host (("consume: " literal)))
     (print-primitive nil:literal/terminal n2:integer)
-    (print-primitive nil:literal/terminal (("\n" literal)))
+    (print-primitive-to-host (("\n" literal)))
     (loop)
   }
 ])