Skip to content

Commit 1b4afc4

Browse files
SqrtNegInfSqrtNegInf
committed
drop extraneous parens (saves two chars/task!)
1 parent eac35cc commit 1b4afc4

File tree

1,485 files changed

+1487
-1487
lines changed

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

1,485 files changed

+1487
-1487
lines changed

Diff for: ‎0/10001th_prime

+1-1
Original file line numberDiff line numberDiff line change
@@ -28,4 +28,4 @@ while () { (1 x ++$n) !~ /^(11+)\1+$/ and ++$c == 101 and say $n and last }
2828
use Test::More;
2929
is($result, 104743);
3030
is($n , 547);
31-
done_testing();
31+
done_testing;

Diff for: ‎0/100_prisoners

+1-1
Original file line numberDiff line numberDiff line change
@@ -69,4 +69,4 @@ END
6969

7070
use Test::More;
7171
is($result, $ref);
72-
done_testing();
72+
done_testing;

Diff for: ‎0/15_puzzle_solver

+1-1
Original file line numberDiff line numberDiff line change
@@ -24,7 +24,7 @@ sub fY {
2424
my $result = join '', @N3;
2525
use Test::More;
2626
is $result, 'rrrulddluuuldrurdddrullulurrrddldluurddlulurruldrdrd';
27-
done_testing();
27+
done_testing;
2828
exit;
2929
}
3030
$N4[$n] <= $m ? fN() : False;

Diff for: ‎0/15_puzzle_solver.1

+1-1
Original file line numberDiff line numberDiff line change
@@ -24,7 +24,7 @@ sub fY {
2424
my $result = join '', @N3;
2525
use Test::More;
2626
is $result, 'rrrulddluuuldrurdddrullulurrrddldluurddlulurruldrdrd';
27-
done_testing();
27+
done_testing;
2828
exit;
2929
}
3030
$N4[$n] <= $m ? fN() : False;

Diff for: ‎0/21_Game

+1-1
Original file line numberDiff line numberDiff line change
@@ -40,7 +40,7 @@ sub win {
4040
my($player) = @_;
4141
print "$player wins.\n";
4242
is $player, 'Computer';
43-
done_testing();
43+
done_testing;
4444
exit;
4545
}
4646

Diff for: ‎0/24_game

