We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 7bec724 commit a836740Copy full SHA for a836740
S02-magicals/sub.t
@@ -8,7 +8,7 @@ This tests the &?ROUTINE magical value
8
9
=end comment
10
11
-plan 4;
+plan 3;
12
13
# L<S06/The C<&?ROUTINE> object>
14
# L<S02/Names/Which routine am I in>
@@ -25,10 +25,4 @@ sub postfix:<!!!> (Int $n) { $n < 2 ?? 1 !! $n * &?ROUTINE($n - 1) }
25
my $result3 = 3!!!;
26
is($result3, 6, 'the &?ROUTINE magical works correctly in overloaded operators' );
27
28
-#?rakudo todo 'is this spec?'
29
-{
30
- my $baz = try { &?ROUTINE };
31
- ok(defined($baz), '&?ROUTINE is defined for the MAIN routine');
32
-}
33
-
34
# vim: ft=perl6
0 commit comments