Ensure Foo(...) coercers make Raku objects

Str($*USER) was producing a BOOTStr because we return an unboxed `str` in `IntStr.Str` (which is fine), and since the caller was NQP code it then ended up boxed as a BOOTStr. Fixes #3308.
rakudo · Feb 11, 2020 · 3a86272 · 3a86272
1 parent 4a954cb
commit 3a86272
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/Perl6/bootstrap.c/BOOTSTRAP.nqp b/src/Perl6/bootstrap.c/BOOTSTRAP.nqp
@@ -3592,12 +3592,12 @@ BEGIN {
                     nqp::die("Cannot coerce to $coercer_name with named arguments")
                       if +%named;
                     if +@pos == 1 {
-                        @pos[0]."$coercer_name"()
+                        nqp::hllizefor(@pos[0]."$coercer_name"(), 'Raku')
                     }
                     else {
                         my $list := nqp::create(List);
                         nqp::bindattr($list, List, '$!reified', @pos);
-                        $list."$coercer_name"()
+                        nqp::hllizefor($list."$coercer_name"(), 'Raku')
                     }
                 }
                 else {