bring in line with rakudo's run()/shell() changes

This should still work on niecza and pugs.

Author: FROGGS

packages/Test/Util.pm

@@ -99,7 +99,7 @@ sub get_out( Str $code, Str $input?, :@args, :@compiler-args) is export {
         $cmd ~= $fnbase ~ '.code'  if $code.defined;
         $cmd ~= " @actual_args.join(' ') < $fnbase.in > $fnbase.out 2> $fnbase.err";
         # diag("Command line: $cmd");
-        %out<status> = shell( $cmd );
+        %out<status> = +shell( $cmd ) +< 8;
         %out<out> = slurp "$fnbase.out";
         %out<err> = slurp "$fnbase.err";