+1-1
Original file line numberDiff line numberDiff line change
@@ -56,4 +56,4 @@ while () {
5656

5757
use Test::More;
5858
ok $result =~ /You win/ms;
59-
done_testing();
59+
done_testing;

Diff for: ‎0/4-rings_or_4-squares_puzzle

+1-1
Original file line numberDiff line numberDiff line change
@@ -93,4 +93,4 @@ EOD
9393

9494
use Test::More;
9595
is ($result, $ref);
96-
done_testing();
96+
done_testing;

Diff for: ‎0/4-rings_or_4-squares_puzzle-2

+1-1
Original file line numberDiff line numberDiff line change
@@ -63,4 +63,4 @@ EOD
6363

6464
use Test::More;
6565
is ($result, $ref);
66-
done_testing();
66+
done_testing;

Diff for: ‎0/99_Bottles_of_Beer

+1-1
Original file line numberDiff line numberDiff line change
@@ -1577,5 +1577,5 @@ chomp $result2;
15771577
is ($ref1, $result2);
15781578
is ($ref3, $result3);
15791579
is ($ref4, $result4);
1580-
done_testing();
1580+
done_testing;
15811581

Diff for: ‎A/ABC_Problem-2

+1-1
Original file line numberDiff line numberDiff line change
@@ -41,4 +41,4 @@ EOD
4141
use Test::More;
4242
chomp $ref;
4343
is ($result, $ref);
44-
done_testing();
44+
done_testing;

Diff for: ‎A/ASCII_control_characters

+1-1
Original file line numberDiff line numberDiff line change
@@ -29,4 +29,4 @@ END
2929
use Test::More;
3030
chomp $ref;
3131
is($result, $ref);
32-
done_testing();
32+
done_testing;

Diff for: ‎A/Abbreviations,_automatic

+1-1
Original file line numberDiff line numberDiff line change
@@ -137,4 +137,4 @@ END
137137
use Test::More;
138138
chop $ref;
139139
is ($result,$ref);
140-
done_testing();
140+
done_testing;

Diff for: ‎A/Abelian_sandpile_model

+1-1
Original file line numberDiff line numberDiff line change
@@ -39,4 +39,4 @@ END
3939
use Test::More;
4040
chomp $ref;
4141
is($result, $ref);
42-
done_testing();
42+
done_testing;

Diff for: ‎A/Abundant_odd_numbers

+1-1
Original file line numberDiff line numberDiff line change
@@ -75,4 +75,4 @@ END
7575
use Test::More;
7676
chomp $ref;
7777
is $result, $ref;
78-
done_testing();
78+
done_testing;

Diff for: ‎A/Accumulator_factory

+1-1
Original file line numberDiff line numberDiff line change
@@ -24,4 +24,4 @@ print $result, "\n";
2424

2525
use Test::More;
2626
is ($result, '8.3');
27-
done_testing();
27+
done_testing;

Diff for: ‎A/Achilles_numbers

+1-1
Original file line numberDiff line numberDiff line change
@@ -71,4 +71,4 @@ END
7171
use Test::More;
7272
chomp $ref;
7373
is($result, $ref);
74-
done_testing();
74+
done_testing;

Diff for: ‎A/Achilles_numbers-1

+1-1
Original file line numberDiff line numberDiff line change
@@ -84,4 +84,4 @@ END
8484
use Test::More;
8585
chomp $ref;
8686
is($result, $ref);
87-
done_testing();
87+
done_testing;

Diff for: ‎A/Ackermann_function-1

+1-1
Original file line numberDiff line numberDiff line change
@@ -27,4 +27,4 @@ say $result = A(4,1);
2727

2828
use Test::More;
2929
is ($result, 65533);
30-
done_testing();
30+
done_testing;

Diff for: ‎A/Ackermann_function-2

+1-1
Original file line numberDiff line numberDiff line change
@@ -19,4 +19,4 @@ say $result = A(3,2);
1919

2020
use Test::More;
2121
is ($result, 29);
22-
done_testing();
22+
done_testing;

Diff for: ‎A/Ackermann_function-3

+1-1
Original file line numberDiff line numberDiff line change
@@ -19,5 +19,5 @@ say $result = A(3,2);
1919

2020
use Test::More;
2121
is ($result, 29);
22-
done_testing();
22+
done_testing;
2323

Diff for: ‎A/Active_Directory_Search_for_a_user

+1-1
Original file line numberDiff line numberDiff line change
@@ -47,4 +47,4 @@ EOD
4747

4848
use Test::More;
4949
is ($result, '[email protected]');
50-
done_testing();
50+
done_testing;

Diff for: ‎A/Add_a_variable_to_a_class_instance_at_runtime

+1-1
Original file line numberDiff line numberDiff line change
@@ -25,4 +25,4 @@ say $o->{'foo'};
2525

2626
use Test::More;
2727
is($o->{'foo'},42);
28-
done_testing();
28+
done_testing;

Diff for: ‎A/Additive_primes

+1-1
Original file line numberDiff line numberDiff line change
@@ -32,4 +32,4 @@ END
3232
use Test::More;
3333
chomp $ref;
3434
is($result, $ref);
35-
done_testing();
35+
done_testing;

Diff for: ‎A/Air_mass

+1-1
Original file line numberDiff line numberDiff line change
@@ -81,4 +81,4 @@ END
8181
use Test::More;
8282
chomp $ref;
8383
is($result, $ref);
84-
done_testing();
84+
done_testing;

Diff for: ‎A/Almkvist-Giullera_formula_for_pi

+1-1
Original file line numberDiff line numberDiff line change
@@ -64,4 +64,4 @@ EOD
6464

6565
use Test::More;
6666
is ($result, $ref);
67-
done_testing();
67+
done_testing;

Diff for: ‎A/Almkvist-Giullera_formula_for_pi.1

+1-1
Original file line numberDiff line numberDiff line change
@@ -65,4 +65,4 @@ END
6565
use Test::More;
6666
chomp $ref;
6767
is($result, $ref);
68-
done_testing();
68+
done_testing;

Diff for: ‎A/Amb-1

+1-1
Original file line numberDiff line numberDiff line change
@@ -45,4 +45,4 @@ say $result = "$w1 $w2 $w3 $w4\n";
4545
use Test::More;
4646
chomp $result;
4747
is ($result, 'that thing grows slowly');
48-
done_testing();
48+
done_testing;

Diff for: ‎A/Amb-2

+1-1
Original file line numberDiff line numberDiff line change
@@ -36,4 +36,4 @@ say $result;
3636

3737
use Test::More;
3838
is ($result, 'that thing grows slowly');
39-
done_testing();
39+
done_testing;

Diff for: ‎A/Amb-3

+1-1
Original file line numberDiff line numberDiff line change
@@ -51,4 +51,4 @@ say $result;
5151

5252
use Test::More;
5353
is ($result, 'that thing grows slowly');
54-
done_testing();
54+
done_testing;

Diff for: ‎A/Anadromes

+1-1
Original file line numberDiff line numberDiff line change
@@ -44,4 +44,4 @@ END
4444
use Test::More;
4545
chomp $ref;
4646
is($result, $ref);
47-
done_testing();
47+
done_testing;

Diff for: ‎A/Anagrams_Deranged_anagrams-2

+1-1
Original file line numberDiff line numberDiff line change
@@ -28,4 +28,4 @@ my $ref = 'excitation intoxicate';
2828

2929
use Test::More;
3030
is ($result, $ref);
31-
done_testing();
31+
done_testing;

Diff for: ‎A/Anaprimes

+1-1
Original file line numberDiff line numberDiff line change
@@ -57,4 +57,4 @@ END
5757
use Test::More;
5858
chomp $ref;
5959
is($result, $ref);
60-
done_testing();
60+
done_testing;

Diff for: ‎A/Angle_difference_between_two_bearings

+1-1
Original file line numberDiff line numberDiff line change
@@ -58,4 +58,4 @@ END
5858

5959
use Test::More;
6060
is($result, $ref);
61-
done_testing();
61+
done_testing;

Diff for: ‎A/Angles_geometric,_normalization_and_conversion

+1-1
Original file line numberDiff line numberDiff line change
@@ -110,4 +110,4 @@ END
110110
use Test::More;
111111
chomp $ref;
112112
is($result, $ref);
113-
done_testing();
113+
done_testing;

Diff for: ‎A/Anonymous_recursion-1

+1-1
Original file line numberDiff line numberDiff line change
@@ -31,4 +31,4 @@ say $result;
3131

3232
use Test::More;
3333
is ($result, '1 1 1 2 3 5 8 13 21 34 55 ');
34-
done_testing();
34+
done_testing;

Diff for: ‎A/Anonymous_recursion-2

+1-1
Original file line numberDiff line numberDiff line change
@@ -25,4 +25,4 @@ say $result;
2525

2626
use Test::More;
2727
is ($result, '0 1 1 2 3 5 8 13 21 34 55 ');
28-
done_testing();
28+
done_testing;

Diff for: ‎A/Anonymous_recursion-4

+1-1
Original file line numberDiff line numberDiff line change
@@ -17,4 +17,4 @@ say $result;
1717

1818
use Test::More;
1919
is ($result, '0 1 1 2 3 5 8 13 21 34 55 ');
20-
done_testing();
20+
done_testing;

Diff for: ‎A/Anti-primes

+1-1
Original file line numberDiff line numberDiff line change
@@ -26,4 +26,4 @@ my $ref = '1 2 4 6 12 24 36 48 60 120 180 240 360 720 840 1260 1680 2520 5040 75
2626

2727
use Test::More;
2828
is ($result, $ref);
29-
done_testing();
29+
done_testing;

Diff for: ‎A/Apery%27s_constant

+1-1
Original file line numberDiff line numberDiff line change
@@ -49,4 +49,4 @@ END
4949
use Test::More;
5050
chomp $ref;
5151
is($result, $ref);
52-
done_testing();
52+
done_testing;

Diff for: ‎A/Approximate_Equality

+1-1
Original file line numberDiff line numberDiff line change
@@ -62,4 +62,4 @@ END
6262
use Test::More;
6363
chomp $ref;
6464
is($result, $ref);
65-
done_testing();
65+
done_testing;

Diff for: ‎A/Arithmetic_numbers

+1-1
Original file line numberDiff line numberDiff line change
@@ -62,4 +62,4 @@ END
6262
use Test::More;
6363
chomp $ref;
6464
is($result, $ref);
65-
done_testing();
65+
done_testing;

Diff for: ‎A/Array_length

+1-1
Original file line numberDiff line numberDiff line change
@@ -59,4 +59,4 @@ EOD
5959

6060
use Test::More;
6161
is ($result, $ref);
62-
done_testing();
62+
done_testing;

Diff for: ‎A/Arrays

+1-1
Original file line numberDiff line numberDiff line change
@@ -56,4 +56,4 @@ EOD
5656

5757
use Test::More;
5858
is ($result, $ref);
59-
done_testing();
59+
done_testing;

Diff for: ‎A/Ascending_primes

+1-1
Original file line numberDiff line numberDiff line change
@@ -47,4 +47,4 @@ EOD
4747

4848
use Test::More;
4949
is ($result, $ref);
50-
done_testing();
50+
done_testing;

Diff for: ‎A/Assertions_in_design_by_contract

+1-1
Original file line numberDiff line numberDiff line change
@@ -50,4 +50,4 @@ EOD
5050
use Test::More;
5151
chomp $ref;
5252
is ($result, $ref);
53-
done_testing();
53+
done_testing;

Diff for: ‎A/Associative_array_Iteration

+1-1
Original file line numberDiff line numberDiff line change
@@ -63,4 +63,4 @@ EOD
6363

6464
use Test::More;
6565
is ($result, $ref);
66-
done_testing();
66+
done_testing;

Diff for: ‎A/Associative_array_Merging

+1-1
Original file line numberDiff line numberDiff line change
@@ -46,4 +46,4 @@ END
4646
use Test::More;
4747
chomp $ref;
4848
is($result, $ref);
49-
done_testing();
49+
done_testing;

Diff for: ‎A/Atomic_updates

+1-1
Original file line numberDiff line numberDiff line change
@@ -70,4 +70,4 @@ say join "\n", @res;
7070

7171
use Test::More;
7272
is ($sum_total, 1000*$n);
73-
done_testing();
73+
done_testing;

Diff for: ‎A/Attractive_numbers

+1-1
Original file line numberDiff line numberDiff line change
@@ -20,4 +20,4 @@ my $ref = '4 6 8 9 10 12 14 15 18 20 21 22 25 26 27 28 30 32 33 34 35 38 39 42 4
2020

2121
use Test::More;
2222
is($result, $ref);
23-
done_testing();
23+
done_testing;

Diff for: ‎A/Autogram_checker

+1-1
Original file line numberDiff line numberDiff line change
@@ -200,4 +200,4 @@ END
200200
use Test::More;
201201
chomp $ref;
202202
is($result, $ref);
203-
done_testing();
203+
done_testing;

Diff for: ‎A/Average_loop_length

+1-1
Original file line numberDiff line numberDiff line change
@@ -63,4 +63,4 @@ END
6363
use Test::More;
6464
chop $ref;
6565
is($result,$ref);
66-
done_testing();
66+
done_testing;

Diff for: ‎A/Averages_Mean_time_of_day-2

+1-1
Original file line numberDiff line numberDiff line change
@@ -27,4 +27,4 @@ my $ref = '23:47:43 is the mean time of 23:00:17 23:40:20 00:12:45 00:17:19';
2727

2828
use Test::More;
2929
is ($result, $ref);
30-
done_testing();
30+
done_testing;

Diff for: ‎B/Babylonian_spiral

+1-1
Original file line numberDiff line numberDiff line change
@@ -62,4 +62,4 @@ END
6262

6363
use Test::More;
6464
is($result, $ref);
65-
done_testing();
65+
done_testing;

Diff for: ‎B/Balanced_brackets-1

+1-1
Original file line numberDiff line numberDiff line change
@@ -42,4 +42,4 @@ END
4242

4343
use Test::More;
4444
is ($result, $ref);
45-
done_testing();
45+
done_testing;

Diff for: ‎B/Balanced_brackets-2

+1-1
Original file line numberDiff line numberDiff line change
@@ -51,4 +51,4 @@ END
5151

5252
use Test::More;
5353
is ($result, $ref);
54-
done_testing();
54+
done_testing;

Diff for: ‎B/Banker%27s_algorithm

+1-1
Original file line numberDiff line numberDiff line change
@@ -75,4 +75,4 @@ END
7575
use Test::More;
7676
chomp $ref;
7777
is($result, $ref);
78-
done_testing();
78+
done_testing;

Diff for: ‎B/Base-16_representation

+1-1
Original file line numberDiff line numberDiff line change
@@ -37,4 +37,4 @@ EOD
3737

3838
use Test::More;
3939
is ($result, $ref);
40-
done_testing();
40+
done_testing;

Diff for: ‎B/Base58Check_encoding

+1-1
Original file line numberDiff line numberDiff line change
@@ -59,4 +59,4 @@ EOD
5959

6060
use Test::More;
6161
is($result, $ref);
62-
done_testing();
62+
done_testing;

Diff for: ‎B/Base_16_numbers_needing_a_to_f

+1-1
Original file line numberDiff line numberDiff line change
@@ -31,4 +31,4 @@ EOD
3131
use Test::More;
3232
chomp $ref;
3333
is ($result, $ref);
34-
done_testing();
34+
done_testing;

Diff for: ‎B/Bernoulli_numbers-1

+1-1
Original file line numberDiff line numberDiff line change
@@ -68,4 +68,4 @@ END
6868

6969
use Test::More;
7070
is ($result, $ref);
71-
done_testing();
71+
done_testing;

Diff for: ‎B/Bernoulli_numbers-2

+1-1
Original file line numberDiff line numberDiff line change
@@ -53,4 +53,4 @@ END
5353

5454
use Test::More;
5555
is ($result, $ref);
56-
done_testing();
56+
done_testing;

Diff for: ‎B/Bernoulli_numbers-3

+1-1
Original file line numberDiff line numberDiff line change
@@ -53,4 +53,4 @@ END
5353

5454
use Test::More;
5555
is ($result, $ref);
56-
done_testing();
56+
done_testing;

Diff for: ‎B/Best_shuffle-1

+1-1
Original file line numberDiff line numberDiff line change
@@ -53,4 +53,4 @@ END
5353

5454
use Test::More;
5555
is ($result, $ref);
56-
done_testing();
56+
done_testing;

Diff for: ‎B/Best_shuffle-2

+1-1
Original file line numberDiff line numberDiff line change
@@ -53,4 +53,4 @@ END
5353

5454
use Test::More;
5555
is ($result, $ref);
56-
done_testing();
56+
done_testing;

0 commit comments

Comments
 (0)