create in situ for nqp::chr if it fits into 8bit.

MoarVM · Nov 15, 2017 · 1afd45e · 1afd45e
1 parent 1c4aba1
commit 1afd45e
Showing 1 changed file with 2 additions and 3 deletions.
diff --git a/src/strings/ops.c b/src/strings/ops.c
@@ -2555,9 +2555,8 @@ MVMString * MVM_string_chr(MVMThreadContext *tc, MVMint64 cp) {
 
     s = (MVMString *)REPR(tc->instance->VMString)->allocate(tc, STABLE(tc->instance->VMString));
     if (can_fit_into_8bit(g)) {
-        s->body.storage_type       = MVM_STRING_GRAPHEME_8;
-        s->body.storage.blob_8     = MVM_malloc(sizeof(MVMGrapheme8));
-        s->body.storage.blob_8[0]  = g;
+        s->body.storage_type       = MVM_STRING_IN_SITU;
+        s->body.storage.in_situ[0] = g;
     } else {
         s->body.storage_type       = MVM_STRING_GRAPHEME_32;
         s->body.storage.blob_32    = MVM_malloc(sizeof(MVMGrapheme32));