578 - switch to non-polymorphic 'print' functions

Also clean up various prints from last few commits.
As a convention, for debugging we always print directly to host.

1 files changed, 7 insertions, 2 deletions

diff --git a/graphics.mu b/graphics.mu
index 22d3a5c5..191e5d8e 100644
--- a/graphics.mu
+++ b/graphics.mu
@@ -7,9 +7,14 @@
     (loop-unless click?:boolean)
     (x:integer <- get pos:integer-integer-pair 0:offset)
     (y:integer <- get pos:integer-integer-pair 1:offset)
-    (print-primitive nil:literal/terminal x:integer)
+;?     (print-primitive-to-host (("AAA " literal)))
+;?     (print-primitive-to-host x:integer)
+;?     (print-primitive-to-host ((", " literal)))
+;?     (print-primitive-to-host y:integer)
+;?     (print-primitive-to-host (("\n" literal)))
+    (print-integer nil:literal/terminal x:integer)
     (print-primitive-to-host ((", " literal)))
-    (print-primitive nil:literal/terminal y:integer)
+    (print-integer nil:literal/terminal y:integer)
     (print-primitive-to-host (("\n" literal)))
     (loop)
   }