s/done_testing/done/ as per recent S24 changes

S02-builtin_data_types/array.t

@@ -356,6 +356,6 @@ my @array2 = ("test", 1, Mu);
     isa_ok +@a, Int, "Numifying an Array yields an Int";
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S02-builtin_data_types/bool.t

@@ -96,6 +96,6 @@ is(--$bool, Bool::False, 'Decrement of Bool::False produces Bool::False');
 
 isa_ok ('RT71462' ~~ Str), Bool;
 
-done_testing;
+done;
 
 # vim: ft=perl6

S02-builtin_data_types/enum.t

@@ -142,6 +142,6 @@ is %hash.values, (0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 'A', 'B', 'C', 'D', 'E', 'F'), '
 
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S02-builtin_data_types/hash.t

@@ -259,6 +259,6 @@ lives_ok { Hash.new("a" => "b") }, 'Hash.new($pair) lives';
 
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S02-builtin_data_types/instants-and-durations.t

@@ -38,7 +38,7 @@ isa_ok eval('now +300'), Instant, 'now is a term, not a function';
     isa_ok $d / (2/3), Duration, 'Duration / Rat ~~ Duration';
 }
 
-done_testing;
+done;
 
 # See S32-temporal/DateTime-Instant-Duration.t for more.
 

S02-builtin_data_types/lists.t

@@ -162,6 +162,6 @@ plan 27;
     is $x, 44, 'variable not changed via assignment to list element';
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S02-builtin_data_types/nil.t

@@ -44,6 +44,6 @@ ok (my $y = ()).defined, 'assigning () to scalar results in a defined parcel';
     is $x, 0, '$Statement for Nil; does zero iterations';
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S02-builtin_data_types/type.t

@@ -150,6 +150,6 @@ dies_ok { my Num $n; $n = 42; }, 'Num does not accept Int';
     ok Array ~~ Positional, 'Array does Positional too';
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S02-builtin_data_types/undefined-types.t

@@ -53,6 +53,6 @@ plan 23;
     is 'a' ~ $int, 'a', 'infix:<~> uses coercion to Stringy (Int)';
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S02-builtin_data_types/whatever.t

@@ -232,6 +232,6 @@ eval_lives_ok '{*.{}}()', '{*.{}}() lives';
     is $rt79166, 'RT 79166', 'assignment to variable with whatever in it';
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S02-literals/listquote.t

@@ -102,6 +102,6 @@ eval_dies_ok '<STDIN>', '<STDIN> is disallowed';
     is f(my @x = (1, 2, 3)), 1, 'function call with assignment to list';
 }
 
-done_testing();
+done();
 
 # vim: ft=perl6

S02-literals/numeric.t

@@ -53,6 +53,6 @@ is_approx 3.14159265358979323846264338327950288419716939937510e0,
 #?rakudo todo 'RT 70600'
 ok 0e999999999999999 == 0, '0e999999999999 equals zero';
 
-done_testing;
+done;
 
 # vim: ft=perl6 sw=4 ts=4 expandtab

S02-literals/quoting-unicode.t

@@ -81,6 +81,6 @@ RIGHT SQUARE BRACKET WITH TICK IN BOTTOM CORNER(U+298D/U+298E)';
         "Can't quote a regex with a snowman and comet (U+2603 and U+2604)";
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S02-literals/quoting.t

@@ -561,6 +561,6 @@ Hello, World
     is qqx/echo $var/.chomp,  "world", 'qqx';
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S02-literals/string-interpolation.t

@@ -42,6 +42,6 @@ line 4
 ];
 is $rt65538_in, $rt65538_out, 'interpolation does not trim newlines';
 
-done_testing;
+done;
 
 # vim: ft=perl6

S02-magicals/args.t

@@ -19,4 +19,4 @@ is_run 'print @*ARGS.join(", ")', :args[1, 2, "foo"],
         status => 0,
     }, 'providing command line arguments sets @*ARGS';
 
-done_testing;
+done;

