From e98e77e1d3fbc2a5fd4d26408d2b13ddbef07110 Mon Sep 17 00:00:00 2001
From: Bruce Hill <bruce@bruce-hill.com>
Date: Tue, 3 Sep 2024 01:20:36 -0400
Subject: Fix for missing codepoint names

---
 builtins/text.c | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'builtins')

diff --git a/builtins/text.c b/builtins/text.c
index c4514892..66622f5f 100644
--- a/builtins/text.c
+++ b/builtins/text.c
@@ -1573,12 +1573,14 @@ public array_t Text$codepoint_names(Text_t text)
             for (int64_t c = 0; c < synthetic_graphemes[-grapheme-1].num_codepoints; c++) {
                 char *name = GC_MALLOC_ATOMIC(UNINAME_MAX);
                 name = unicode_character_name(synthetic_graphemes[-grapheme-1].codepoints[c], name);
+                if (!name) name = "???";
                 Text_t name_text = (Text_t){.tag=TEXT_ASCII, .length=strlen(name), .ascii=name};
                 Array$insert(&names, &name_text, I_small(0), sizeof(Text_t));
             }
         } else {
             char *name = GC_MALLOC_ATOMIC(UNINAME_MAX);
             name = unicode_character_name(grapheme, name);
+            if (!name) name = "???";
             Text_t name_text = (Text_t){.tag=TEXT_ASCII, .length=strlen(name), .ascii=name};
             Array$insert(&names, &name_text, I_small(0), sizeof(Text_t));
         }
-- 
cgit v1.2.3