about summary refs log tree commit diff stats
path: root/405screen.mu
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2020-08-02 20:14:50 -0700
committerKartik Agaram <vc@akkartik.com>2020-08-02 20:14:50 -0700
commitea2d44bdefef7ded28cc33dbb6ac85842dc6ca44 (patch)
treef071cc03091cd3917fb0ec0e95dab518f90ea7e0 /405screen.mu
parent9ee9f37dc78430ca32e00d4d4223b178150c5fee (diff)
downloadmu-ea2d44bdefef7ded28cc33dbb6ac85842dc6ca44.tar.gz
snapshot: encoding code-points to utf-8
I have it partly working, but just realized I've been reversing the output
bytes.
Diffstat (limited to '405screen.mu')
-rw-r--r--405screen.mu5
1 files changed, 5 insertions, 0 deletions
diff --git a/405screen.mu b/405screen.mu
index 8165e50f..99eae4f4 100644
--- a/405screen.mu
+++ b/405screen.mu
@@ -152,6 +152,11 @@ $print-grapheme:body: {
 }
 }
 
+fn print-code-point screen: (addr screen), c: code-point {
+  var g/eax: grapheme <- to-grapheme c
+  print-grapheme screen, g
+}
+
 fn print-int32-hex screen: (addr screen), n: int {
 $print-int32-hex:body: {
   compare screen, 0