S02-names/identifier.t

@@ -103,6 +103,6 @@ plan 20;
         'can call subroutines whos name begin with an alphabetic infix (and)';
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S02-names_and_variables/list_array_perl.t

@@ -104,7 +104,7 @@ my @tests = (
     is_deeply eval( $rt65988.perl ), $rt65988, $rt65988.perl ~ '.perl';
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6
 

S02-names_and_variables/perl.t

@@ -162,6 +162,6 @@ my @tests = (
     }
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S02-whitespace_and_comments/sub-block-parsing.t

@@ -31,6 +31,6 @@ eval_dies_ok q[
     x();
 ], 'block parsing works with semicolon';
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-feeds/basic.t

@@ -141,6 +141,6 @@ plan 19;
     is(@(@data), <a b c d 0 1 2 3>, 'two stacked feeds');
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-junctions/associative.t

@@ -34,6 +34,6 @@ sub jv(Mu $j) {
 
 }
 
-done_testing();
+done();
 
 # vim: ft=perl6

S03-junctions/misc.t

@@ -415,6 +415,6 @@ ok Mu & Mu ~~ Mu, 'Mu & Mu ~~ Mu works';
         'junction can be used to index Hash';
 }
 
-done_testing();
+done();
 
 # vim: ft=perl6

S03-metaops/hyper.t

@@ -770,6 +770,6 @@ my @e;
     is "$a, $b, $c", $e, '»~=» changes each scalar';
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-metaops/not.t

@@ -63,6 +63,6 @@ isa_ok 4 !=:= 5, Bool, "4 !=:= 5 is Bool";
 
 
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-metaops/reduce.t

@@ -237,5 +237,5 @@ is( ([\R~] 'a'..*).[^8].join(', '), 'a, ba, cba, dcba, edcba, fedcba, gfedcba, h
     is ([~] 1, 2, 5), '125', '[~] works outside class';
 }
 
-done_testing;
+done;
 # vim: ft=perl6

S03-metaops/reverse.t

@@ -58,6 +58,6 @@ is 3 R/ 9 + 5, 8, 'R/ gets precedence of /';
 is 4 R- 5 R/ 10, -2, "Rop gets the precedence of op";
 is (9 R... 1, 3), (1, 3, 5, 7, 9), "Rop gets list_infix precedence correctly";
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-metaops/zip.t

@@ -40,6 +40,6 @@ is (1, 2, 3, * Z+ 10, 20, 30, 40, 50), (11, 22, 33, 43, 53), 'zip-plus extends l
 is (2, 10, * Z* 3, 4, 5, *).munch(5),
     (6, 40, 50, 50, 50), 'zip-product extends two arguments ending with *';
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-operators/arith.t

