diff --git a/src/core.c/Supply-coercers.pm6 b/src/core.c/Supply-coercers.pm6 index edf5cd76647..700618c9182 100644 --- a/src/core.c/Supply-coercers.pm6 +++ b/src/core.c/Supply-coercers.pm6 @@ -41,7 +41,7 @@ nqp::stmts( (my $got := nqp::shift($!queue)), nqp::if( - nqp::eqaddr($got, ConcQueue), + nqp::eqaddr($got,ConcQueue), nqp::if( nqp::isconcrete($!exception), $!exception.throw, @@ -49,6 +49,16 @@ $got)) } + method push-all(\target --> IterationEnd) { + nqp::stmts( + nqp::while( + nqp::not_i(nqp::eqaddr((my $got := nqp::shift($!queue)),ConcQueue)), + target.push($got)), + nqp::if( + nqp::isconcrete($!exception), + $!exception.throw)) + } + # method is-lazy(--> Bool:D) { ... } }