@@ -308,6 +308,6 @@ dies_ok( { $x := 0; say 3 div $x; }, 'Division by zero dies and is catchable wit
     ok 1/7 / 1/7 == 1/49, 'no more Rat literals, infix:</> has normal left assoc';
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-operators/comparison-simple.t

@@ -39,6 +39,6 @@ is(1 cmp 2, -1,     '1 cmp 2 is increase');
 is(2 cmp 1, 1,      '2 cmp 1 is decrease');
 is('a' cmp 1, 1,    '"a" cmp 1 is decrease'); # unspecced but P5 behavior
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-operators/context.t

@@ -81,6 +81,6 @@ eval_dies_ok('@', 'Anonymous variable outside of declaration');
 eval_dies_ok('%', 'Anonymous variable outside of declaration');
 eval_dies_ok('&', 'Anonymous variable outside of declaration');
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-operators/nesting.t

@@ -54,6 +54,6 @@ is (1 RR[R-] 2),   1, 'RR[R-] works';
     is 1031 [blue] 4, 3, "1031 [blue] 4 == 3";
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-operators/not.t

@@ -33,6 +33,6 @@ is(not False, True,             "'False' is not 'True'");
 isa_ok(not False, Bool,         "'not False' is a Bool");
 is(not False, Bool::True,       "'False' is not 'Bool::True'");
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-operators/range-basic.t

@@ -202,6 +202,6 @@ nok 'd' ~~ *..'c',      "not 'd' ~~ *..'c'";
     ok ' ' ~~ ' '..'A', "' ' ~~ ' '..'A'";
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-operators/range-int.t

@@ -483,5 +483,5 @@ is ~(17..^Inf).list.munch(20), '17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32
 is ~(17^..Inf).list.munch(20), '18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37', '17^..Inf';
 is ~(17^..^Inf).list.munch(20), '18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37', '17^..^Inf';
 
-done_testing;
+done;
 # # vim: ft=perl6

S03-operators/relational.t

@@ -136,6 +136,6 @@ ok("a" lt "a ", 'a lt a\x20');
 ok("a\0" gt "a", 'a\0 gt a');
 ok("a " gt "a", 'a\x20 gt a');
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-operators/short-circuit.t

@@ -184,6 +184,6 @@ ok (0 || 0 || 1), '0 || 0 || 1 is true';
 
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-operators/ternary.t

@@ -71,6 +71,6 @@ eval_dies_ok q[ 1 ?? 2,3 !! 4,5 ], 'Ternary error (RT 66840)';
 
 eval_dies_ok q[ 71704 !! 'bust' ], 'Ternary error (RT 71704)';
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-operators/value_equivalence.t

@@ -175,6 +175,6 @@ plan 74;
   ok  (1 !=== "1"), '!=== on values (1 !=== "1")';
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-sequence/arity-2-or-more.t

@@ -44,4 +44,4 @@ is (1, 1, 2, 3, { $^a + $^b } ... 9).[^7].join(', '), '1, 1, 2, 3, 5, 8, 13', 'a
 }
 is (1, 2, sub {[*] @_[*-1], @_ + 1} ... 720).join(' '), '1 2 6 24 120 720', 'slurpy factorial generator';
 
-done_testing;
+done;

S03-sequence/arity0.t

@@ -39,4 +39,4 @@ plan 13;
 }
 
 
-done_testing;
+done;

S03-sequence/basic.t

@@ -236,6 +236,6 @@ is (32,16,8 ...^ Rat), (32,16,8) , 'stop on a matching type';
 # RT #75828
 eval_dies_ok '1, 2, 3, ... 5', 'comma before sequence operator is caught';
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-sequence/misc.t

@@ -78,6 +78,6 @@ is (1, 2 ... 0, 1 ... 3).join(' '),
     is @rt80574[0], 'zero', 'Generator output is flattened';
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-sequence/nonnumeric.t

@@ -82,6 +82,6 @@ is ('A' ...^ 'ZZ')[*-1], 'ZY', "'A' ...^ 'ZZ' omits last element";
     is ($f(2) ...^ 0).join(' '), 'P2 P1', 'exclusive decreasing not-quite-periodic sequence';
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-smartmatch/any-any.t

@@ -26,6 +26,6 @@ plan 8;
     'defg' !~~ ($x = $_);
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-smartmatch/any-array-slice.t

@@ -15,6 +15,6 @@ use Test;
         "array slice .[0,1] of (0,1,2,3) is false";
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-smartmatch/any-array.t

@@ -19,6 +19,6 @@ plan 6;
     ok !(1  ~~ [1, 2]),         'Any ~~ Array (Int, -, it is not any())';
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-smartmatch/any-bool.t

@@ -25,6 +25,6 @@ plan 12;
 
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-smartmatch/any-callable.t

@@ -21,6 +21,6 @@ plan 6;
     ok(!(Mu ~~ &nuhuh), "negated scalar sub false");
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6

S03-smartmatch/any-complex.t

@@ -17,6 +17,6 @@ plan 12;
     ok  (3        !~~ (3 + 1i)), 'Num !~~ Complex (+)';
 }
 
-done_testing;
+done;
 
 # vim: ft=perl6